File: C:/xampp/htdocs/PBN/production/TVI-parsingCTOKX2p.php
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Control-9 Check</title>
<style type="text/css">
<!--
body {
font: 100% Verdana, Arial, Helvetica, sans-serif;
background: #ffffff;
margin: 0; /* 比較好的做法是將 Body 元素的邊界與欄位間隔調整為零，以處理不同的瀏覽器預設值 */
padding: 0;
text-align: center; /* 這樣會讓容器在 IE 5* 瀏覽器內置中對齊。然後，文字會在 #container 選取器中設定為靠左對齊預設值 */
color: #000000;
}
.oneColElsCtr #container {
width: 46em;
background: #FFFFFF;
margin: 0 auto; /* 自動邊界 (搭配寬度) 會讓頁面置中對齊 */
border: 0px solid #000000;
text-align: left; /* 這樣做會覆寫 Body 元素上的 text-align: center。 */
}
.oneColElsCtr #mainContent {
padding: 0 20px; /* 請記住，欄位間隔就是 Div 方塊內部的空間，而邊界就是 Div 方塊外部的空間 */
}
-->
</style></head>
<body class="oneColElsCtr">
<?php
include 'sp38XYZ.php';
include 'spXYZ.php';
include 'lab2xyz.php';
include 'SCCA06.php';
include 'xyz2lab01.php';
include 'xyz2lab.php';
$sum=260;
$check=1;
$dtime=time();
$dStr=substr($dtime,7,9)."-";
$contentT = file($f321);
//echo substr('abcdef', 1, 3); // bcd
$filedb=substr($f321,7,60);
$dbstr=explode("_", $filedb);
echo $dbstr[0]."XX".$dbstr[1]."XX".$dbstr[2]."XX".$dbstr[3].$dbstr[4].$dbstr[5];
function get_between ($text, $s1, $s2) {
$mid_url = "";
$pos_s = strrpos($text,$s1);
$pos_e = strrpos($text,$s2);
for ( $i=$pos_s+strlen($s1) ; (( $i<($pos_e)) && $i < strlen($text)) ; $i++ ) {
$mid_url .= $text[$i];
}
return $mid_url;
}
$contents = file($f123);
//echo substr('abcdef', 1, 3); // bcd
// $filedb=substr($f123,7,45);
// $dbstr=explode("_", $filedb);
echo $dbstr[0]."XX".$dbstr[1]."XX".$dbstr[2]."XX".$dbstr[3];
$string = implode($contents);
//echo $contents[20];
$string = implode($contents);
$p = ereg_replace("\r\n?", "\n", $string);
$p = str_replace("\n", ',', $p);
//echo $pt;
//$dotT = explode(",", $pt);
$datastring0=get_between($p,"BEGIN_DATA,",",END_DATA");
$dot = explode("\t", $datastring0);
$stringT = implode($contentT);
//echo $contents[20];
//echo $string;
$pt = ereg_replace("\r\n?", " ", $stringT);
//$pt = str_replace("\n", ',', $pt);
//$pt = str_replace(",", ' ', $pt);
//echo $pt;
//$dotT = explode(",", $pt);
$datastring=get_between($pt,"BEGIN_DATA","END_DATA");
$dotT = explode(" ", $datastring);
//print_r ($dotT);
echo "dot86:".$dot[166]."xx";
if ($dot[166]=='0.061827') { //1023
echo "content=0:";
echo "dotT86:".$dotT[166];
?>
<form action="TVI-parsingCTOKXT.php?f123=<?php echo "target.txt".'&f321='.$_FILES["file"]["name"];?>" method="post">
<table width="200" border="0" align="center">
<tr><td>
<input size="15" maxlength="50" type="hidden" name="rtarget" value=<?php echo $f321;?> /></td>
</tr>
</table>
<p><p>
<table width="200" border="1" align="center">
<tr>
<td><div align="center"> id</div></td>
<td><font color="#666666">P</td>
<td><font color="#666666">C</td>
<td><font color="#666666">M</td>
<td><font color="#666666">Y</td>
<td><font color="#666666">K</td>
<td>TVI</td>
<td><font color="#666666">C50</td>
<td>M50</td>
<td>Y50</td>
<td>K50</td>
<td>G7</td>
<td>GL</td>
<td>Ga</td>
<td>Gb</td>
</tr>
<?php
//////////////////////////////////////////////////Fogra Media Check
$psum=20;
$pl=95; $pa=-0.01;$pb=-2;
$cl=55.10; $ca=-37.0;$cb=-50;
$ml=48; $ma=74;$mb=-3;
$yl=89; $ya=-5;$yb=93;
$kl=16; $ka=0.01;$kb=0.01;
include 'densityV.php';
$cols=40;
$k1dd=0;
$Pdot=0;
$PXm=spXYZ("X",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$PYm=spXYZ("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$PZm=spXYZ("Z",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$PLm=xyz2lab01("l",$PXm,$PYm,$PZm);
$Pam=xyz2lab01("a",$PXm,$PYm,$PZm);
$Pbm=xyz2lab01("b",$PXm,$PYm,$PZm);
$Pdm=DensitySp("K",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
echo "xyz x:".$PXm."_y:".$PYm."_z:".$PZm;
echo "dot-10:".$dotT[9+$cols*$Pdot+1]."_dot-40:".$dotT[9+$cols*$Pdot+31];
echo "<BR>note 2k: PL:".$PLm."_Pa:".$Pam."_Pb:".$Pbm."__Pdm:".$Pdm."__<br>";
/////////////////////////////////c
$Pdot=1;
$cXm=spXYZ("X",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$cYm=spXYZ("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$cZm=spXYZ("Z",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$cLm=xyz2lab01("l",$cXm,$cYm,$cZm);
$cam=xyz2lab01("a",$cXm,$cYm,$cZm);
$cbm=xyz2lab01("b",$cXm,$cYm,$cZm);
$cdm=DensitySp("C",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
echo "note 2k: CL:".$cLm."_Ca:".$cam."_Cb:".$cbm."__Pdm:".$cdm."__<br>";
///////////////////////////////////////////m
$Pdot=2;
$mXm=spXYZ("X",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$mYm=spXYZ("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$mZm=spXYZ("Z",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$mLm=xyz2lab01("l",$mXm,$mYm,$mZm);
$mam=xyz2lab01("a",$mXm,$mYm,$mZm);
$mbm=xyz2lab01("b",$mXm,$mYm,$mZm);
$mdm=DensitySp("M",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
echo "note 2k: ML:".$mLm."_Ma:".$mam."_Mb:".$mbm."__Mdm:".$mdm."__<br>";
///////////////////////////////////////////y
$Pdot=3;
$yXm=spXYZ("X",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$yYm=spXYZ("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$yZm=spXYZ("Z",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$yLm=xyz2lab01("l",$yXm,$yYm,$yZm);
$yam=xyz2lab01("a",$yXm,$yYm,$yZm);
$ybm=xyz2lab01("b",$yXm,$yYm,$yZm);
$ydm=DensitySp("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
echo "note 2k: YL:".$yLm."_Ya:".$yam."_Yb:".$ybm."__Ydm:".$ydm."__<br>";
///////////////////////////////////////////k
$Pdot=4;
$kXm=spXYZ("X",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$kYm=spXYZ("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$kZm=spXYZ("Z",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$kLm=xyz2lab01("l",$kXm,$kYm,$kZm);
$kam=xyz2lab01("a",$kXm,$kYm,$kZm);
$kbm=xyz2lab01("b",$kXm,$kYm,$kZm);
$kdm=DensitySp("K",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
echo "note 2k: KL:".$kLm."_Ka:".$kam."_Kb:".$kbm."__Kdm:".$kdm."__<br>";
////////////////////////c50
$Pdot=5;
$c50dm=DensitySp("C",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$c50TV=(((1-(pow(10,(-($c50dm-$Pdm)))))/(1-(pow(10,(-($cdm-$Pdm)))))))*100;
$c50TVI=round(($c50TV-64),2);
echo "c50dm:".$c50dm."TV=".$c50TVI."__<br>";
////////////////////////m50
$Pdot=6;
$m50dm=DensitySp("M",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$m50TV=(((1-(pow(10,(-($m50dm-$Pdm)))))/(1-(pow(10,(-($mdm-$Pdm)))))))*100;
$m50TVI=round(($m50TV-64),2);
echo "m50dm:".$m50dm."TV=".$m50TVI."__<br>";
////////////////////////y50
$Pdot=7;
$y50dm=DensitySp("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$y50TV=(((1-(pow(10,(-($y50dm-$Pdm)))))/(1-(pow(10,(-($ydm-$Pdm)))))))*100;
$y50TVI=round(($y50TV-64),2);
echo "y50dm:".$y50dm."TV=".$y50TVI."__<br>";
////////////////////////k50
$Pdot=8;
$k50Xm=spXYZ("X",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$k50Ym=spXYZ("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$k50Zm=spXYZ("Z",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$k50Lm=xyz2lab01("l",$k50Xm,$k50Ym,$k50Zm);
$k50am=xyz2lab01("a",$k50Xm,$k50Ym,$k50Zm);
$k50bm=xyz2lab01("b",$k50Xm,$k50Ym,$k50Zm);
$k50dm=DensitySp("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$k50TV=(((1-(pow(10,(-($k50dm-$Pdm)))))/(1-(pow(10,(-($kdm-$Pdm)))))))*100;
$k50TVI=round(($k50TV-67),2);
echo "k50dm:".$k50dm."TV=".$k50TVI."__<br>";
echo "note 2k: k50L:".$k50Lm."_k50a:".$k50am."_k50b:".$k50bm."__<br>";
////////////////////////////gray
$Pdot=9;
$gXm=spXYZ("X",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$gYm=spXYZ("Y",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$gZm=spXYZ("Z",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
$gLm=xyz2lab01("l",$gXm,$gYm,$gZm);
$gam=xyz2lab01("a",$gXm,$gYm,$gZm);
$gbm=xyz2lab01("b",$gXm,$gYm,$gZm);
$gdm=DensitySp("K",$dotT[9+$cols*$Pdot+1],$dotT[9+$cols*$Pdot+2],$dotT[9+$cols*$Pdot+3],$dotT[9+$cols*$Pdot+4],$dotT[9+$cols*$Pdot+5],$dotT[9+$cols*$Pdot+6],$dotT[9+$cols*$Pdot+7],$dotT[9+$cols*$Pdot+8],$dotT[9+$cols*$Pdot+9],$dotT[9+$cols*$Pdot+10],$dotT[9+$cols*$Pdot+11],$dotT[9+$cols*$Pdot+12],$dotT[9+$cols*$Pdot+13],$dotT[9+$cols*$Pdot+14],$dotT[9+$cols*$Pdot+15],$dotT[9+$cols*$Pdot+16],$dotT[9+$cols*$Pdot+17],$dotT[9+$cols*$Pdot+18],$dotT[9+$cols*$Pdot+19],$dotT[9+$cols*$Pdot+20],$dotT[9+$cols*$Pdot+21],$dotT[9+$cols*$Pdot+22],$dotT[9+$cols*$Pdot+23],$dotT[9+$cols*$Pdot+24],$dotT[9+$cols*$Pdot+25],$dotT[9+$cols*$Pdot+26],$dotT[9+$cols*$Pdot+27],$dotT[9+$cols*$Pdot+28],$dotT[9+$cols*$Pdot+29],$dotT[9+$cols*$Pdot+30],$dotT[9+$cols*$Pdot+31]);
echo "note 2k: gL:".$gLm."_ga:".$gam."_gb:".$gbm."__gdm:".$gdm."__<br>";
function de76($l1,$a1,$b1,$l2,$a2,$b2) {
$d76=sqrt(pow(($l1-$l2),2)+ pow(($a1-$a2),2)+pow(($b1-$b2),2));
return round($d76,2);
}
function de94($l1,$a1,$b1,$l2,$a2,$b2) {
$cp=SQRT(pow($a1,2)+pow($b1,2));
$ctp=SQRT(pow($a2,2)+pow($b2,2));
$d76=sqrt(pow(($l1-$l2),2)+ pow(($a1-$a2),2)+pow(($b1-$b2),2));
$dph=SQRT(ABS(pow($d76,2)-pow(($l1-$l2),2)-pow((SQRT(pow($a1,2)+pow($b1,2))-SQRT(pow($a2,2)+pow($b2,2))),2)));
$dcp=$ctp-$cp;
$d94=SQRT((pow((($l1-$l2)/(1*1)),2))+pow(($dcp/(1*(1+(0.045*$cp)))),2)+ pow(($dph/(1*(1+(0.015*$cp)))),2));
return round($d94,2);
}
$dc76=de76($cl,$ca,$cb,$cLm,$cam,$cbm);
$dm76=de76($ml,$ma,$mb,$mLm,$mam,$mbm);
$dy76=de76($yl,$ya,$yb,$yLm,$yam,$ybm);
$dk76=de76($kl,$ka,$kb,$kLm,$kam,$kbm);
$dgl=58-$gLm;
$dga=($Pam/2)-$gam;
$dgb=($Pbm/2)-$gbm;
$df=sqrt(pow($dga,2)+pow($dga,2));
$dt=50;
$wa=$Pam*(100-$dt)/100;
$wb=$Pbm*(100-$dt)/100;
//$df= pow((pow(($gam-$wa),2))+(pow(($gbm-$wb),2)),0.5)*(1-max(0,($dt-50)/50*0.75));
//$df50=$df;
echo "df".$df."<br>";
?>
<tr bgcolor="#aaaaaa">
<td><div align="center">DD</div></td>
<td><div align="right"></div></td>
<td bgcolor="#00FFFF"><font color='<?php if ($dc76>5){echo "red";}else {echo "black";}?>'><div align="right"><?php echo round($dc76,2);?></div></td>
<td bgcolor="#FF99FF"><font color='<?php if ($dm76>5){echo "red";}else {echo "black";}?>'><div align="right"><?php echo round($dm76,2);?></div></td>
<td bgcolor="#FFFF99"><font color='<?php if ($dy76>5){echo "red";}else {echo "black";}?>'><div align="right"><?php echo round($dy76,2);?></div></td>
<td bgcolor="#aaaaaa"><font color='<?php if ($dk76>5){echo "red";}else {echo "black";}?>'><div align="right"><?php echo round($dk76,2);?></div></td>
<td bgcolor="#ffffff">TVI</td>
<td bgcolor="#00FFFF"><font color='<?php if ($c50TVI>4 or $c50TVI<-4){echo "red";}else {echo "black";}?>'><div align="right"><?php echo round($c50TVI,2);?></div></td>
<td bgcolor="#FF99FF"><font color='<?php if ($m50TVI>4 or $m50TVI<-4){echo "red";}else {echo "black";}?>'><div align="right"><?php echo round($m50TVI,2);?></div></td>
<td bgcolor="#FFFF99"><font color='<?php if ($y50TVI>4 or $y50TVI<-4){echo "red";}else {echo "black";}?>'><div align="right"><?php echo round($y50TVI,2);?></div></td>
<td bgcolor="#aaaaaa"><font color='<?php if ($k50TVI>4 or $k50TVI<-4){echo "red";}else {echo "black";}?>'><div align="right"><?php echo round($k50TVI,2);?></div></td>
<td bgcolor="#ffffff">G7</td>
<td><div align="right"><font color='<?php if ($df>3){echo "red";}else {echo "black";}?>'><?php echo round($dgl,2);?></div></td>
<td><div align="right"><font color='<?php if ($df>3){echo "red";}else {echo "black";}?>'><?php echo round($dga,2);?></div></td>
<td><div align="right"><font color='<?php if ($df>3){echo "red";}else {echo "black";}?>'><?php echo round($dgb,2);?></div></td>
</tr>
<tr>
<td><div align="center">Action</div></td>
<td bgcolor="#CCCCCC"><div align="right"></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php if ($cLm-$cl>1) {echo "+";} elseif ($cLm-$cl<-1) {echo "-";} else {echo "*";}?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php if ($mLm-$ml>1) {echo "+";} elseif ($mLm-$ml<-1) {echo "-";} else {echo "*";}?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php if ($yLm-$yl>1) {echo "+";} elseif ($yLm-$yl<-1) {echo "-";} else {echo "*";}?></div></td>
<td bgcolor="#aaaaaa"><div align="right"><?php if ($kLm-$kl>1) {echo "+";} elseif ($kLm-$kl<-1) {echo "-";} else {echo "*";}?></div></td>
<td>TVI</td>
<td bgcolor="#00FFFF"><div align="right"><?php if ($c50TVI<0) {echo "+";} else {echo "-";}?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php if ($m50TVI<0) {echo "+";} else {echo "-";}?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php if ($y50TVI<0) {echo "+";} else {echo "-";}?></div></td>
<td bgcolor="#aaaaaa"><div align="right"><?php if ($k50TVI<0) {echo "+";} else {echo "-";}?></div></td>
<td>G7</td>
<td bgcolor="#00FFFF"><div align="right"><?php
if ($dgl<-0.3 and $dga<-0.3 and $dgb>0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga<0.3 and $dga>-0.3 and $dgb>0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga>0.3 and $dgb>0.3) {
echo "+";}
elseif ($dgl<-0.3 and $dga>0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "+";}
elseif ($dgl<-0.3 and -0.3<$dga and $dga<0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga>0.3 and $dgb<-0.3) {
echo "+";}
elseif ($dgl<-0.3 and -0.3<$dga and $dga<0.3 and $dgb<-0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga<-0.3 and $dgb<-0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga<-0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "++";}
////////////////////////////////////////////////////////////////////////////////////////////
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<-0.3 and $dgb>0.3) {
echo "+";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<0.3 and $dga>-0.3 and $dgb>0.3) {
echo "";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>0.3 and $dgb>0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>-0.3 and $dga<0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>0.3 and $dgb<-0.3) {
echo "";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>-0.3 and $dga<0.3 and $dgb<-0.3) {
echo "";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<-0.3 and $dgb<-0.3) {
echo "+";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<-0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "+";}
///////////////////////////////////////////////////////////////////////////////////////////
elseif ($dgl>-0.3 and $dga<-0.3 and $dgb>0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dga<0.3 and $dga>-0.3 and $dgb>0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga>0.3 and $dgb>0.3) {
echo "---";}
elseif ($dgl>-0.3 and $dga>0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "--";}
elseif ($dgl>-0.3 and -0.3<$dga and $dga<0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga>0.3 and $dgb<-0.3) {
echo "--";}
elseif ($dgl>-0.3 and -0.3<$dga and $dga<0.3 and $dgb<-0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga<-0.3 and $dgb<-0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dga<-0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "-";}
?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php
if ($dgl<-0.3 and $dga<-0.3 and $dgb>0.3) {
echo "+";}
elseif ($dgl<-0.3 and $dga<0.3 and $dga>-0.3 and $dgb>0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga>0.3 and $dgb>0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga>0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "++";}
elseif ($dgl<-0.3 and -0.3<$dga and $dga<0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga>0.3 and $dgb<-0.3) {
echo "++";}
elseif ($dgl<-0.3 and -0.3<$dga and $dga<0.3 and $dgb<-0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga<-0.3 and $dgb<-0.3) {
echo "+";}
elseif ($dgl<-0.3 and $dga<-0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "+";}
////////////////////////////////////////////////////////////////////////////////////////////
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<-0.3 and $dgb>0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<0.3 and $dga>-0.3 and $dgb>0.3) {
echo "";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>0.3 and $dgb>0.3) {
echo "+";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "+";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>-0.3 and $dga<0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>0.3 and $dgb<-0.3) {
echo "+";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>-0.3 and $dga<0.3 and $dgb<-0.3) {
echo "";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<-0.3 and $dgb<-0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<-0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "-";}
///////////////////////////////////////////////////////////////////////////////////////////
elseif ($dgl>-0.3 and $dga<-0.3 and $dgb>0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga<0.3 and $dga>-0.3 and $dgb>0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga>0.3 and $dgb>0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dga>0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "-";}
elseif ($dgl>-0.3 and -0.3<$dga and $dga<0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga>0.3 and $dgb<-0.3) {
echo "-";}
elseif ($dgl>-0.3 and -0.3<$dga and $dga<0.3 and $dgb<-0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga<-0.3 and $dgb<-0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga<-0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "--";}
?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php
if ($dgl<-0.3 and $dga<-0.3 and $dgb>0.3) {
echo "+++";}
elseif ($dgl<-0.3 and $dga<0.3 and $dga>-0.3 and $dgb>0.3) {
echo "+++";}
elseif ($dgl<-0.3 and $dga>0.3 and $dgb>0.3) {
echo "+++";}
elseif ($dgl<-0.3 and $dga>0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "++";}
elseif ($dgl<-0.3 and -0.3<$dga and $dga<0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "++";}
elseif ($dgl<-0.3 and $dga>0.3 and $dgb<-0.3) {
echo "";}
elseif ($dgl<-0.3 and -0.3<$dga and $dga<0.3 and $dgb<-0.3) {
echo "+";}
elseif ($dgl<-0.3 and $dga<-0.3 and $dgb<-0.3) {
echo "+";}
elseif ($dgl<-0.3 and $dga<-0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "++";}
////////////////////////////////////////////////////////////////////////////////////////////
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<-0.3 and $dgb>0.3) {
echo "+";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<0.3 and $dga>-0.3 and $dgb>0.3) {
echo "+";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>0.3 and $dgb>0.3) {
echo "+";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>-0.3 and $dga<0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>0.3 and $dgb<-0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga>-0.3 and $dga<0.3 and $dgb<-0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<-0.3 and $dgb<-0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dgl<0.3 and $dga<-0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "";}
///////////////////////////////////////////////////////////////////////////////////////////
elseif ($dgl>-0.3 and $dga<-0.3 and $dgb>0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dga<0.3 and $dga>-0.3 and $dgb>0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dga>0.3 and $dgb>0.3) {
echo "-";}
elseif ($dgl>-0.3 and $dga>0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "--";}
elseif ($dgl>-0.3 and -0.3<$dga and $dga<0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga>0.3 and $dgb<-0.3) {
echo "---";}
elseif ($dgl>-0.3 and -0.3<$dga and $dga<0.3 and $dgb<-0.3) {
echo "---";}
elseif ($dgl>-0.3 and $dga<-0.3 and $dgb<-0.3) {
echo "--";}
elseif ($dgl>-0.3 and $dga<-0.3 and 0.3>$dgb and $dgb>-0.3) {
echo "-";}
?></div></td>
</tr>
<tr>
<td><div align="center">Den</div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php echo round($koptD,2).$kdi;?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($coptD,2).$cdi;?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo round($moptD,2).$mdi;?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo round($yoptD,2).$ydi;?></div></td>
<td bgcolor="#daffc2"><div align="right"><?php echo round($soptD,2).$sdi;?></div></td>
</tr>
<tr>
<td><div align="center">DeltaE</div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php if ($kmin>5) {?><font color="red"><?php } echo $kmin;?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php if ($cmin>5) {?><font color="red"><?php } echo $cmin;?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php if ($mmin>5) {?><font color="red"><?php } echo $mmin;?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php if ($ymin>5) {?><font color="red"><?php } echo $ymin;?></div></td>
<td bgcolor="#daffc2"><div align="right"><?php if ($smin>5) {?><font color="red"><?php } echo $smin;?></div></td>
<td>
<input type="submit" name="submit" value="Set OK">
</td>
</tr>
</table>
<tr></tr>
<table>
<div>
<?php
if ($plK==1) {
include 'graphFix.php';
GenGraph(0.01,$k2d-$koptD,$k3d-$koptD,$k4d-$koptD,$k5d-$koptD,$k6d-$koptD,$k7d-$koptD,$k8d-$koptD,$k9d-$koptD,$k10d-$koptD,$k11d-$koptD,$k12d-$koptD,$k13d-$koptD,$k14d-$koptD,$k15d-$koptD,$k16d-$koptD,$k17d-$koptD,$k18d-$koptD,0.01);
GenGraphT($k8T,$k17T);
?>
<img src="graph.gif"><img src="graphT.gif">
</div>
</table>
<table>
<div>
<?php }
if ($plC==1) {
include 'graphFix2.php';
GenGraph2($c1d-$coptD,$c2d-$coptD,$c3d-$coptD,$c4d-$coptD,$c5d-$coptD,$c6d-$coptD,$c7d-$coptD,$c8d-$coptD,$c9d-$coptD,$c10d-$coptD,$c11d-$coptD,$c12d-$coptD,$c13d-$coptD,$c14d-$coptD,$c15d-$coptD,$c16d-$coptD,$c17d-$coptD,$c18d-$coptD,$c19d-$coptD);
GenGraphT2($c8T,$c17T);
?>
<img src="graph2.gif"><img src="graphT2.gif">
</div>
</table>
<table>
<table>
<div>
<?php }
if ($plM==1) {
include 'graphFix3.php';
GenGraph3($m1d-$moptD,$m2d-$moptD,$m3d-$moptD,$m4d-$moptD,$m5d-$moptD,$m6d-$moptD,$m7d-$moptD,$m8d-$moptD,$m9d-$moptD,$m10d-$moptD,$m11d-$moptD,$m12d-$moptD,$m13d-$moptD,$m14d-$moptD,$m15d-$moptD,$m16d-$moptD,$m17d-$moptD,$m18d-$moptD,$m19d-$moptD);
GenGraphT3($m8T,$m17T);
?>
<img src="graph3.gif"><img src="graphT3.gif">
</div>
</table>
<table>
<div>
<?php }
if ($plY==1) {
include 'graphFix4.php';
GenGraph4(0.01,$y2d-$yoptD,$y3d-$yoptD,$y4d-$yoptD,$y5d-$yoptD,$y6d-$yoptD,$y7d-$yoptD,$y8d-$yoptD,$y9d-$yoptD,$y10d-$yoptD,$y11d-$yoptD,$y12d-$yoptD,$y13d-$yoptD,$y14d-$yoptD,$y15d-$yoptD,$y16d-$yoptD,$y17d-$yoptD,$y18d-$yoptD,0.01);
GenGraphT4($y8T,$y17T);
?>
<img src="graph4.gif"><img src="graphT4.gif">
</div>
</table>
<table>
<div>
<?php }
if ($plS1==1) {
include 'graphFix5.php';
GenGraph5(0.01,$s2d-$soptD,$s3d-$soptD,$s4d-$soptD,$s5d-$soptD,$s6d-$soptD,$s7d-$soptD,$s8d-$soptD,$s9d-$soptD,$s10d-$soptD,$s11d-$soptD,$s12d-$soptD,$s13d-$soptD,$s14d-$soptD,$s15d-$soptD,$s16d-$soptD,$s17d-$soptD,$s18d-$soptD,0.01);
GenGraphT5($s8T,$s17T);
?>
<img src="graph5.gif"><img src="graphT5.gif">
</div>
<?php } ?>
</table>
<table align="center">
<td>
</td>
</table>
<?php
$connection = mysql_connect("127.0.0.1", "root", "fredsql") or die ("Unable to connect!");
mysql_query("SET NAMES 'utf8'");
$db = "tvicheck-st";
// select database
mysql_select_db($db) or die ("Unable to select database!");
// generate and execute query
$query = "INSERT INTO fogra123(company, contact, email, type, filename, score, passbit, ddate, device, dsn, printer, PO, strip, paper, ink, rankbit,k100,k80,k40,c100,c80,c40,m100,m80,m40,y100,y80,y40) VALUES('$company', '$contact', '$email', '$type', '$filedb','$Rsum', '$passbit', NOW(), '$device', '$dsn', '$dbstr[0]', '$dbstr[1]', '$dbstr[2]', '$paper', '$ink', '$rankbit', '$k4d','$k80db', '$k40db', '$c4d','$c80db', '$c40db', '$m4d','$m80db', '$m40db', '$y4d','$y80db', '$y40db')";
//echo $query;
$result = mysql_query($query) or die ("Error in query: $query. " . mysql_error());
mysql_close($connection);
?>
<tr>
<td align="center"><font size="-2"> © <a href="mailto:[email protected]">Fred Kuo</a>, 2010. All rights reserved.<br><a href="http://www.fredkuo.idv.tw/wordpress/?p=1025">Read more.</a><br>
</td>
</tr>
</form>
<?php
}///////target process
else { ////2228
echo "content=1"."xx";
echo "2bd sec [26]:".$dot[26];
?>
<table width="200" border="1" align="center">
</table>
<p><p>
<table width="200" border="1" align="center">
<tr>
<td><div align="center">SID</div></td>
<td><font color="#666666">8</td>
<td><font color="#666666">9</td>
<td><font color="#666666">10</td>
<td><font color="#666666">11</td>
<td><font color="#666666">12</td>
<td><font color="#666666">13</td>
<td>14</td>
<td>15</td>
<td>16</td>
<td>17</td>
<td>18</td>
<td>19</td>
<td><font color="#aaaaaa">20</td>
<td><font color="#aaaaaa">21</td>
<td><font color="#aaaaaa">22</td>
<td><font color="#aaaaaa">23</td>
<td><font color="#aaaaaa">24</td>
<td><font color="#666666">25</td>
<td><font color="#666666">26</td>
</tr>
<?php
//////////////////////////////////////////////////Fogra Media Check
$psum=20;
$pl=95; $pa=-0.01;$pb=-2;
$cl=55.10; $ca=-37.0;$cb=-50;
$ml=48; $ma=74;$mb=-3;
$yl=89; $ya=-5;$yb=93;
$kl=16; $ka=0.01;$kb=0.01;
include 'densityV.php';
$cols=40;
$k1dd=0;
$Pdot=0;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-3;
${'k'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-5*($i-1)],$dot[9+$cols*$Pdot-5*($i-1)+1],$dot[9+$cols*$Pdot-5*($i-1)+2],$dot[9+$cols*$Pdot-5*($i-1)+3],$dot[9+$cols*$Pdot-5*($i-1)+4],$dot[9+$cols*$Pdot-5*($i-1)+5],$dot[9+$cols*$Pdot-5*($i-1)+6],$dot[9+$cols*$Pdot-5*($i-1)+7],$dot[9+$cols*$Pdot-5*($i-1)+8],$dot[9+$cols*$Pdot-5*($i-1)+9],$dot[9+$cols*$Pdot-5*($i-1)+10],$dot[9+$cols*$Pdot-5*($i-1)+11],$dot[9+$cols*$Pdot-5*($i-1)+12],$dot[9+$cols*$Pdot-5*($i-1)+13],$dot[9+$cols*$Pdot-5*($i-1)+14],$dot[9+$cols*$Pdot-5*($i-1)+15],$dot[9+$cols*$Pdot-5*($i-1)+16],$dot[9+$cols*$Pdot-5*($i-1)+17],$dot[9+$cols*$Pdot-5*($i-1)+18],$dot[9+$cols*$Pdot-5*($i-1)+19],$dot[9+$cols*$Pdot-5*($i-1)+20],$dot[9+$cols*$Pdot-5*($i-1)+21],$dot[9+$cols*$Pdot-5*($i-1)+22],$dot[9+$cols*$Pdot-5*($i-1)+23],$dot[9+$cols*$Pdot-5*($i-1)+24],$dot[9+$cols*$Pdot-5*($i-1)+25],$dot[9+$cols*$Pdot-5*($i-1)+26],$dot[9+$cols*$Pdot-5*($i-1)+27],$dot[9+$cols*$Pdot-5*($i-1)+28],$dot[9+$cols*$Pdot-5*($i-1)+29],$dot[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-5*($i-1)],$dot[9+$cols*$Pdot-5*($i-1)+1],$dot[9+$cols*$Pdot-5*($i-1)+2],$dot[9+$cols*$Pdot-5*($i-1)+3],$dot[9+$cols*$Pdot-5*($i-1)+4],$dot[9+$cols*$Pdot-5*($i-1)+5],$dot[9+$cols*$Pdot-5*($i-1)+6],$dot[9+$cols*$Pdot-5*($i-1)+7],$dot[9+$cols*$Pdot-5*($i-1)+8],$dot[9+$cols*$Pdot-5*($i-1)+9],$dot[9+$cols*$Pdot-5*($i-1)+10],$dot[9+$cols*$Pdot-5*($i-1)+11],$dot[9+$cols*$Pdot-5*($i-1)+12],$dot[9+$cols*$Pdot-5*($i-1)+13],$dot[9+$cols*$Pdot-5*($i-1)+14],$dot[9+$cols*$Pdot-5*($i-1)+15],$dot[9+$cols*$Pdot-5*($i-1)+16],$dot[9+$cols*$Pdot-5*($i-1)+17],$dot[9+$cols*$Pdot-5*($i-1)+18],$dot[9+$cols*$Pdot-5*($i-1)+19],$dot[9+$cols*$Pdot-5*($i-1)+20],$dot[9+$cols*$Pdot-5*($i-1)+21],$dot[9+$cols*$Pdot-5*($i-1)+22],$dot[9+$cols*$Pdot-5*($i-1)+23],$dot[9+$cols*$Pdot-5*($i-1)+24],$dot[9+$cols*$Pdot-5*($i-1)+25],$dot[9+$cols*$Pdot-5*($i-1)+26],$dot[9+$cols*$Pdot-5*($i-1)+27],$dot[9+$cols*$Pdot-5*($i-1)+28],$dot[9+$cols*$Pdot-5*($i-1)+29],$dot[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-5*($i-1)],$dot[9+$cols*$Pdot-5*($i-1)+1],$dot[9+$cols*$Pdot-5*($i-1)+2],$dot[9+$cols*$Pdot-5*($i-1)+3],$dot[9+$cols*$Pdot-5*($i-1)+4],$dot[9+$cols*$Pdot-5*($i-1)+5],$dot[9+$cols*$Pdot-5*($i-1)+6],$dot[9+$cols*$Pdot-5*($i-1)+7],$dot[9+$cols*$Pdot-5*($i-1)+8],$dot[9+$cols*$Pdot-5*($i-1)+9],$dot[9+$cols*$Pdot-5*($i-1)+10],$dot[9+$cols*$Pdot-5*($i-1)+11],$dot[9+$cols*$Pdot-5*($i-1)+12],$dot[9+$cols*$Pdot-5*($i-1)+13],$dot[9+$cols*$Pdot-5*($i-1)+14],$dot[9+$cols*$Pdot-5*($i-1)+15],$dot[9+$cols*$Pdot-5*($i-1)+16],$dot[9+$cols*$Pdot-5*($i-1)+17],$dot[9+$cols*$Pdot-5*($i-1)+18],$dot[9+$cols*$Pdot-5*($i-1)+19],$dot[9+$cols*$Pdot-5*($i-1)+20],$dot[9+$cols*$Pdot-5*($i-1)+21],$dot[9+$cols*$Pdot-5*($i-1)+22],$dot[9+$cols*$Pdot-5*($i-1)+23],$dot[9+$cols*$Pdot-5*($i-1)+24],$dot[9+$cols*$Pdot-5*($i-1)+25],$dot[9+$cols*$Pdot-5*($i-1)+26],$dot[9+$cols*$Pdot-5*($i-1)+27],$dot[9+$cols*$Pdot-5*($i-1)+28],$dot[9+$cols*$Pdot-5*($i-1)+29],$dot[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'l'}=xyz2lab01("l",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'a'}=xyz2lab01("a",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'b'}=xyz2lab01("b",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'d'}=DensitySp("K",$dot[9+$cols*$Pdot-5*($i-1)],$dot[9+$cols*$Pdot-5*($i-1)+1],$dot[9+$cols*$Pdot-5*($i-1)+2],$dot[9+$cols*$Pdot-5*($i-1)+3],$dot[9+$cols*$Pdot-5*($i-1)+4],$dot[9+$cols*$Pdot-5*($i-1)+5],$dot[9+$cols*$Pdot-5*($i-1)+6],$dot[9+$cols*$Pdot-5*($i-1)+7],$dot[9+$cols*$Pdot-5*($i-1)+8],$dot[9+$cols*$Pdot-5*($i-1)+9],$dot[9+$cols*$Pdot-5*($i-1)+10],$dot[9+$cols*$Pdot-5*($i-1)+11],$dot[9+$cols*$Pdot-5*($i-1)+12],$dot[9+$cols*$Pdot-5*($i-1)+13],$dot[9+$cols*$Pdot-5*($i-1)+14],$dot[9+$cols*$Pdot-5*($i-1)+15],$dot[9+$cols*$Pdot-5*($i-1)+16],$dot[9+$cols*$Pdot-5*($i-1)+17],$dot[9+$cols*$Pdot-5*($i-1)+18],$dot[9+$cols*$Pdot-5*($i-1)+19],$dot[9+$cols*$Pdot-5*($i-1)+20],$dot[9+$cols*$Pdot-5*($i-1)+21],$dot[9+$cols*$Pdot-5*($i-1)+22],$dot[9+$cols*$Pdot-5*($i-1)+23],$dot[9+$cols*$Pdot-5*($i-1)+24],$dot[9+$cols*$Pdot-5*($i-1)+25],$dot[9+$cols*$Pdot-5*($i-1)+26],$dot[9+$cols*$Pdot-5*($i-1)+27],$dot[9+$cols*$Pdot-5*($i-1)+28],$dot[9+$cols*$Pdot-5*($i-1)+29],$dot[9+$cols*$Pdot-5*($i-1)+30]);
}
echo "note 9d:".$k9d."__";
/////////////////////////////////c
$c1X=spXYZ("X", $dot[89],$dot[90],$dot[91],$dot[92],$dot[93],$dot[94],$dot[95],$dot[96],$dot[97],$dot[98],$dot[99],$dot[100],$dot[101],$dot[102],$dot[103],$dot[104],$dot[105],$dot[106],$dot[107],$dot[108],$dot[109],$dot[110],$dot[111],$dot[112],$dot[113],$dot[114],$dot[115],$dot[116],$dot[117],$dot[118],$dot[119]);
$c1Y=spXYZ("Y", $dot[89],$dot[90],$dot[91],$dot[92],$dot[93],$dot[94],$dot[95],$dot[96],$dot[97],$dot[98],$dot[99],$dot[100],$dot[101],$dot[102],$dot[103],$dot[104],$dot[105],$dot[106],$dot[107],$dot[108],$dot[109],$dot[110],$dot[111],$dot[112],$dot[113],$dot[114],$dot[115],$dot[116],$dot[117],$dot[118],$dot[119]);
$c1Z=spXYZ("Z", $dot[89],$dot[90],$dot[91],$dot[92],$dot[93],$dot[94],$dot[95],$dot[96],$dot[97],$dot[98],$dot[99],$dot[100],$dot[101],$dot[102],$dot[103],$dot[104],$dot[105],$dot[106],$dot[107],$dot[108],$dot[109],$dot[110],$dot[111],$dot[112],$dot[113],$dot[114],$dot[115],$dot[116],$dot[117],$dot[118],$dot[119]);
$c1l=xyz2lab01("l",$c1X,$c1Y,$c1Z);
$c1a=xyz2lab01("a",$c1X,$c1Y,$c1Z);
$c1b=xyz2lab01("b",$c1X,$c1Y,$c1Z);
$c1d=DensitySp("C", $dot[89],$dot[90],$dot[91],$dot[92],$dot[93],$dot[94],$dot[95],$dot[96],$dot[97],$dot[98],$dot[99],$dot[100],$dot[101],$dot[102],$dot[103],$dot[9],$dot[104],$dot[105],$dot[106],$dot[107],$dot[108],$dot[109],$dot[110],$dot[111],$dot[112],$dot[113],$dot[114],$dot[115],$dot[116],$dot[117],$dot[118],$dot[119]);
echo "note 1c:".$dot[89].$c1l."_".$c1a."_".$c1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-6;
${'c'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-(2+(5*($i-2)))],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-(2+(5*($i-2)))],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-(2+(5*($i-2)))],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'l'}=xyz2lab01("l",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'a'}=xyz2lab01("a",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'b'}=xyz2lab01("b",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'d'}=DensitySp("C",$dot[9+$cols*$Pdot-(2+(5*($i-2)))],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////m
$m1X=spXYZ("X", $dot[128],$dot[129],$dot[130],$dot[131],$dot[132],$dot[133],$dot[134],$dot[135],$dot[136],$dot[137],$dot[138],$dot[139],$dot[140],$dot[141],$dot[142],$dot[143],$dot[144],$dot[145],$dot[146],$dot[147],$dot[148],$dot[149],$dot[150],$dot[151],$dot[152],$dot[153],$dot[154],$dot[155],$dot[156],$dot[157],$dot[158]);
$m1Y=spXYZ("Y", $dot[128],$dot[129],$dot[130],$dot[131],$dot[132],$dot[133],$dot[134],$dot[135],$dot[136],$dot[137],$dot[138],$dot[139],$dot[140],$dot[141],$dot[142],$dot[143],$dot[144],$dot[145],$dot[146],$dot[147],$dot[148],$dot[149],$dot[150],$dot[151],$dot[152],$dot[153],$dot[154],$dot[155],$dot[156],$dot[157],$dot[158]);
$m1Z=spXYZ("Z", $dot[128], $dot[129],$dot[130],$dot[131],$dot[132],$dot[133],$dot[134],$dot[135],$dot[136],$dot[137],$dot[138],$dot[139],$dot[140],$dot[141],$dot[142],$dot[143],$dot[144],$dot[145],$dot[146],$dot[147],$dot[148],$dot[149],$dot[150],$dot[151],$dot[152],$dot[153],$dot[154],$dot[155],$dot[156],$dot[157],$dot[158]);
$m1l=xyz2lab01("l",$m1X,$m1Y,$m1Z);
$m1a=xyz2lab01("a",$m1X,$m1Y,$m1Z);
$m1b=xyz2lab01("b",$m1X,$m1Y,$m1Z);
$m1d=DensitySp("M", $dot[128],$dot[129],$dot[130],$dot[131],$dot[132],$dot[133],$dot[134],$dot[135],$dot[136],$dot[137],$dot[138],$dot[139],$dot[140],$dot[141],$dot[142],$dot[143],$dot[144],$dot[145],$dot[146],$dot[147],$dot[148],$dot[149],$dot[150],$dot[151],$dot[152],$dot[153],$dot[154],$dot[155],$dot[156],$dot[157],$dot[158]);
echo "note 1m:".$dot[89].$m1l."_".$m1a."_".$m1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-5;
${'m'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-(3+(5*($i-2)))],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-(3+(5*($i-2)))],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-(3+(5*($i-2)))],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'l'}=xyz2lab01("l",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'a'}=xyz2lab01("a",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'b'}=xyz2lab01("b",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'d'}=DensitySp("M",$dot[9+$cols*$Pdot-(3+(5*($i-2)))],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////y
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-4;
${'y'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-(4+(5*($i-2)))],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-(4+(5*($i-2)))],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-(4+(5*($i-2)))],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'l'}=xyz2lab01("l",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'a'}=xyz2lab01("a",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'b'}=xyz2lab01("b",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'d'}=DensitySp("Y",$dot[9+$cols*$Pdot-(4+(5*($i-2)))],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
}
echo "note 2y:".$y2l."_".$y2a."_".$y2b;
///////////////////////////////////////////s
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-2;
${'s'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-(5+(5*($i-2)))],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-(5+(5*($i-2)))],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-(5+(5*($i-2)))],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'l'}=xyz2lab01("l",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'a'}=xyz2lab01("a",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'b'}=xyz2lab01("b",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'d'}=DensitySp("K",$dot[9+$cols*$Pdot-(5+(5*($i-2)))],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
}
echo "note 2s:".$s2l."_".$s2a."_".$s2b."_".$s2d;
$sl=$s2l; $sa=$s2a;$sb=$s2b;
$k8_50d=$k8d;
echo "k8::".$k8_50d."__xx_";
$k17_50d=$k17d;
$c8_50d=$c8d;
$c17_50d=$c17d;
$m8_50d=$m8d;
$m17_50d=$m17d;
$y8_50d=$y8d;
$y17_50d=$y17d;
$s8_50d=$s8d;
$s17_50d=$s17d;
$k8l=($k7l+$k9l)/2;$k8a=($k7a+$k9a)/2;$k8b=($k7b+$k9b)/2;$k8d=($k7d+$k9d)/2;
$c8l=($c7l+$c9l)/2;$c8a=($c7a+$c9a)/2;$c8b=($c7b+$c9b)/2;$c8d=($c7d+$c9d)/2;
$m8l=($m7l+$m9l)/2;$m8a=($m7a+$m9a)/2;$m8b=($m7b+$m9b)/2;$m8d=($m7d+$m9d)/2;
$y8l=($y7l+$y9l)/2;$y8a=($y7a+$y9a)/2;$y8b=($y7b+$y9b)/2;$y8d=($y7d+$y9d)/2;
$s8l=($s7l+$s9l)/2;$s8a=($s7a+$s9a)/2;$s8b=($s7b+$s9b)/2;$s8d=($s7d+$s9d)/2;
$k17l=($k18l+$k16l)/2;$k17a=($k18a+$k16a)/2;$k17b=($k18b+$k16b)/2;$k17d=($k18d+$k16d)/2;
$c17l=($c18l+$c16l)/2;$c17a=($c18a+$c16a)/2;$c17b=($c18b+$c16b)/2;$c17d=($c18d+$c16d)/2;
$m17l=($m18l+$m16l)/2;$m17a=($m18a+$m16a)/2;$m17b=($m18b+$m16b)/2;$m17d=($m18d+$m16d)/2;
$y17l=($y18l+$y16l)/2;$y17a=($y18a+$y16a)/2;$y17b=($y18b+$y16b)/2;$y17d=($y18d+$y16d)/2;
$s17l=($s18l+$s16l)/2;$s17a=($s18a+$s16a)/2;$s17b=($s18b+$s16b)/2;$s17d=($s18d+$s16d)/2;
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$pl=95; $pa=-0.01;$pb=-2;
$cl=55.10; $ca=-37.0;$cb=-50;
$ml=48; $ma=74;$mb=-3;
$yl=89; $ya=-5;$yb=93;
$kl=16; $ka=0.01;$kb=0.01;
// include 'densityV.php';
$cols=40;
$k1dd=0;
$Pdot=0;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-3;
${'k'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'lT'}=xyz2lab01("l",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'aT'}=xyz2lab01("a",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'bT'}=xyz2lab01("b",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'dT'}=DensitySp("K",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
}
echo "note 9dT:".$k9dT."__";
/////////////////////////////////c
$c1X=spXYZ("X", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
$c1Y=spXYZ("Y", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
$c1Z=spXYZ("Z", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
$c1lT=xyz2lab01("l",$c1X,$c1Y,$c1Z);
$c1aT=xyz2lab01("a",$c1X,$c1Y,$c1Z);
$c1bT=xyz2lab01("b",$c1X,$c1Y,$c1Z);
$c1dT=DensitySp("C", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[9],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
echo "note 1c:".$dotT[89].$c1l."_".$c1a."_".$c1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-6;
${'c'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'lT'}=xyz2lab01("l",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'aT'}=xyz2lab01("a",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'bT'}=xyz2lab01("b",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'dT'}=DensitySp("C",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////m
$m1X=spXYZ("X", $dotT[128],$dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
$m1Y=spXYZ("Y", $dotT[128],$dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
$m1Z=spXYZ("Z", $dotT[128], $dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
$m1lT=xyz2lab01("l",$m1X,$m1Y,$m1Z);
$m1aT=xyz2lab01("a",$m1X,$m1Y,$m1Z);
$m1bT=xyz2lab01("b",$m1X,$m1Y,$m1Z);
$m1dT=DensitySp("M", $dotT[128],$dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
echo "note 1m:".$dotT[89].$m1l."_".$m1a."_".$m1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-5;
${'m'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'lT'}=xyz2lab01("l",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'aT'}=xyz2lab01("a",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'bT'}=xyz2lab01("b",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'dT'}=DensitySp("M",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////y
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-4;
${'y'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'lT'}=xyz2lab01("l",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'aT'}=xyz2lab01("a",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'bT'}=xyz2lab01("b",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'dT'}=DensitySp("Y",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
}
echo "note 2y:".$y2l."_".$y2a."_".$y2b;
///////////////////////////////////////////s
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-2;
${'s'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'lT'}=xyz2lab01("l",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'aT'}=xyz2lab01("a",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'bT'}=xyz2lab01("b",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'dT'}=DensitySp("K",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
}
echo "note 2s:".$s2l."_".$s2a."_".$s2b."_".$s2d;
$sl=$s2l; $sa=$s2a;$sb=$s2b;
$k8_50dT=$k8dT;
echo "k8T::".$k8_50dT."__xx_";
$k17_50dT=$k17dT;
$c8_50dT=$c8dT;
$c17_50dT=$c17dT;
$m8_50dT=$m8dT;
$m17_50dT=$m17dT;
$y8_50dT=$y8dT;
$y17_50dT=$y17dT;
$s8_50dT=$s8dT;
$s17_50dT=$s17dT;
$k8lT=($k7lT+$k9lT)/2;$k8aT=($k7aT+$k9aT)/2;$k8bT=($k7bT+$k9bT)/2;$k8dT=($k7dT+$k9dT)/2;
$c8lT=($c7lT+$c9lT)/2;$c8aT=($c7aT+$c9aT)/2;$c8bT=($c7bT+$c9bT)/2;$c8dT=($c7dT+$c9dT)/2;
$m8lT=($m7lT+$m9lT)/2;$m8aT=($m7aT+$m9aT)/2;$m8bT=($m7bT+$m9bT)/2;$m8dT=($m7dT+$m9dT)/2;
$y8lT=($y7lT+$y9lT)/2;$y8aT=($y7aT+$y9aT)/2;$y8bT=($y7bT+$y9bT)/2;$y8dT=($y7dT+$y9dT)/2;
$s8lT=($s7lT+$s9lT)/2;$s8aT=($s7aT+$s9aT)/2;$s8bT=($s7bT+$s9bT)/2;$s8dT=($s7dT+$s9dT)/2;
$k17lT=($k18lT+$k16lT)/2;$k17aT=($k18aT+$k16aT)/2;$k17bT=($k18bT+$k16bT)/2;$k17dT=($k18dT+$k16dT)/2;
$c17lT=($c18lT+$c16lT)/2;$c17aT=($c18aT+$c16aT)/2;$c17bT=($c18bT+$c16bT)/2;$c17dT=($c18dT+$c16dT)/2;
$m17lT=($m18lT+$m16lT)/2;$m17aT=($m18aT+$m16aT)/2;$m17bT=($m18bT+$m16bT)/2;$m17dT=($m18dT+$m16dT)/2;
$y17lT=($y18lT+$y16lT)/2;$y17aT=($y18aT+$y16aT)/2;$y17bT=($y18bT+$y16bT)/2;$y17dT=($y18dT+$y16dT)/2;
$s17lT=($s18lT+$s16lT)/2;$s17aT=($s18aT+$s16aT)/2;$s17bT=($s18bT+$s16bT)/2;$s17dT=($s18dT+$s16dT)/2;
// $c30l=$dotT[862]; $c30a=$dotT[863];$c30b=$dotT[864];$c30d=$dotT[866];
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
function de76($l1,$a1,$b1,$l2,$a2,$b2) {
$d76=sqrt(pow(($l1-$l2),2)+ pow(($a1-$a2),2)+pow(($b1-$b2),2));
return round($d76,2);
}
$dk576=de76($k5lT,$k5aT,$k5bT,$k5l,$k5a,$k5b);
$dk1076=de76($k10lT,$k10aT,$k10bT,$k10l,$k10a,$k10b);
$dk1576=de76($k15lT,$k15aT,$k15bT,$k15l,$k15a,$k15b);
// $c30l=$dotT[862]; $c30a=$dotT[863];$c30b=$dotT[864];$c30d=$dotT[866];
if ($plK==1) {?>
<tr bgcolor="#aaaaaa">
<td><div align="center">KE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dk576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dk576,2);?></div></td>
<td></td>
<td><?php echo $k8dTVT-$k8dTV;?> </td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dk1076>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dk1076,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dk1576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dk1576,2);?></div></td>
<td></td>
<td><?php echo $k17dTVT-$k17dTV;?> </td>
<td></td>
<td><div align="right"></td>
</tr>
<?php }
if ($plC==1) {
$dc576=de76($c5lT,$c5aT,$c5bT,$c5l,$c5a,$c5b);
$dc1076=de76($c10lT,$c10aT,$c10bT,$c10l,$c10a,$c10b);
$dc1576=de76($c15lT,$c15aT,$c15bT,$c15l,$c15a,$c15b);
// $c30l=$dotT[862]; $c30a=$dotT[863];$c30b=$dotT[864];$c30d=$dotT[866];
?>
<tr bgcolor="#b1e5ff">
<td><div align="center">cE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dc576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dc576,2);?></div></td>
<td></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round(($c8dTVT-$c8dTV),2);?></div></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dc1076>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dc1076,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dc1576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dc1576,2);?></div></td>
<td></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round(($c17dTVT-$c17dTV),2);?></div></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php }
if ($plM==1) {
$dm576=de76($m5lT,$m5aT,$m5bT,$m5l,$m5a,$m5b);
$dm1076=de76($m10lT,$m10aT,$m10bT,$m10l,$m10a,$m10b);
$dm1576=de76($m15lT,$m15aT,$m15bT,$m15l,$m15a,$m15b);
?>
<tr bgcolor="#e9bed7">
<td><div align="center">mE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dm576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dm576,2);?></div></td>
<td></td>
<td bgcolor="#FF00FF"><div align="right"><?php echo round(($m8dTVT-$m8dTV),2);?></div></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dm1076>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dm1076,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dm1576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dm1576,2);?></div></td>
<td></td>
<td bgcolor="#FF00FF"><div align="right"><?php echo round(($m17dTVT-$m17dTV),2);?></div></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php }
if ($plY==1) {
$dy576=de76($y5lT,$y5aT,$y5bT,$y5l,$y5a,$y5b);
$dy1076=de76($y10lT,$y10aT,$y10bT,$y10l,$y10a,$y10b);
$dy1576=de76($y15lT,$y15aT,$y15bT,$y15l,$y15a,$y15b);
?>
<tr bgcolor="#f2ebc0">
<td><div align="center">yE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dy576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dy576,2);?></div></td>
<td></td>
<td bgcolor="yellow"><div align="right"><?php echo round(($y8dTVT-$y8dTV),2);?></div></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dy1076>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dy1076,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dy1576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dy1576,2);?></div></td>
<td></td>
<td bgcolor="yellow"><div align="right"><?php echo round(($y17dTVT-$y17dTV),2);?></div></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php }
if ($plS1==1) { /////////////////////////////////////////////////////////////////////////////////////////////////s1
$ds576=de76($s5lT,$s5aT,$s5bT,$s5l,$s5a,$s5b);
$ds1076=de76($s10lT,$s10aT,$s10bT,$s10l,$s10a,$s10b);
$ds1576=de76($s15lT,$s15aT,$s15bT,$s15l,$s15a,$s15b);
?>
<tr bgcolor="#daffc2">
<td><div align="center">sE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($ds576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($ds576,2);?></div></td>
<td></td>
<td bgcolor="green"><div align="right"><?php echo round(($s8dTVT-$s8dTV),2);?></div></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($ds1076>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($ds1076,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($ds1576>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($ds1576,2);?></div></td>
<td></td>
<td bgcolor="green"><div align="right"><?php echo round(($s17dTVT-$s17dTV),2);?></div></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php }?>
<table>
<div>
<?php if ($plK==1) {
include 'graphFix.php';
GenGraph(0.01,$k2dT-$k2d,$k3dT-$k3d,$k4dT-$k4d,$k5dT-$k5d,$k6dT-$k6d,$k7dT-$k7d,$k8dT-$k8d,$k9dT-$k9d,$k10dT-$k10d,$k11dT-$k11d,$k12dT-$k12d,$k13dT-$k13d,$k14dT-$k14d,$k15dT-$k15d,$k16dT-$k16d,$k17dT-$k17d,$k18dT-$k18d,0.01);
GenGraphT($k8_50dT-$k8_50d,$k17_50dT-$k17_50d);
?>
<img src="graph.gif"><img src="graphT.gif">
</div>
</table>
<table>
<div>
<?php }
if ($plC==1) {
include 'graphFix2.php';
GenGraph2($c1dT-$c1d,$c2dT-$c2d,$c3dT-$c3d,$c4dT-$c4d,$c5dT-$c5d,$c6dT-$c6d,$c7dT-$c7d,$c8dT-$c8d,$c9dT-$c9d,$c10dT-$c10d,$c11dT-$c11d,$c12dT-$c12d,$c13dT-$c13d,$c14dT-$c14d,$c15dT-$c15d,$c16dT-$c16d,$c17dT-$c17d,$c18dT-$c18d,$c19dT-$c19d);
GenGraphT2($c8_50dT-$c8_50d,$c17_50dT-$c17_50d);
?>
<img src="graph2.gif"><img src="graphT2.gif">
</div>
</table>
<table>
<div>
<?php }
if ($plM==1) {
include 'graphFix3.php';
GenGraph3($m1dT-$m1d,$m2dT-$m2d,$m3dT-$m3d,$m4dT-$m4d,$m5dT-$m5d,$m6dT-$m6d,$m7dT-$m7d,$m8dT-$m8d,$m9dT-$m9d,$m10dT-$m10d,$m11dT-$m11d,$m12dT-$m12d,$m13dT-$m13d,$m14dT-$m14d,$m15dT-$m15d,$m16dT-$m16d,$m17dT-$m17d,$m18dT-$m18d,$m19dT-$m19d);
GenGraphT3($m8_50dT-$m8_50d,$m17_50dT-$m17_50d);
?>
<img src="graph3.gif"><img src="graphT3.gif">
</div>
</table>
<table>
<div>
<?php }
if ($plY==1) {
include 'graphFix4.php';
GenGraph4(0.01,$y2dT-$y2d,$y3dT-$y3d,$y4dT-$y4d,$y5dT-$y5d,$y6dT-$y6d,$y7dT-$y7d,$y8dT-$y8d,$y9dT-$y9d,$y10dT-$y10d,$y11dT-$y11d,$y12dT-$y12d,$y13dT-$y13d,$y14dT-$y14d,$y15dT-$y15d,$y16dT-$y16d,$y17dT-$y17d,$y18dT-$y18d,0.01);
GenGraphT4($y8_50dT-$y8_50d,$y17_50dT-$y17_50d);
?>
<img src="graph4.gif"><img src="graphT4.gif">
</div>
</table>
<table>
<div>
<?php }
if ($plS1==1) {
include 'graphFix5.php';
GenGraph5(0.01,$s2dT-$s2d,$s3dT-$s3d,$s4dT-$s4d,$s5dT-$s5d,$s6dT-$s6d,$s7dT-$s7d,$s8dT-$s8d,$s9dT-$s9d,$s10dT-$s10d,$s11dT-$s11d,$s12dT-$s12d,$s13dT-$s13d,$s14dT-$s14d,$s15dT-$s15d,$s16dT-$s16d,$s17dT-$s17d,$s18dT-$s18d,0.01);
GenGraphT5($s8_50dT-$s8_50d,$s17_50dT-$s17_50d);
?>
<img src="graph5.gif"><img src="graphT5.gif">
</div>
<?php } ?>
</table>
<?php
$connection = mysql_connect("127.0.0.1", "root", "fredsql") or die ("Unable to connect!");
mysql_query("SET NAMES 'utf8'");
$db = "tvicheck-st";
// select database
mysql_select_db($db) or die ("Unable to select database!");
// generate and execute query
$query = "INSERT INTO Production (po, sNo, filename, target, ddate, pdate, press, paper, ink , cmmt, decc,dem,dey, dek, dec50,dem50, dey50,dek50,deg ) VALUES( '$po', '$sNo', '$filename','$target', NOW(), '$date_s', '$press', '$paper', '$ink', '$cmmt', '$dec','$dem', '$dey', '$dek', '$dec50', '$dem50', '$dey50', '$dek50', '$deg')";
//echo $query;
$result = mysql_query($query) or die ("Error in query: $query. " . mysql_error());
mysql_close($connection);
}
?>
<tr>
<td align="center"><font size="-2"> © <a href="mailto:[email protected]">Fred Kuo</a>, 2015. All rights reserved.<br><a href="http://www.fredkuo.idv.tw/wordpress/?p=1025">Read more.</a><br>
</td>
</tr>
</body>
</html>