File: C:/xampp/htdocs/Fogra778/6pmmTVI-parsingCTOKXBL0218.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>778-50 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
error_reporting(E_ALL ^ E_NOTICE);
//error_reporting(E_ALL ^ E_DEPRECATED);
//error_reporting(0);
$f321= $_GET['f321'];
$f123= $_GET['f123'];
$plK= $_GET['plK'];
$plC= $_GET['plC'];
$plM= $_GET['plM'];
$plY= $_GET['plY'];
$plS1= $_GET['plS1'];
$plS2= $_GET['plS2'];
$plS3= $_GET['plS3'];
$plS4= $_GET['plS4'];
$plS5= $_GET['plS5'];
$plS6= $_GET['plS6'];
$spl= $_GET['spl'];
$spa= $_GET['spa'];
$spb= $_GET['spb'];
$okName= $_GET['okName'];
$kopt='';
$copt='';
$mopt='';
$yopt='';
$sopt='';
$koptD='';
$coptD='';
$moptD='';
$yoptD='';
$soptD='';
$kdi='';
$cdi='';
$mdi='';
$ydi='';
$sdi='';
$cmin='';
$mmin='';
$ymin='';
$kmin='';
$smin='';
$dsum=900;
$asum=150;
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 = preg_replace("/\r\n?/", "\n", $string);//target file
$p = str_replace("\n", ',', $p);
//echo $p;
//$dotT = explode(",", $pt);
$datastring0=get_between($p,"BEGIN_DATA,",",END_DATA");
$dot = explode("\t", $datastring0);
$stringT = implode($contentT);
//echo $contents[20];
//echo $string;
$pt = preg_replace("/\r\n?/", "\n", $stringT);//upload file
$pt = str_replace("\n", ',', $pt);
//echo $pt;
//$dotT = explode(",", $pt);
$datastring=get_between($pt,"BEGIN_DATA,",",END_DATA");
$dotT = explode("\t", $datastring);
echo "<br>get first Lab: ".$dotT[6].",".$dotT[7].",".$dotT[8]."<br>";
echo "get 2nd Lab: ".$dotT[45].",".$dotT[46].",".$dotT[47]."<br>";
echo "get 3rd Lab: ".$dotT[162].",".$dotT[163].",".$dotT[164]."<br>";
echo "get 4th Lab: ".$dotT[201].",".$dotT[202].",".$dotT[203]."<br>";
echo "get 5th Lab: ".$dotT[240].",".$dotT[241].",".$dotT[242]."<br>";
$input1 = "input1.txt";
//$icclab="upload/".$filename."T.ti1";
$fh = fopen($input1, 'w') or die("can't open file");
$viHead="75"." ".$dotT[7]." ".$dotT[8];
fwrite($fh, $viHead);
fclose($fh);
exec("echo . | icclu -fb -ip -pl -s 255 sRGB.icm <input1.txt> out1.txt");
$frgb1="out1.txt";
$stringr1 = file($frgb1);
$rgb1 = implode($stringr1);
$dotR1 = explode(" ", $rgb1);
echo "<br>R7:".round($dotR1[7],0);
echo "<br>R8:".round($dotR1[8],0);
echo "<br>R9:".round($dotR1[9],0);
$R1=round($dotR1[7],0);
$G1=round($dotR1[8],0);
$B1=round($dotR1[9],0);
function RGBToHex($r, $g, $b) {
//String padding bug found and the solution put forth by Pete Williams (http://snipplr.com/users/PeteW)
$hex = "#";
$hex.= str_pad(dechex($r), 2, "0", STR_PAD_LEFT);
$hex.= str_pad(dechex($g), 2, "0", STR_PAD_LEFT);
$hex.= str_pad(dechex($b), 2, "0", STR_PAD_LEFT);
return $hex;
}
$ch1C=RGBToHex($R1,$G1,$B1);
//$ch1C=dechex(round($dotR1[7],0)).dechex(round($dotR1[8],0)).dechex(round($dotR1[9],0));
echo "<br>CH1Cr:".$ch1C."<br>";
$inserted = array( '0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0' ,'0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0');
array_splice( $dot, 0, 0, $inserted );
$inserted = array( '0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0' ,'0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0');
array_splice( $dotT, 0, 0, $inserted );
echo "dot86:".$dot[166]."xx";
if ($dot[166]=='-42.4') { //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">SID</div></td>
<td><font color="#aaaaaa">5</td>
<td><font color="#aaaaaa">6</td>
<td><font color="#aaaaaa">7</td>
<td><font color="#aaaaaa">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><font color="#666666">14</td>
<td><font color="#666666">15</td>
<td><font color="#666666">16</td>
<td>17</td>
<td>18</td>
<td>19</td>
<td>20</td>
<td>21</td>
<td>22</td>
<td>23</td>
<td><font color="#666666">24</td>
<td><font color="#666666">25</td>
<td><font color="#666666">26</td>
<td>27</td>
<td>28</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",$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.'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",$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 "<br>note K13xyz:".$k13X."_".$k13Y."_".$k13Z."xx<br>";
echo "note K13L:".$k13l."_".$k13a."_".$k13b."xx";
/////////////////////////////////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]);
$c1l=xyz2lab01("l",$c1X,$c1Y,$c1Z);
$c1a=xyz2lab01("a",$c1X,$c1Y,$c1Z);
$c1b=xyz2lab01("b",$c1X,$c1Y,$c1Z);
$c1d=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.'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",$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 c2L:".$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]);
$m1l=xyz2lab01("l",$m1X,$m1Y,$m1Z);
$m1a=xyz2lab01("a",$m1X,$m1Y,$m1Z);
$m1b=xyz2lab01("b",$m1X,$m1Y,$m1Z);
$m1d=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.'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",$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 m2L".$m2l."_".$m2a."_".$m2b;
///////////////////////////////////////////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.'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",$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.'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",$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=$spl; $sa=$spa;$sb=$spb;
echo "spl:".$spl."xx__";
$k8_50d=$k8d;
$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;
$K50=(((1-(pow(10,(-($k8_50d-$s2d)))))/(1-(pow(10,(-($k7d-$s2d)))))))*100;
echo "K50:".$K50."x x";
$k8T=round(($K50-67),2);
$K501=(((1-(pow(10,(-($k17_50d-$s2d)))))/(1-(pow(10,(-($k18d-$s2d)))))))*100;
$k17T=round(($K501-67),2);
echo "K501:".$K501."x x";
$c50=(((1-(pow(10,(-($c8_50d-$s2d)))))/(1-(pow(10,(-($c7d-$s2d)))))))*100;
$c8T=round(($c50-64),2);
$c501=(((1-(pow(10,(-($c17_50d-$s2d)))))/(1-(pow(10,(-($c18d-$s2d)))))))*100;
$c17T=round(($c501-64),2);
echo "c501:".$c501."x x";
$m50=(((1-(pow(10,(-($m8_50d-$s2d)))))/(1-(pow(10,(-($m7d-$s2d)))))))*100;
$m8T=round(($m50-64),2);
$m501=(((1-(pow(10,(-($m17_50d-$s2d)))))/(1-(pow(10,(-($m18d-$s2d)))))))*100;
$m17T=round(($m501-64),2);
$y50=(((1-(pow(10,(-($y8_50d-$s2d)))))/(1-(pow(10,(-($y7d-$s2d)))))))*100;
$y8T=round(($y50-64),2);
$y501=(((1-(pow(10,(-($y17_50d-$s2d)))))/(1-(pow(10,(-($y18d-$s2d)))))))*100;
$y17T=round(($y501-64),2);
$s50=(((1-(pow(10,(-($s8_50d-$s2d)))))/(1-(pow(10,(-($s7d-$s2d)))))))*100;
$s8T=round(($s50-64),2);
$s501=(((1-(pow(10,(-($s17_50d-$s2d)))))/(1-(pow(10,(-($s18d-$s2d)))))))*100;
$s17T=round(($s501-64),2);
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);
}
// $dk176=de76($kl,$ka,$kb,$k1l,$k1a,$k1b);
$dk276=de76($kl,$ka,$kb,$k2l,$k2a,$k2b);
$dk376=de76($kl,$ka,$kb,$k3l,$k3a,$k3b);
$dk476=de76($kl,$ka,$kb,$k4l,$k4a,$k4b);
$dk576=de76($kl,$ka,$kb,$k5l,$k5a,$k5b);
$dk676=de76($kl,$ka,$kb,$k6l,$k6a,$k6b);
$dk776=de76($kl,$ka,$kb,$k7l,$k7a,$k7b);
$dk976=de76($kl,$ka,$kb,$k9l,$k9a,$k9b);
$dk876=($dk776+$dk976)/2;
$dk1076=de76($kl,$ka,$kb,$k10l,$k10a,$k10b);
$dk1176=de76($kl,$ka,$kb,$k11l,$k11a,$k11b);
$dk1276=de76($kl,$ka,$kb,$k12l,$k12a,$k12b);
$dk1376=de76($kl,$ka,$kb,$k13l,$k13a,$k13b);
$dk1476=de76($kl,$ka,$kb,$k14l,$k14a,$k14b);
$dk1576=de76($kl,$ka,$kb,$k15l,$k15a,$k15b);
$dk1676=de76($kl,$ka,$kb,$k16l,$k16a,$k16b);
$dk1876=de76($kl,$ka,$kb,$k18l,$k18a,$k18b);
$dk1776=($dk1676+$dk1876)/2;
$dk1976=de76($kl,$ka,$kb,$k19l,$k19a,$k19b);
$dk2076=de76($kl,$ka,$kb,$k20l,$k20a,$k20b);
$dk2176=de76($kl,$ka,$kb,$k21l,$k21a,$k21b);
$dk2276=de76($kl,$ka,$kb,$k22l,$k22a,$k22b);
$dk2376=de76($kl,$ka,$kb,$k23l,$k23a,$k23b);
// $dk2476=de76($kl,$ka,$kb,$k24l,$k24a,$k24b);
//$dk2776=de76($kl,$ka,$kb,$k27l,$k27a,$k27b);
$kmin=min($dk276,$dk376,$dk476,$dk576,$dk676,$dk776,$dk876,$dk976,$dk1076,$dk1176,$dk1276,$dk1376,$dk1476,$dk1576,$dk1676,$dk1776,$dk1876,$dk1976,$dk2076,$dk2176,$dk2276,$dk2376);
$dsum=$dsum-($dk276+$dk376+$dk476+$dk576+$dk676+$dk776+$dk876+$dk976+$dk1076+$dk1176+$dk1276+$dk1376+$dk1476+$dk1576+$dk1676+$dk1776+$dk1876+$dk1976+$dk2076+$dk2176+$dk2276+$dk2376);
$dk194=de94($kl,$ka,$kb,$k1l,$k1a,$k1b);
if ($plK==1) {
?>
<tr bgcolor="#aaaaaa">
<td><div align="center">KD</div></td>
<td><div align="right"></div></td>
<td><div align="right"><?php echo round($k2d,2);?></div></td>
<td><div align="right"><?php echo round($k3d,2);?></div></td>
<td><div align="right"><?php echo round($k4d,2);?></div></td>
<td><div align="right"><?php echo round($k5d,2);?></div></td>
<td><div align="right"><?php echo round($k6d,2);?></div></td>
<td><div align="right"><?php echo round($k7d,2);?></div></td>
<td><div align="right"><?php echo round($k8d,2);?></div></td>
<td><div align="right"><?php echo round($k9d,2);?></div></td>
<td><div align="right"><?php echo round($k10d,2);?></div></td>
<td><div align="right"><?php echo round($k11d,2);?></div></td>
<td><div align="right"><?php echo round($k12d,2);?></div></td>
<td><div align="right"><?php echo round($k13d,2);?></div></td>
<td><div align="right"><?php echo round($k14d,2);?></div></td>
<td><div align="right"><?php echo round($k15d,2);?></div></td>
<td><div align="right"><?php echo round($k16d,2);?></div></td>
<td><div align="right"><?php echo round($k17d,2);?></div></td>
<td><div align="right"><?php echo round($k18d,2);?></div></td>
<td><div align="right"><?php echo round($k19d,2);?></div></td>
<td><div align="right"><?php echo round($k20d,2);?></div></td>
<td><div align="right"><?php echo round($k21d,2);?></div></td>
<td><div align="right"><?php echo round($k22d,2);?></div></td>
<td><div align="right"><?php echo round($k23d,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<tr bgcolor="#aaaaaa">
<td><div align="center">KE</div></td>
<?php // if ($dk176==$kmin){ $kopt='k5';$koptD=$k1d;if ($k1l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk276==$kmin){ $kopt='k6';$koptD=$k2d;if ($k2l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk376==$kmin){ $kopt='k7';$koptD=$k3d;if ($k3l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk476==$kmin){ $kopt='k8';$koptD=$k4d;if ($k4l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk576==$kmin){ $kopt='k9';$koptD=$k5d;if ($k5l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk676==$kmin){ $kopt='k10';$koptD=$k6d;if ($k6l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk776==$kmin){ $kopt='k11';$koptD=$k7d;if ($k7l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk876==$kmin){ $kopt='k12';$koptD=$k8d; if ($k8l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk976==$kmin){ $kopt='k13';$koptD=$k9d;if ($k9l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1076==$kmin){ $kopt='k14';$koptD=$k10d;if ($k10l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1176==$kmin){ $kopt='k15';$koptD=$k11d;if ($k11l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1276==$kmin){ $kopt='k16';$koptD=$k12d;if ($k12l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1376==$kmin){ $kopt='k17';$koptD=$k13d;if ($k13l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1476==$kmin){ $kopt='k18';$koptD=$k14d;if ($k14l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1576==$kmin){ $kopt='k19';$koptD=$k15d;if ($k15l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1676==$kmin){ $kopt='k20';$koptD=$k16d;if ($k16l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1776==$kmin){ $kopt='k21';$koptD=$k17d;if ($k17l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1876==$kmin){ $kopt='k22';$koptD=$k18d;if ($k18l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1976==$kmin){ $kopt='k23';$koptD=$k19d;if ($k19l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2076==$kmin){ $kopt='k24';$koptD=$k20d;if ($k20l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2176==$kmin){ $kopt='k25';$koptD=$k21d;if ($k21l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2276==$kmin){ $kopt='k26';$koptD=$k22d;if ($k22l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2376==$kmin){ $kopt='k27';$koptD=$k23d;if ($k23l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php //if ($dk2476==$kmin){ $kopt='k28';$koptD=$k24d;if ($k24l<16) {$kdi="-";} else {$kdi='+';}}?>
<td><div align="right"></td>
<td><div align="right"><?php if ($dk276>4) {?><font color="red"><?php }elseif ($dk276==$kmin){ $kopt='K6';$koptD=$k2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk276,2);?></div></td>
<td><div align="right"><?php if ($dk376>4) {?><font color="red"><?php }elseif ($dk376==$kmin){ $kopt='K7';$koptD=$k3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk376,2);?></div></td>
<td><div align="right"><?php if ($dk476>4) {?><font color="red"><?php }elseif ($dk476==$kmin){ $kopt='K8';$koptD=$k4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk476,2);?></div></td>
<td><div align="right"><?php if ($dk576>4) {?><font color="red"><?php }elseif ($dk576==$kmin){ $kopt='K9';$koptD=$k5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk576,2);?></div></td>
<td><div align="right"><?php if ($dk676>4) {?><font color="red"><?php }elseif ($dk676==$kmin){ $kopt='K10';$koptD=$k6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk676,2);?></div></td>
<td><div align="right"><?php if ($dk776>4) {?><font color="red"><?php }elseif ($dk776==$kmin){ $kopt='K11';$koptD=$k7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk776,2);?></div></td>
<td><div align="right"><?php if ($dk876>4) {?><font color="red"><?php }elseif ($dk876==$kmin){ $kopt='K12';$koptD=$k8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk876,2);?></div></td>
<td><div align="right"><?php if ($dk976>4) {?><font color="red"><?php }elseif ($dk976==$kmin){ $kopt='K13';$koptD=$k9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk976,2);?></div></td>
<td><div align="right"><?php if ($dk1076>4) {?><font color="red"><?php }elseif ($dk1076==$kmin){ $kopt='K14';$koptD=$k10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1076,2);?></div></td>
<td><div align="right"><?php if ($dk1176>4) {?><font color="red"><?php }elseif ($dk1176==$kmin){ $kopt='K15';$koptD=$k11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1176,2);?></div></td>
<td><div align="right"><?php if ($dk1276>4) {?><font color="red"><?php }elseif ($dk1276==$kmin){ $kopt='K16';$koptD=$k12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1276,2);?></div></td>
<td><div align="right"><?php if ($dk1376>4) {?><font color="red"><?php }elseif ($dk1376==$kmin){ $kopt='K17';$koptD=$k13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1376,2);?></div></td>
<td><div align="right"><?php if ($dk1476>4) {?><font color="red"><?php }elseif ($dk1476==$kmin){ $kopt='K18';$koptD=$k14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1476,2);?></div></td>
<td><div align="right"><?php if ($dk1576>4) {?><font color="red"><?php }elseif ($dk1576==$kmin){ $kopt='K19';$koptD=$k15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1576,2);?></div></td>
<td><div align="right"><?php if ($dk1676>4) {?><font color="red"><?php }elseif ($dk1676==$kmin){ $kopt='K20';$koptD=$k16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1676,2);?></div></td>
<td><div align="right"><?php if ($dk1776>4) {?><font color="red"><?php }elseif ($dk1776==$kmin){ $kopt='K21';$koptD=$k17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1776,2);?></div></td>
<td><div align="right"><?php if ($dk1876>4) {?><font color="red"><?php }elseif ($dk1876==$kmin){ $kopt='K22';$koptD=$k18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1876,2);?></div></td>
<td><div align="right"><?php if ($dk1976>4) {?><font color="red"><?php }elseif ($dk1976==$kmin){ $kopt='K23';$koptD=$k19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1976,2);?></div></td>
<td><div align="right"><?php if ($dk2076>4) {?><font color="red"><?php }elseif ($dk2076==$kmin){ $kopt='K24'; $koptD=$k20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2076,2);?></div></td>
<td><div align="right"><?php if ($dk2176>4) {?><font color="red"><?php }elseif ($dk2176==$kmin){ $kopt='K25';$koptD=$k21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2176,2);?></div></td>
<td><div align="right"><?php if ($dk2276>4) {?><font color="red"><?php }elseif ($dk2276==$kmin){ $kopt='K26';$koptD=$k22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2276,2);?></div></td>
<td><div align="right"><?php if ($dk2376>4) {?><font color="red"><?php }elseif ($dk2376==$kmin){ $kopt='K27';$koptD=$k23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2376,2);?></div></td>
<td><div align="right"></td>
</tr>
<?php }
if ($plC==1) {////C sect
$dc176=de76($cl,$ca,$cb,$c1l,$c1a,$c1b);
$dc276=de76($cl,$ca,$cb,$c2l,$c2a,$c2b);
$dc376=de76($cl,$ca,$cb,$c3l,$c3a,$c3b);
$dc476=de76($cl,$ca,$cb,$c4l,$c4a,$c4b);
$dc576=de76($cl,$ca,$cb,$c5l,$c5a,$c5b);
$dc676=de76($cl,$ca,$cb,$c6l,$c6a,$c6b);
$dc776=de76($cl,$ca,$cb,$c7l,$c7a,$c7b);
$dc976=de76($cl,$ca,$cb,$c9l,$c9a,$c9b);
$dc876=($dc776+$dc976)/2;
$dc1176=de76($cl,$ca,$cb,$c11l,$c11a,$c11b);
$dc1076=de76($cl,$ca,$cb,$c10l,$c10a,$c10b);
$dc1276=de76($cl,$ca,$cb,$c12l,$c12a,$c12b);
$dc1376=de76($cl,$ca,$cb,$c13l,$c13a,$c13b);
$dc1476=de76($cl,$ca,$cb,$c14l,$c14a,$c14b);
$dc1576=de76($cl,$ca,$cb,$c15l,$c15a,$c15b);
$dc1676=de76($cl,$ca,$cb,$c16l,$c16a,$c16b);
$dc1876=de76($cl,$ca,$cb,$c18l,$c18a,$c18b);
$dc1776=($dc1676+$dc1876)/2;
$dc1976=de76($cl,$ca,$cb,$c19l,$c19a,$c19b);
$dc2076=de76($cl,$ca,$cb,$c20l,$c20a,$c20b);
$dc2176=de76($cl,$ca,$cb,$c21l,$c21a,$c21b);
$dc2276=de76($cl,$ca,$cb,$c22l,$c22a,$c22b);
$dc2376=de76($cl,$ca,$cb,$c23l,$c23a,$c23b);
$dc2476=de76($cl,$ca,$cb,$c24l,$c24a,$c24b);
$cmin=min($dc176,$dc276,$dc376,$dc476,$dc576,$dc676,$dc776,$dc876,$dc976,$dc1076,$dc1176,$dc1276,$dc1376,$dc1476,$dc1576,$dc1676,$dc1776,$dc1876,$dc1976,$dc2076,$dc2176,$dc2276,$dc2376,$dc2476);
$dsum=$dsum-($dc176+$dc276+$dc376+$dc476+$dc576+$dc676+$dc776+$dc876+$dc976+$dc1076+$dc1176+$dc1276+$dc1376+$dc1476+$dc1576+$dc1676+$dc1776+$dc1876+$dc1976+$dc2076+$dc2176+$dc2276+$dc2376+$dc2476);
$dc194=de94($cl,$ca,$cb,$c1l,$c1a,$c1b);
?>
<tr bgcolor="<?php echo $ch1C;?>">
<td><div align="center">cD</div></td>
<td><div align="right"><?php echo round($c1d,2);?></div></td>
<td><div align="right"><?php echo round($c2d,2);?></div></td>
<td><div align="right"><?php echo round($c3d,2);?></div></td>
<td><div align="right"><?php echo round($c4d,2);?></div></td>
<td><div align="right"><?php echo round($c5d,2);?></div></td>
<td><div align="right"><?php echo round($c6d,2);?></div></td>
<td><div align="right"><?php echo round($c7d,2);?></div></td>
<td><div align="right"><?php echo round($c8d,2);?></div></td>
<td><div align="right"><?php echo round($c9d,2);?></div></td>
<td><div align="right"><?php echo round($c10d,2);?></div></td>
<td><div align="right"><?php echo round($c11d,2);?></div></td>
<td><div align="right"><?php echo round($c12d,2);?></div></td>
<td><div align="right"><?php echo round($c13d,2);?></div></td>
<td><div align="right"><?php echo round($c14d,2);?></div></td>
<td><div align="right"><?php echo round($c15d,2);?></div></td>
<td><div align="right"><?php echo round($c16d,2);?></div></td>
<td><div align="right"><?php echo round($c17d,2);?></div></td>
<td><div align="right"><?php echo round($c18d,2);?></div></td>
<td><div align="right"><?php echo round($c19d,2);?></div></td>
<td><div align="right"><?php echo round($c20d,2);?></div></td>
<td><div align="right"><?php echo round($c21d,2);?></div></td>
<td><div align="right"><?php echo round($c22d,2);?></div></td>
<td><div align="right"><?php echo round($c23d,2);?></div></td>
<td><div align="right"><?php echo round($c24d,2);?></div></td>
</tr>
<tr bgcolor="<?php echo $ch1C;?>">
<td><div align="center">cE</div></td>
<?php if ($dc176==$cmin){ $copt='C5';$coptD=$c1d;if ($c1b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc276==$cmin){ $copt='C6';$coptD=$c2d;if ($c2b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc376==$cmin){ $copt='C7';$coptD=$c3d;if ($c3b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc476==$cmin){ $copt='C8';$coptD=$c4d;if ($c4b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc576==$cmin){ $copt='C9';$coptD=$c5d;if ($c5b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc676==$cmin){ $copt='C10';$coptD=$c6d;if ($c6b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc776==$cmin){ $copt='C11';$coptD=$c7d;if ($c7b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc876==$cmin){ $copt='C12';$coptD=$c8d; if ($c8b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc976==$cmin){ $copt='C13';$coptD=$c9d;if ($c9b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1076==$cmin){ $copt='C14';$coptD=$c10d;if ($c10b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1176==$cmin){ $copt='C15';$coptD=$c11d;if ($c11b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1276==$cmin){ $copt='C16';$coptD=$c12d;if ($c12b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1376==$cmin){ $copt='C17';$coptD=$c13d;if ($c13b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1476==$cmin){ $copt='C18';$coptD=$c14d;if ($c14b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1576==$cmin){ $copt='C19';$coptD=$c15d;if ($c15b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1676==$cmin){ $copt='C20';$coptD=$c16d;if ($c16b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1776==$cmin){ $copt='C21';$coptD=$c17d;if ($c17b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1876==$cmin){ $copt='C22';$coptD=$c18d;if ($c18b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1976==$cmin){ $copt='C23';$coptD=$c19d;if ($c19b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2076==$cmin){ $copt='C24';$coptD=$c20d;if ($c20b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2176==$cmin){ $copt='C25';$coptD=$c21d;if ($c21b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2276==$cmin){ $copt='C26';$coptD=$c22d;if ($c22b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2376==$cmin){ $copt='C27';$coptD=$c23d;if ($c23b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2476==$cmin){ $copt='C28';$coptD=$c24d;if ($c24b<-50) {$cdi="-";} else {$cdi='+';}}?>
<td><div align="right"><?php if ($dc176>4) {?><font color="red"><?php }elseif ($dc176==$cmin){ $copt='C5';$coptD=$c1d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc176,2);?></div></td>
<td><div align="right"><?php if ($dc276>4) {?><font color="red"><?php }elseif ($dc276==$cmin){ $copt='C6';$coptD=$c2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc276,2);?></div></td>
<td><div align="right"><?php if ($dc376>4) {?><font color="red"><?php }elseif ($dc376==$cmin){ $copt='C7';$coptD=$c3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc376,2);?></div></td>
<td><div align="right"><?php if ($dc476>4) {?><font color="red"><?php }elseif ($dc476==$cmin){ $copt='C8';$coptD=$c4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc476,2);?></div></td>
<td><div align="right"><?php if ($dc576>4) {?><font color="red"><?php }elseif ($dc576==$cmin){ $copt='C9';$coptD=$c5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc576,2);?></div></td>
<td><div align="right"><?php if ($dc676>4) {?><font color="red"><?php }elseif ($dc676==$cmin){ $copt='C10';$coptD=$c6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc676,2);?></div></td>
<td><div align="right"><?php if ($dc776>4) {?><font color="red"><?php }elseif ($dc776==$cmin){ $copt='C11';$coptD=$c7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc776,2);?></div></td>
<td><div align="right"><?php if ($dc876>4) {?><font color="red"><?php }elseif ($dc876==$cmin){ $copt='C12';$coptD=$c8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc876,2);?></div></td>
<td><div align="right"><?php if ($dc976>4) {?><font color="red"><?php }elseif ($dc976==$cmin){ $copt='C13';$coptD=$c9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc976,2);?></div></td>
<td><div align="right"><?php if ($dc1076>4) {?><font color="red"><?php }elseif ($dc1076==$cmin){ $copt='C14';$coptD=$c10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1076,2);?></div></td>
<td><div align="right"><?php if ($dc1176>4) {?><font color="red"><?php }elseif ($dc1176==$cmin){ $copt='C15';$coptD=$c11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1176,2);?></div></td>
<td><div align="right"><?php if ($dc1276>4) {?><font color="red"><?php }elseif ($dc1276==$cmin){ $copt='C16';$coptD=$c12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1276,2);?></div></td>
<td><div align="right"><?php if ($dc1376>4) {?><font color="red"><?php }elseif ($dc1376==$cmin){ $copt='C17';$coptD=$c13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1376,2);?></div></td>
<td><div align="right"><?php if ($dc1476>4) {?><font color="red"><?php }elseif ($dc1476==$cmin){ $copt='C18';$coptD=$c14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1476,2);?></div></td>
<td><div align="right"><?php if ($dc1576>4) {?><font color="red"><?php }elseif ($dc1576==$cmin){ $copt='C19';$coptD=$c15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1576,2);?></div></td>
<td><div align="right"><?php if ($dc1676>4) {?><font color="red"><?php }elseif ($dc1676==$cmin){ $copt='C20';$coptD=$c16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1676,2);?></div></td>
<td><div align="right"><?php if ($dc1776>4) {?><font color="red"><?php }elseif ($dc1776==$cmin){ $copt='C21';$coptD=$c17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1776,2);?></div></td>
<td><div align="right"><?php if ($dc1876>4) {?><font color="red"><?php }elseif ($dc1876==$cmin){ $copt='C22';$coptD=$c18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1876,2);?></div></td>
<td><div align="right"><?php if ($dc1976>4) {?><font color="red"><?php }elseif ($dc1976==$cmin){ $copt='C23';$coptD=$c19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1976,2);?></div></td>
<td><div align="right"><?php if ($dc2076>4) {?><font color="red"><?php }elseif ($dc2076==$cmin){ $copt='C24';$coptD=$c20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2076,2);?></div></td>
<td><div align="right"><?php if ($dc2176>4) {?><font color="red"><?php }elseif ($dc2176==$cmin){ $copt='C25';$coptD=$c21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2176,2);?></div></td>
<td><div align="right"><?php if ($dc2276>4) {?><font color="red"><?php }elseif ($dc2276==$cmin){ $copt='C26';$coptD=$c22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2276,2);?></div></td>
<td><div align="right"><?php if ($dc2376>4) {?><font color="red"><?php }elseif ($dc2376==$cmin){ $copt='C27';$coptD=$c23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2376,2);?></div></td>
<td><div align="right"><?php if ($dc2476>4) {?><font color="red"><?php }elseif ($dc2476==$cmin){ $copt='C28';$coptD=$c24d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2476,2);?></div></td>
</tr>
<?php }
if ($plM==1) {////m sect
$dm176=de76($ml,$ma,$mb,$m1l,$m1a,$m1b);
$dm276=de76($ml,$ma,$mb,$m2l,$m2a,$m2b);
$dm376=de76($ml,$ma,$mb,$m3l,$m3a,$m3b);
$dm476=de76($ml,$ma,$mb,$m4l,$m4a,$m4b);
$dm576=de76($ml,$ma,$mb,$m5l,$m5a,$m5b);
$dm676=de76($ml,$ma,$mb,$m6l,$m6a,$m6b);
$dm776=de76($ml,$ma,$mb,$m7l,$m7a,$m7b);
$dm976=de76($ml,$ma,$mb,$m9l,$m9a,$m9b);
$dm876=($dm776+$dm976)/2;
$dm1076=de76($ml,$ma,$mb,$m10l,$m10a,$m10b);
$dm1176=de76($ml,$ma,$mb,$m11l,$m11a,$m11b);
$dm1276=de76($ml,$ma,$mb,$m12l,$m12a,$m12b);
$dm1376=de76($ml,$ma,$mb,$m13l,$m13a,$m13b);
$dm1476=de76($ml,$ma,$mb,$m14l,$m14a,$m14b);
$dm1576=de76($ml,$ma,$mb,$m15l,$m15a,$m15b);
$dm1676=de76($ml,$ma,$mb,$m16l,$m16a,$m16b);
$dm1876=de76($ml,$ma,$mb,$m18l,$m18a,$m18b);
$dm1776=($dm1676+$dm1876)/2;
$dm1976=de76($ml,$ma,$mb,$m19l,$m19a,$m19b);
$dm2076=de76($ml,$ma,$mb,$m20l,$m20a,$m20b);
$dm2176=de76($ml,$ma,$mb,$m21l,$m21a,$m21b);
$dm2276=de76($ml,$ma,$mb,$m22l,$m22a,$m22b);
$dm2376=de76($ml,$ma,$mb,$m23l,$m23a,$m23b);
$dm2476=de76($ml,$ma,$mb,$m24l,$m24a,$m24b);
$mmin=min($dm176,$dm276,$dm376,$dm476,$dm576,$dm676,$dm776,$dm876,$dm976,$dm1076,$dm1176,$dm1276,$dm1376,$dm1476,$dm1576,$dm1676,$dm1776,$dm1876,$dm1976,$dm2076,$dm2176,$dm2276,$dm2376,$dm2476);
$dsum=$dsum-($dm176+$dm276+$dm376+$dm476+$dm576+$dm676+$dm776+$dm876+$dm976+$dm1076+$dm1176+$dm1276+$dm1376+$dm1476+$dm1576+$dm1676+$dm1776+$dm1876+$dm1976+$dm2076+$dm2176+$dm2276+$dm2376+$dm2476);
$dm194=de94($ml,$ma,$mb,$m1l,$m1a,$m1b);
?>
<tr bgcolor="#e9bed7">
<td><div align="menter">mD</div></td>
<td><div align="right"><?php echo round($m1d,2);?></div></td>
<td><div align="right"><?php echo round($m2d,2);?></div></td>
<td><div align="right"><?php echo round($m3d,2);?></div></td>
<td><div align="right"><?php echo round($m4d,2);?></div></td>
<td><div align="right"><?php echo round($m5d,2);?></div></td>
<td><div align="right"><?php echo round($m6d,2);?></div></td>
<td><div align="right"><?php echo round($m7d,2);?></div></td>
<td><div align="right"><?php echo round($m8d,2);?></div></td>
<td><div align="right"><?php echo round($m9d,2);?></div></td>
<td><div align="right"><?php echo round($m10d,2);?></div></td>
<td><div align="right"><?php echo round($m11d,2);?></div></td>
<td><div align="right"><?php echo round($m12d,2);?></div></td>
<td><div align="right"><?php echo round($m13d,2);?></div></td>
<td><div align="right"><?php echo round($m14d,2);?></div></td>
<td><div align="right"><?php echo round($m15d,2);?></div></td>
<td><div align="right"><?php echo round($m16d,2);?></div></td>
<td><div align="right"><?php echo round($m17d,2);?></div></td>
<td><div align="right"><?php echo round($m18d,2);?></div></td>
<td><div align="right"><?php echo round($m19d,2);?></div></td>
<td><div align="right"><?php echo round($m20d,2);?></div></td>
<td><div align="right"><?php echo round($m21d,2);?></div></td>
<td><div align="right"><?php echo round($m22d,2);?></div></td>
<td><div align="right"><?php echo round($m23d,2);?></div></td>
<td><div align="right"><?php echo round($m24d,2);?></div></td>
</tr>
<tr bgcolor="#e9bed7">
<td><div align="center">mE</div></td>
<?php if ($dm176==$mmin){ $mopt='m5';$moptD=$m1d;if ($m1a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm276==$mmin){ $mopt='m6';$moptD=$m2d;if ($m2a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm376==$mmin){ $mopt='m7';$moptD=$m3d;if ($m3a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm476==$mmin){ $mopt='m8';$moptD=$m4d;if ($m4a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm576==$mmin){ $mopt='m9';$moptD=$m5d;if ($m5a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm676==$mmin){ $mopt='m10';$moptD=$m6d;if ($m6a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm776==$mmin){ $mopt='m11';$moptD=$m7d;if ($m7a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm876==$mmin){ $mopt='m12';$moptD=$m8d; if ($m8a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm976==$mmin){ $mopt='m13';$moptD=$m9d;if ($m9a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1076==$mmin){ $mopt='m14';$moptD=$m10d;if ($m10a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1176==$mmin){ $mopt='m15';$moptD=$m11d;if ($m11a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1276==$mmin){ $mopt='m16';$moptD=$m12d;if ($m12a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1376==$mmin){ $mopt='m17';$moptD=$m13d;if ($m13a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1476==$mmin){ $mopt='m18';$moptD=$m14d;if ($m14a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1576==$mmin){ $mopt='m19';$moptD=$m15d;if ($m15a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1676==$mmin){ $mopt='m20';$moptD=$m16d;if ($m16a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1776==$mmin){ $mopt='m21';$moptD=$m17d;if ($m17a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1876==$mmin){ $mopt='m22';$moptD=$m18d;if ($m18a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1976==$mmin){ $mopt='m23';$moptD=$m19d;if ($m19a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2076==$mmin){ $mopt='m24';$moptD=$m20d;if ($m20a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2176==$mmin){ $mopt='m25';$moptD=$m21d;if ($m21a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2276==$mmin){ $mopt='m26';$moptD=$m22d;if ($m22a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2376==$mmin){ $mopt='m27';$moptD=$m23d;if ($m23a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2476==$mmin){ $mopt='m28';$moptD=$m24d;if ($m24a>74) {$mdi="-";} else {$mdi='+';}}?>
<td><div align="right"><?php if ($dm176>4) {?><font color="red"><?php }elseif ($dm176==$mmin){ $mopt='M5';$moptD=$m1d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm176,2);?></div></td>
<td><div align="right"><?php if ($dm276>4) {?><font color="red"><?php }elseif ($dm276==$mmin){ $mopt='M6';$moptD=$m2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm276,2);?></div></td>
<td><div align="right"><?php if ($dm376>4) {?><font color="red"><?php }elseif ($dm376==$mmin){ $mopt='M7';$moptD=$m3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm376,2);?></div></td>
<td><div align="right"><?php if ($dm476>4) {?><font color="red"><?php }elseif ($dm476==$mmin){ $mopt='M8';$moptD=$m4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm476,2);?></div></td>
<td><div align="right"><?php if ($dm576>4) {?><font color="red"><?php }elseif ($dm576==$mmin){ $mopt='M9';$moptD=$m5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm576,2);?></div></td>
<td><div align="right"><?php if ($dm676>4) {?><font color="red"><?php }elseif ($dm676==$mmin){ $mopt='M10';$moptD=$m6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm676,2);?></div></td>
<td><div align="right"><?php if ($dm776>4) {?><font color="red"><?php }elseif ($dm776==$mmin){ $mopt='M11';$moptD=$m7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm776,2);?></div></td>
<td><div align="right"><?php if ($dm876>4) {?><font color="red"><?php }elseif ($dm876==$mmin){ $mopt='M12';$moptD=$m8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm876,2);?></div></td>
<td><div align="right"><?php if ($dm976>4) {?><font color="red"><?php }elseif ($dm976==$mmin){ $mopt='M13';$moptD=$m9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm976,2);?></div></td>
<td><div align="right"><?php if ($dm1076>4) {?><font color="red"><?php }elseif ($dm1076==$mmin){ $mopt='M14';$moptD=$m10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1076,2);?></div></td>
<td><div align="right"><?php if ($dm1176>4) {?><font color="red"><?php }elseif ($dm1176==$mmin){ $mopt='M15';$moptD=$m11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1176,2);?></div></td>
<td><div align="right"><?php if ($dm1276>4) {?><font color="red"><?php }elseif ($dm1276==$mmin){ $mopt='M16';$moptD=$m12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1276,2);?></div></td>
<td><div align="right"><?php if ($dm1376>4) {?><font color="red"><?php }elseif ($dm1376==$mmin){ $mopt='M17';$moptD=$m13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1376,2);?></div></td>
<td><div align="right"><?php if ($dm1476>4) {?><font color="red"><?php }elseif ($dm1476==$mmin){ $mopt='M18';$moptD=$m14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1476,2);?></div></td>
<td><div align="right"><?php if ($dm1576>4) {?><font color="red"><?php }elseif ($dm1576==$mmin){ $mopt='M19';$moptD=$m15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1576,2);?></div></td>
<td><div align="right"><?php if ($dm1676>4) {?><font color="red"><?php }elseif ($dm1676==$mmin){ $mopt='M20';$moptD=$m16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1676,2);?></div></td>
<td><div align="right"><?php if ($dm1776>4) {?><font color="red"><?php }elseif ($dm1776==$mmin){ $mopt='M21';$moptD=$m17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1776,2);?></div></td>
<td><div align="right"><?php if ($dm1876>4) {?><font color="red"><?php }elseif ($dm1876==$mmin){ $mopt='M22';$moptD=$m18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1876,2);?></div></td>
<td><div align="right"><?php if ($dm1976>4) {?><font color="red"><?php }elseif ($dm1976==$mmin){ $mopt='M23';$moptD=$m19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1976,2);?></div></td>
<td><div align="right"><?php if ($dm2076>4) {?><font color="red"><?php }elseif ($dm2076==$mmin){ $mopt='M24';$moptD=$m20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2076,2);?></div></td>
<td><div align="right"><?php if ($dm2176>4) {?><font color="red"><?php }elseif ($dm2176==$mmin){ $mopt='M25';$moptD=$m21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2176,2);?></div></td>
<td><div align="right"><?php if ($dm2276>4) {?><font color="red"><?php }elseif ($dm2276==$mmin){ $mopt='M26';$moptD=$m22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2276,2);?></div></td>
<td><div align="right"><?php if ($dm2376>4) {?><font color="red"><?php }elseif ($dm2376==$mmin){ $mopt='M27';$moptD=$m23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2376,2);?></div></td>
<td><div align="right"><?php if ($dm2476>4) {?><font color="red"><?php }elseif ($dm2476==$mmin){ $mopt='M28';$moptD=$m24d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2476,2);?></div></td>
</tr>
<?php }
if ($plY==1) {////y sect
//$dy176=de76($yl,$ya,$yb,$y1l,$y1a,$y1b);
$dy276=de76($yl,$ya,$yb,$y2l,$y2a,$y2b);
$dy376=de76($yl,$ya,$yb,$y3l,$y3a,$y3b);
$dy476=de76($yl,$ya,$yb,$y4l,$y4a,$y4b);
$dy576=de76($yl,$ya,$yb,$y5l,$y5a,$y5b);
$dy676=de76($yl,$ya,$yb,$y6l,$y6a,$y6b);
$dy976=de76($yl,$ya,$yb,$y9l,$y9a,$y9b);
$dy776=de76($yl,$ya,$yb,$y7l,$y7a,$y7b);
$dy876=($dy776+$dy976)/2;
$dy1076=de76($yl,$ya,$yb,$y10l,$y10a,$y10b);
$dy1176=de76($yl,$ya,$yb,$y11l,$y11a,$y11b);
$dy1276=de76($yl,$ya,$yb,$y12l,$y12a,$y12b);
$dy1376=de76($yl,$ya,$yb,$y13l,$y13a,$y13b);
$dy1476=de76($yl,$ya,$yb,$y14l,$y14a,$y14b);
$dy1576=de76($yl,$ya,$yb,$y15l,$y15a,$y15b);
$dy1676=de76($yl,$ya,$yb,$y16l,$y16a,$y16b);
$dy1876=de76($yl,$ya,$yb,$y18l,$y18a,$y18b);
$dy1776=($dy1676+$dy1876)/2;
$dy1976=de76($yl,$ya,$yb,$y19l,$y19a,$y19b);
$dy2076=de76($yl,$ya,$yb,$y20l,$y20a,$y20b);
$dy2176=de76($yl,$ya,$yb,$y21l,$y21a,$y21b);
$dy2276=de76($yl,$ya,$yb,$y22l,$y22a,$y22b);
$dy2376=de76($yl,$ya,$yb,$y23l,$y23a,$y23b);
//$dy2776=de76($yl,$ya,$yb,$y27l,$y27a,$y27b);
$ymin=min($dy276,$dy376,$dy476,$dy576,$dy676,$dy776,$dy876,$dy976,$dy1076,$dy1176,$dy1276,$dy1376,$dy1476,$dy1576,$dy1676,$dy1776,$dy1876,$dy1976,$dy2076,$dy2176,$dy2276,$dy2376);
$dsum=$dsum-($dy276+$dy376+$dy476+$dy576+$dy676+$dy776+$dy876+$dy976+$dy1076+$dy1176+$dy1276+$dy1376+$dy1476+$dy1576+$dy1676+$dy1776+$dy1876+$dy1976+$dy2076+$dy2176+$dy2276+$dy2376);
$dy194=de94($yl,$ya,$yb,$y1l,$y1a,$y1b);
?>
<tr bgcolor="#f2ebc0">
<td><div align="menter">YD</div></td>
<td><div align="right"></div></td>
<td><div align="right"><?php echo round($y2d,2);?></div></td>
<td><div align="right"><?php echo round($y3d,2);?></div></td>
<td><div align="right"><?php echo round($y4d,2);?></div></td>
<td><div align="right"><?php echo round($y5d,2);?></div></td>
<td><div align="right"><?php echo round($y6d,2);?></div></td>
<td><div align="right"><?php echo round($y7d,2);?></div></td>
<td><div align="right"><?php echo round($y8d,2);?></div></td>
<td><div align="right"><?php echo round($y9d,2);?></div></td>
<td><div align="right"><?php echo round($y10d,2);?></div></td>
<td><div align="right"><?php echo round($y11d,2);?></div></td>
<td><div align="right"><?php echo round($y12d,2);?></div></td>
<td><div align="right"><?php echo round($y13d,2);?></div></td>
<td><div align="right"><?php echo round($y14d,2);?></div></td>
<td><div align="right"><?php echo round($y15d,2);?></div></td>
<td><div align="right"><?php echo round($y16d,2);?></div></td>
<td><div align="right"><?php echo round($y17d,2);?></div></td>
<td><div align="right"><?php echo round($y18d,2);?></div></td>
<td><div align="right"><?php echo round($y19d,2);?></div></td>
<td><div align="right"><?php echo round($y20d,2);?></div></td>
<td><div align="right"><?php echo round($y21d,2);?></div></td>
<td><div align="right"><?php echo round($y22d,2);?></div></td>
<td><div align="right"><?php echo round($y23d,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<tr bgcolor="#f2ebc0">
<td><div align="center">YE</div></td>
<?php // if ($dy176==$ymin){ $yopt='y1';$yoptD=$y1d;if ($y1b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy276==$ymin){ $yopt='y6';$yoptD=$y2d;if ($y2b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy376==$ymin){ $yopt='y7';$yoptD=$y3d;if ($y3b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy476==$ymin){ $yopt='y8';$yoptD=$y4d;if ($y4b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy576==$ymin){ $yopt='y9';$yoptD=$y5d;if ($y5b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy676==$ymin){ $yopt='y10';$yoptD=$y6d;if ($y6b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy776==$ymin){ $yopt='y11';$yoptD=$y7d;if ($y7b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy876==$ymin){ $yopt='y12';$yoptD=$y8d; if ($y8b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy976==$ymin){ $yopt='y13';$yoptD=$y9d;if ($y9b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1076==$ymin){ $yopt='y14';$yoptD=$y10d;if ($y10b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1176==$ymin){ $yopt='y15';$yoptD=$y11d;if ($y11b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1276==$ymin){ $yopt='y16';$yoptD=$y12d;if ($y12b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1376==$ymin){ $yopt='y17';$yoptD=$y13d;if ($y13b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1476==$ymin){ $yopt='y18';$yoptD=$y14d;if ($y14b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1576==$ymin){ $yopt='y19';$yoptD=$y15d;if ($y15b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1676==$ymin){ $yopt='y20';$yoptD=$y16d;if ($y16b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1776==$ymin){ $yopt='y21';$yoptD=$y17d;if ($y17b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1876==$ymin){ $yopt='y22';$yoptD=$y18d;if ($y18b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1976==$ymin){ $yopt='y23';$yoptD=$y19d;if ($y19b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2076==$ymin){ $yopt='y24';$yoptD=$y20d;if ($y20b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2176==$ymin){ $yopt='y25';$yoptD=$y21d;if ($y21b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2276==$ymin){ $yopt='y26';$yoptD=$y22d;if ($y22b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2376==$ymin){ $yopt='y27';$yoptD=$y23d;if ($y23b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php // if ($dy2776==$ymin){ $yopt='y27';$yoptD=$y27d;if ($y27b>93) {$ydi="-";} else {$ydi='+';}}?>
<td><div align="right"></div></td>
<td><div align="right"><?php if ($dy276>4) {?><font color="red"><?php }elseif ($dy276==$ymin) { $yopt='Y6';$yoptD=$y2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy276,2);?></div></td>
<td><div align="right"><?php if ($dy376>4) {?><font color="red"><?php }elseif ($dy376==$ymin){ $yopt='Y7';$yoptD=$y3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy376,2);?></div></td>
<td><div align="right"><?php if ($dy476>4) {?><font color="red"><?php }elseif ($dy476==$ymin){$yopt='Y8';$yoptD=$y4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy476,2);?></div></td>
<td><div align="right"><?php if ($dy576>4) {?><font color="red"><?php }elseif ($dy576==$ymin){ $yopt='Y9';$yoptD=$y5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy576,2);?></div></td>
<td><div align="right"><?php if ($dy676>4) {?><font color="red"><?php }elseif ($dy676==$ymin){ $yopt='Y10';$yoptD=$y6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy676,2);?></div></td>
<td><div align="right"><?php if ($dy776>4) {?><font color="red"><?php }elseif ($dy776==$ymin){ $yopt='Y11';$yoptD=$y7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy776,2);?></div></td>
<td><div align="right"><?php if ($dy876>4) {?><font color="red"><?php }elseif ($dy876==$ymin){ $yopt='Y12';$yoptD=$y8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy876,2);?></div></td>
<td><div align="right"><?php if ($dy976>4) {?><font color="red"><?php }elseif ($dy976==$ymin){$yopt='Y13';$yoptD=$y9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy976,2);?></div></td>
<td><div align="right"><?php if ($dy1076>4) {?><font color="red"><?php }elseif ($dy1076==$ymin){ $yopt='Y14';$yoptD=$y10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1076,2);?></div></td>
<td><div align="right"><?php if ($dy1176>4) {?><font color="red"><?php }elseif ($dy1176==$ymin){ $yopt='Y15';$yoptD=$y11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1176,2);?></div></td>
<td><div align="right"><?php if ($dy1276>4) {?><font color="red"><?php }elseif ($dy1276==$ymin){ $yopt='Y16';$yoptD=$y12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1276,2);?></div></td>
<td><div align="right"><?php if ($dy1376>4) {?><font color="red"><?php }elseif ($dy1376==$ymin){ $yopt='Y17';$yoptD=$y13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1376,2);?></div></td>
<td><div align="right"><?php if ($dy1476>4) {?><font color="red"><?php }elseif ($dy1476==$ymin){ $yopt='Y18';$yoptD=$y14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1476,2);?></div></td>
<td><div align="right"><?php if ($dy1576>4) {?><font color="red"><?php }elseif ($dy1576==$ymin){ $yopt='Y19';$yoptD=$y15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1576,2);?></div></td>
<td><div align="right"><?php if ($dy1676>4) {?><font color="red"><?php }elseif ($dy1676==$ymin){ $yopt='Y20';$yoptD=$y16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1676,2);?></div></td>
<td><div align="right"><?php if ($dy1776>4) {?><font color="red"><?php }elseif ($dy1776==$ymin){ $yopt='Y21';$yoptD=$y17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1776,2);?></div></td>
<td><div align="right"><?php if ($dy1876>4) {?><font color="red"><?php }elseif ($dy1876==$ymin){ $yopt='Y22';$yoptD=$y18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1876,2);?></div></td>
<td><div align="right"><?php if ($dy1976>4) {?><font color="red"><?php }elseif ($dy1976==$ymin){ $yopt='Y23';$yoptD=$y19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1976,2);?></div></td>
<td><div align="right"><?php if ($dy2076>4) {?><font color="red"><?php }elseif ($dy2076==$ymin){ $yopt='Y24';$yoptD=$y20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2076,2);?></div></td>
<td><div align="right"><?php if ($dy2176>4) {?><font color="red"><?php }elseif ($dy2176==$ymin){ $yopt='Y25';$yoptD=$y21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2176,2);?></div></td>
<td><div align="right"><?php if ($dy2276>4) {?><font color="red"><?php }elseif ($dy2276==$ymin){ $yopt='Y26';$yoptD=$y22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2276,2);?></div></td>
<td><div align="right"><?php if ($dy2376>4) {?><font color="red"><?php }elseif ($dy2376==$ymin){ $yopt='Y27';$yoptD=$y23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2376,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<?php }
if ($plS1==1) {////S sect
//$dy176=de76($yl,$ya,$yb,$y1l,$y1a,$y1b);
$ds276=de76($sl,$sa,$sb,$s2l,$s2a,$s2b);
$ds376=de76($sl,$sa,$sb,$s3l,$s3a,$s3b);
$ds476=de76($sl,$sa,$sb,$s4l,$s4a,$s4b);
$ds576=de76($sl,$sa,$sb,$s5l,$s5a,$s5b);
$ds676=de76($sl,$sa,$sb,$s6l,$s6a,$s6b);
$ds976=de76($sl,$sa,$sb,$s9l,$s9a,$s9b);
$ds776=de76($sl,$sa,$sb,$s7l,$s7a,$s7b);
$ds876=($ds776+$ds976)/2;
$ds1076=de76($sl,$sa,$sb,$s10l,$s10a,$s10b);
$ds1176=de76($sl,$sa,$sb,$s11l,$s11a,$s11b);
$ds1276=de76($sl,$sa,$sb,$s12l,$s12a,$s12b);
$ds1376=de76($sl,$sa,$sb,$s13l,$s13a,$s13b);
$ds1476=de76($sl,$sa,$sb,$s14l,$s14a,$s14b);
$ds1576=de76($sl,$sa,$sb,$s15l,$s15a,$s15b);
$ds1676=de76($sl,$sa,$sb,$s16l,$s16a,$s16b);
$ds1876=de76($sl,$sa,$sb,$s18l,$s18a,$s18b);
$ds1776=($ds1676+$ds1876)/2;
$ds1976=de76($sl,$sa,$sb,$s19l,$s19a,$s19b);
$ds2076=de76($sl,$sa,$sb,$s20l,$s20a,$s20b);
$ds2176=de76($sl,$sa,$sb,$s21l,$s21a,$s21b);
$ds2276=de76($sl,$sa,$sb,$s22l,$s22a,$s22b);
$ds2376=de76($sl,$sa,$sb,$s23l,$s23a,$s23b);
//$ds2776=de76($sl,$sa,$sb,$s27l,$s27a,$s27b);
$smin=min($ds276,$ds376,$ds476,$ds576,$ds676,$ds776,$ds876,$ds976,$ds1076,$ds1176,$ds1276,$ds1376,$ds1476,$ds1576,$ds1676,$ds1776,$ds1876,$ds1976,$ds2076,$ds2176,$ds2276,$ds2376);
$ds194=de94($sl,$sa,$sb,$s1l,$s1a,$s1b);
?>
<tr bgcolor="#daffc2">
<td><div align="menter">SD</div></td>
<td><div align="right"></div></td>
<td><div align="right"><?php echo round($s2d,2);?></div></td>
<td><div align="right"><?php echo round($s3d,2);?></div></td>
<td><div align="right"><?php echo round($s4d,2);?></div></td>
<td><div align="right"><?php echo round($s5d,2);?></div></td>
<td><div align="right"><?php echo round($s6d,2);?></div></td>
<td><div align="right"><?php echo round($s7d,2);?></div></td>
<td><div align="right"><?php echo round($s8d,2);?></div></td>
<td><div align="right"><?php echo round($s9d,2);?></div></td>
<td><div align="right"><?php echo round($s10d,2);?></div></td>
<td><div align="right"><?php echo round($s11d,2);?></div></td>
<td><div align="right"><?php echo round($s12d,2);?></div></td>
<td><div align="right"><?php echo round($s13d,2);?></div></td>
<td><div align="right"><?php echo round($s14d,2);?></div></td>
<td><div align="right"><?php echo round($s15d,2);?></div></td>
<td><div align="right"><?php echo round($s16d,2);?></div></td>
<td><div align="right"><?php echo round($s17d,2);?></div></td>
<td><div align="right"><?php echo round($s18d,2);?></div></td>
<td><div align="right"><?php echo round($s19d,2);?></div></td>
<td><div align="right"><?php echo round($s20d,2);?></div></td>
<td><div align="right"><?php echo round($s21d,2);?></div></td>
<td><div align="right"><?php echo round($s22d,2);?></div></td>
<td><div align="right"><?php echo round($s23d,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<tr bgcolor="#daffc2">
<td><div align="center">YE</div></td>
<?php // if ($ds176==$smin){ $sopt='s1';$soptD=$s1d;if ($s1b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds276==$smin){ $sopt='s5';$soptD=$s2d;if ($s2b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds376==$smin){ $sopt='s7';$soptD=$s3d;if ($s3b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds476==$smin){ $sopt='s8';$soptD=$s4d;if ($s4b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds576==$smin){ $sopt='s9';$soptD=$s5d;if ($s5b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds676==$smin){ $sopt='s10';$soptD=$s6d;if ($s6b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds776==$smin){ $sopt='s11';$soptD=$s7d;if ($s7b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds876==$smin){ $sopt='s12';$soptD=$s8d; if ($s8b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds976==$smin){ $sopt='s13';$soptD=$s9d;if ($s9b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1076==$smin){ $sopt='s14';$soptD=$s10d;if ($s10b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1176==$smin){ $sopt='s15';$soptD=$s11d;if ($s11b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1276==$smin){ $sopt='s16';$soptD=$s12d;if ($s12b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1376==$smin){ $sopt='s17';$soptD=$s13d;if ($s13b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1476==$smin){ $sopt='s18';$soptD=$s14d;if ($s14b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1576==$smin){ $sopt='s19';$soptD=$s15d;if ($s15b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1676==$smin){ $sopt='s20';$soptD=$s16d;if ($s16b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1776==$smin){ $sopt='s21';$soptD=$s17d;if ($s17b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1876==$smin){ $sopt='s22';$soptD=$s18d;if ($s18b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1976==$smin){ $sopt='s23';$soptD=$s19d;if ($s19b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds2076==$smin){ $sopt='s24';$soptD=$s20d;if ($s20b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds2176==$smin){ $sopt='s25';$soptD=$s21d;if ($s21b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds2276==$smin){ $sopt='s26';$soptD=$s22d;if ($s22b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds2376==$smin){ $sopt='s27';$soptD=$s23d;if ($s23b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php // if ($ds2776==$smin){ $sopt='s27';$soptD=$s27d;if ($s27b>93) {$sdi="-";} else {$sdi='+';}}?>
<td><div align="right"></div></td>
<td><div align="right"><?php if ($ds276>4) {?><font color="red"><?php }elseif ($ds276==$smin) { $sopt='s6';$soptD=$s2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds276,2);?></div></td>
<td><div align="right"><?php if ($ds376>4) {?><font color="red"><?php }elseif ($ds376==$smin){ $sopt='s7';$soptD=$s3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds376,2);?></div></td>
<td><div align="right"><?php if ($ds476>4) {?><font color="red"><?php }elseif ($ds476==$smin){$sopt='s8';$soptD=$s4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds476,2);?></div></td>
<td><div align="right"><?php if ($ds576>4) {?><font color="red"><?php }elseif ($ds576==$smin){ $sopt='s9';$soptD=$s5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds576,2);?></div></td>
<td><div align="right"><?php if ($ds676>4) {?><font color="red"><?php }elseif ($ds676==$smin){ $sopt='s10';$soptD=$s6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds676,2);?></div></td>
<td><div align="right"><?php if ($ds776>4) {?><font color="red"><?php }elseif ($ds776==$smin){ $sopt='s11';$soptD=$s7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds776,2);?></div></td>
<td><div align="right"><?php if ($ds876>4) {?><font color="red"><?php }elseif ($ds876==$smin){ $sopt='s12';$soptD=$s8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds876,2);?></div></td>
<td><div align="right"><?php if ($ds976>4) {?><font color="red"><?php }elseif ($ds976==$smin){$sopt='s13';$soptD=$s9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds976,2);?></div></td>
<td><div align="right"><?php if ($ds1076>4) {?><font color="red"><?php }elseif ($ds1076==$smin){ $sopt='s14';$soptD=$s10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1076,2);?></div></td>
<td><div align="right"><?php if ($ds1176>4) {?><font color="red"><?php }elseif ($ds1176==$smin){ $sopt='s15';$soptD=$s11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1176,2);?></div></td>
<td><div align="right"><?php if ($ds1276>4) {?><font color="red"><?php }elseif ($ds1276==$smin){ $sopt='s16';$soptD=$s12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1276,2);?></div></td>
<td><div align="right"><?php if ($ds1376>4) {?><font color="red"><?php }elseif ($ds1376==$smin){ $sopt='s17';$soptD=$s13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1376,2);?></div></td>
<td><div align="right"><?php if ($ds1476>4) {?><font color="red"><?php }elseif ($ds1476==$smin){ $sopt='s18';$soptD=$s14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1476,2);?></div></td>
<td><div align="right"><?php if ($ds1576>4) {?><font color="red"><?php }elseif ($ds1576==$smin){ $sopt='s19';$soptD=$s15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1576,2);?></div></td>
<td><div align="right"><?php if ($ds1676>4) {?><font color="red"><?php }elseif ($ds1676==$smin){ $sopt='s20';$soptD=$s16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1676,2);?></div></td>
<td><div align="right"><?php if ($ds1776>4) {?><font color="red"><?php }elseif ($ds1776==$smin){ $sopt='s21';$soptD=$s17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1776,2);?></div></td>
<td><div align="right"><?php if ($ds1876>4) {?><font color="red"><?php }elseif ($ds1876==$smin){ $sopt='s22';$soptD=$s18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1876,2);?></div></td>
<td><div align="right"><?php if ($ds1976>4) {?><font color="red"><?php }elseif ($ds1976==$smin){ $sopt='s23';$soptD=$s19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1976,2);?></div></td>
<td><div align="right"><?php if ($ds2076>4) {?><font color="red"><?php }elseif ($ds2076==$smin){ $sopt='s24';$soptD=$s20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds2076,2);?></div></td>
<td><div align="right"><?php if ($ds2176>4) {?><font color="red"><?php }elseif ($ds2176==$smin){ $sopt='s25';$soptD=$s21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds2176,2);?></div></td>
<td><div align="right"><?php if ($ds2276>4) {?><font color="red"><?php }elseif ($ds2276==$smin){ $sopt='s26';$soptD=$s22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds2276,2);?></div></td>
<td><div align="right"><?php if ($ds2376>4) {?><font color="red"><?php }elseif ($ds2376==$smin){ $sopt='s27';$soptD=$s23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds2376,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<?php } ?>
<tr>
<td><div align="center">最佳濃度</div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php echo $kopt;?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo $copt;?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo $mopt;?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo $yopt;?></div></td>
<td bgcolor="#daffc2"><div align="right"><?php echo $sopt;?></div></td>
<td bgcolor="#daffc2"><div align="right">score</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>
<td bgcolor="#daffc2"><div align="right"><?php echo $dsum;?></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,$k19d-$koptD,$k20d-$koptD,$k21d-$koptD,$k22d-$koptD,$k23d-$koptD,0.01,0.01,$dk276,$dk376,$dk476,$dk576,$dk676,$dk776,$dk876,$dk976,$dk1076,$dk1176,$dk1276,$dk1376,$dk1476,$dk1576,$dk1676,$dk1776,$dk1876,$dk1976,$dk2076,$dk2176,$dk2276,$dk2376,0.01);
GenGraphT($k8T,$k17T,abs($k8T)-1,abs($k17T)-1);
?>
<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,$c20d-$coptD,$c21d-$coptD,$c22d-$coptD,$c23d-$coptD,$c24d-$coptD,$dc176,$dc276,$dc376,$dc476,$dc576,$dc676,$dc776,$dc876,$dc976,$dc1076,$dc1176,$dc1276,$dc1376,$dc1476,$dc1576,$dc1676,$dc1776,$dc1876,$dc1976,$dc2076,$dc2176,$dc2276,$dc2376,$dc2476);
GenGraphT2($c8T,$c17T,abs($c8T)-1,abs($c17T)-1);
?>
<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,$m20d-$moptD,$m21d-$moptD,$m22d-$moptD,$m23d-$moptD,$m24d-$moptD,$dm176,$dm276,$dm376,$dm476,$dm576,$dm676,$dm776,$dm876,$dm976,$dm1076,$dm1176,$dm1276,$dm1376,$dm1476,$dm1576,$dm1676,$dm1776,$dm1876,$dm1976,$dm2076,$dm2176,$dm2276,$dm2376,$dm2476);
GenGraphT3($m8T,$m17T,abs($m8T)-1,abs($m17T)-1);
?>
<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,$y19d-$yoptD,$y20d-$yoptD,$y21d-$yoptD,$y22d-$yoptD,$y23d-$yoptD,0.01,0.01,$dy276,$dy376,$dy476,$dy576,$dy676,$dy776,$dy876,$dy976,$dy1076,$dy1176,$dy1276,$dy1376,$dy1476,$dy1576,$dy1676,$dy1776,$dy1876,$dy1976,$dy2076,$dy2176,$dy2276,$dy2376,0.01);
GenGraphT4($y8T,$y17T,abs($y8T)-1,abs($y17T)-1);
?>
<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,$s19d-$soptD,$s20d-$soptD,$s21d-$soptD,$s22d-$soptD,$s23d-$soptD,0.01,0.01,$ds276,$ds376,$ds476,$ds576,$ds676,$ds776,$ds876,$ds976,$ds1076,$ds1176,$ds1276,$ds1376,$ds1476,$ds1576,$ds1676,$ds1776,$ds1876,$ds1976,$ds2076,$ds2176,$ds2276,$ds2376,0.01);
GenGraphT5($s8T,$s17T,abs($s8T)-1,abs($s17T)-1);
?>
<img src="graph5.gif"><img src="graphT5.gif">
</div>
<?php } ?>
</table>
<?php
//error_reporting(E_ALL ^ E_DEPRECATED);
//$connection = mysql_connect("127.0.0.1", "root", "fredsql") or die ("Unable to connect!");
$link = mysqli_connect('localhost', 'root', 'fredsql', 'tvicheck-st');
mysqli_query($link, "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','$dsum', '$passbit', NOW(), '$device', '$dsn', '$dbstr[0]', '$dbstr[1]', '$dbstr[2]', '$paper', '$ink', '$rankbit', '$k4d','$k80db', '$k8_50d', '$c4d','$c80db', '$c8_50d', '$m4d','$m80db', '$m8_50d', '$y4d','$y80db', '$y8_50d')");
// 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);
//////////////////////////////beer's law
///////////////////////////////////////////////////////////////////////////////////////////////////////////////
// //////////////////////////////////Beer's Law section///////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
////////////////sec K
//spXYZ("X",$dotT[9+$cols*$Pdot-5*($i-1)],
echo "<br>Beer's Law<br>";
$cols=40;
$idx=9;
$paperid=8;
$ki=0.820;
$kid=substr($kopt, 1);;$Key=$kid-5;
$pmid=(5*$Key)+2;
//echo "kid:".$kid;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=2+((5-4)*5);////K line
//echo "<br>pdot's ".$Pdot;
//$dotT[$idx+$cols*$Pdot+1]
$si=0;
if ($cols==45) {
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dotT[$idx+$cols*$paperid+$si+1];
${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'m'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
$si=$si+1;
}}
else {
for ($s=400; $s<=700; $s+=10) {
${'p'.$s}=$dotT[$idx+$cols*$paperid-($paperid-2)+$si];
${'m'.$s}=$dotT[$idx+$cols*$pmid-($pmid-2)+$si];
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
$si=$si+1;
// echo "<br>_".($idx+$cols*$Pdot-6+$si)."_".$s."_".${'m'.$s}."dot251:".$dotT[331];
// echo "<br>_".${'r'.$s}."<br>";
}}
$ki=$ki+0.015;
if ($cols==45) {
${'k'.$i.'X'}=sp38XYZ("X",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
${'k'.$i.'Y'}=sp38XYZ("Y",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
${'k'.$i.'Z'}=sp38XYZ("Z",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($k1Z,3)."<br>";
${'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'});
//echo "K1L=".round($k1l,3).",".round($k1a,3).",".round($k1b,3);
${'k'.$i.'dd'}=DensitySp38("K",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "K1D=".round(${'k'.$i.'dd'},3);
}
else {
${'k'.$i.'X'}=spXYZ("X",0.0001, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
${'k'.$i.'Y'}=spXYZ("Y",0.0001, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
${'k'.$i.'Z'}=spXYZ("Z",0.0001, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($k1Z,3)."<br>";
${'bk'.$i.'l'}=xyz2lab01("l",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'bk'.$i.'a'}=xyz2lab01("a",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'bk'.$i.'b'}=xyz2lab01("b",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
//echo "K1L=".round($k1l,3).",".round($k1a,3).",".round($k1b,3);
${'bk'.$i.'dd'}=DensitySp("K",0.001, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
}
//echo "K1D=".round(${'k'.$i.'dd'},3);
}
//echo "<br>";
//////////////////////sec C
$cid=substr($copt, 1);$cey=$cid-5;
$cmid=(5*$cey)-1;
//echo "<br>cid:".$cid."<br>";
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=1;////C line
$si=0;
if ($cols==45) {
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dotT[$idx+$cols*($Pdot+8)+$si+1];
${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
$si=$si+1;
}}
else {
for ($s=400; $s<=700; $s+=10) {
${'p'.$s}=$dotT[$idx+$cols*$paperid-($paperid-2)+$si];
${'m'.$s}=$dotT[$idx+$cols*$cmid-($cmid-2)+$si];
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
$si=$si+1;
// echo "<br>_".($idx+$cols*$Pdot-6+$si)."_".$s."_".${'m'.$s}."CC:".$dotT[331];
//echo "<br>_".${'r'.$s}."<br>";
}}
$ki=$ki+0.015;
if ($cols==45) {
${'c'.$i.'X'}=sp38XYZ("X",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
${'c'.$i.'Y'}=sp38XYZ("Y",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
${'c'.$i.'Z'}=sp38XYZ("Z",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($c1Z,3)."<br>";
${'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'});
//echo "K1L=".round($c1l,3).",".round($c1a,3).",".round($c1b,3);
${'c'.$i.'dd'}=DensitySp38("C",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "K1D=".round($k1dd,3);
}
else {
${'c'.$i.'X'}=spXYZ("X",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
${'c'.$i.'Y'}=spXYZ("Y",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
${'c'.$i.'Z'}=spXYZ("Z",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($c1Z,3)."<br>";
${'bc'.$i.'l'}=xyz2lab01("l",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'bc'.$i.'a'}=xyz2lab01("a",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'bc'.$i.'b'}=xyz2lab01("b",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
//echo "K1L=".round(${'c'.$i.'l'},3).",".round(${'c'.$i.'a'},3).",".round(${'c'.$i.'b'},3);
${'bc'.$i.'dd'}=DensitySp("C",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
}
//echo "C1D=".round(${'c'.$i.'dd'},3);
}
//echo "<br>";
//////////////////////////sec M
$mid=substr($mopt, 1);$mey=$mid-5;
$mmid=(5*$mey);
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=2;////M line
$si=0;
if ($cols==45) {
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dotT[$idx+$cols*($Pdot+6)+$si+1];
${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
$si=$si+1;
}}
else {
for ($s=400; $s<=700; $s+=10) {
${'p'.$s}=$dotT[$idx+$cols*$paperid-($paperid-2)+$si];
${'m'.$s}=$dotT[$idx+$cols*$mmid-($mmid-2)+$si];
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
$si=$si+1;
//echo "<br>_".($idx+$cols*$Pdot-6+$si)."_".$s."_".${'m'.$s}."CC:".$dotT[331];
}}
$ki=$ki+0.015;
if ($cols==45) {
${'m'.$i.'X'}=sp38XYZ("X",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
${'m'.$i.'Y'}=sp38XYZ("Y",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
${'m'.$i.'Z'}=sp38XYZ("Z",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "KX1=".round($m1X,3).",".round($m1Y,3).",".round($m1Z,3)."<br>";
${'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'});
//echo "K1L=".round($m1l,3).",".round($m1a,3).",".round($m1b,3);
${'m'.$i.'dd'}=DensitySp38("M",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
}
else {
${'m'.$i.'X'}=spXYZ("X",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
${'m'.$i.'Y'}=spXYZ("Y",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
${'m'.$i.'Z'}=spXYZ("Z",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
//echo "KX1=".round($m1X,3).",".round($m1Y,3).",".round($m1Z,3)."<br>";
${'bm'.$i.'l'}=xyz2lab01("l",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'bm'.$i.'a'}=xyz2lab01("a",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'bm'.$i.'b'}=xyz2lab01("b",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
//echo "K1L=".round($m1l,3).",".round($m1a,3).",".round($m1b,3);
${'bm'.$i.'dd'}=DensitySp("M",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
}
//echo "m1D=".round(${'m'.$i.'dd'},3);
}
//echo "<br>";
///////////////////sec Y
$yid=substr($yopt, 1);$yey=$yid-5;
$ymid=(5*$yey)+1;
$ki=0.880;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=3;////Y line
$si=0;
if ($cols==45) {
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dotT[$idx+$cols*($Pdot+4)+$si+1];
${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
$si=$si+1;
}}
else {
for ($s=400; $s<=700; $s+=10) {
${'p'.$s}=$dotT[$idx+$cols*$paperid-($paperid-2)+$si];
${'m'.$s}=$dotT[$idx+$cols*$ymid-($ymid-2)+$si];
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
$si=$si+1;
//echo "<br>_".($idx+$cols*$Pdot-6+$si)."_".$s."_".${'m'.$s}."CC:".$dotT[331];
}
}
$ki=$ki+0.015;
if ($cols==45) {
${'y'.$i.'X'}=sp38XYZ("X",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
${'y'.$i.'Y'}=sp38XYZ("Y",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
${'y'.$i.'Z'}=sp38XYZ("Z",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "KX1=".round($y1X,3).",".round($y1Y,3).",".round($y1Z,3)."<br>";
${'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'});
//echo "K1L=".round($y1l,3).",".round($y1a,3).",".round($y1b,3);
${'y'.$i.'dd'}=DensitySp38("Y",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "K1D=".round($kydd,3);
}
else{
${'y'.$i.'X'}=spXYZ("X",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
${'y'.$i.'Y'}=spXYZ("Y",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
${'y'.$i.'Z'}=spXYZ("Z",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
//echo "KX1=".round($y1X,3).",".round($y1Y,3).",".round($y1Z,3)."<br>";
${'by'.$i.'l'}=xyz2lab01("l",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'by'.$i.'a'}=xyz2lab01("a",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'by'.$i.'b'}=xyz2lab01("b",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
//echo "K1L=".round($y1l,3).",".round($y1a,3).",".round($y1b,3);
${'by'.$i.'dd'}=DensitySp("Y",$r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700);
//echo "K1D=".round($k1dd,3);
}
// echo "y1D=".round(${'by'.$i.'dd'},3);
}
//////////////////////////////////Beer's Law section
//////////////////////////////////////////////////////
//include 'dE00.php';
// echo "<br>kl:".$kl."k14l:".$k14l;
$tt00=de76(55,-37,-50,54.3,-34.47,-52.63);
// $dek00=de76($kl,$ka,$kb,$klm,$kam,$kbm);
// $dec00=de76($cl,$ca,$cb,$clm,$cam,$cbm);
//$dem00=de76($ml,$ma,$mb,$mlm,$mam,$mbm);
//$dey00=de76($yl,$ya,$yb,$ylm,$yam,$ybm);
$bdk176=de76($kl,$ka,$kb,$bk1l,$bk1a,$bk1b); //echo "<br>dekk:".$bdk176;
$bdk276=de76($kl,$ka,$kb,$bk2l,$bk2a,$bk2b);
$bdk376=de76($kl,$ka,$kb,$bk3l,$bk3a,$bk3b);
$bdk476=de76($kl,$ka,$kb,$bk4l,$bk4a,$bk4b);
$bdk576=de76($kl,$ka,$kb,$bk5l,$bk5a,$bk5b);
$bdk676=de76($kl,$ka,$kb,$bk6l,$bk6a,$bk6b);
$bdk776=de76($kl,$ka,$kb,$bk7l,$bk7a,$bk7b);
$bdk876=de76($kl,$ka,$kb,$bk8l,$bk8a,$bk8b);
$bdk976=de76($kl,$ka,$kb,$bk9l,$bk9a,$bk9b);
$bdk1076=de76($kl,$ka,$kb,$bk10l,$bk10a,$bk10b);
$bdk1176=de76($kl,$ka,$kb,$bk11l,$bk11a,$bk11b);
$bdk1276=de76($kl,$ka,$kb,$bk12l,$bk12a,$bk12b);
$bdk1376=de76($kl,$ka,$kb,$bk13l,$bk13a,$bk13b);
$bdk1476=de76($kl,$ka,$kb,$bk14l,$bk14a,$bk14b);
$bdk1576=de76($kl,$ka,$kb,$bk15l,$bk15a,$bk15b);
$bdk1676=de76($kl,$ka,$kb,$bk16l,$bk16a,$bk16b);
$bdk1776=de76($kl,$ka,$kb,$bk17l,$bk17a,$bk17b);
$bdk1876=de76($kl,$ka,$kb,$bk18l,$bk18a,$bk18b);
$bdk1976=de76($kl,$ka,$kb,$bk19l,$bk19a,$bk19b);
$bdk2076=de76($kl,$ka,$kb,$bk20l,$bk20a,$bk20b);
$bdk2176=de76($kl,$ka,$kb,$bk21l,$bk21a,$bk21b);
$bdk2276=de76($kl,$ka,$kb,$bk22l,$bk22a,$bk22b);
$bdk2376=de76($kl,$ka,$kb,$bk23l,$bk23a,$bk23b);
$bdk2476=de76($kl,$ka,$kb,$bk24l,$bk24a,$bk24b);
$bdk2576=de76($kl,$ka,$kb,$bk25l,$bk25a,$bk25b);
$bdk2676=de76($kl,$ka,$kb,$bk26l,$bk26a,$bk26b);
$bdk2776=de76($kl,$ka,$kb,$bk27l,$bk27a,$bk27b);
$bdk2876=de76($kl,$ka,$kb,$bk28l,$bk28a,$bk28b);
$bdk2976=de76($kl,$ka,$kb,$bk29l,$bk29a,$bk29b);
$bdk3076=de76($kl,$ka,$kb,$bk30l,$bk30a,$bk30b);
$bkmin=min($bdk176,$bdk276,$bdk376,$bdk476,$bdk576,$bdk676,$bdk776,$bdk876,$bdk976,$bdk1076,$bdk1176,$bdk1276,$bdk1376,$bdk1476,$bdk1576,$bdk1676,$bdk1776,$bdk1876,$bdk1976,$bdk2076,$bdk2176,$bdk2276,$bdk2376,$bdk2476,$bdk2576,$bdk2676,$bdk2776,$bdk2876,$bdk2976,$bdk3076);
// $bdk194=de94($kl,$ka,$kb,$k1l,$k1a,$k1b);
?>
<?php if ($bdk176==$bkmin){ $kopt='1';$koptDb=$bk1dd;if ($k1l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk276==$bkmin){ $kopt='2';$koptDb=$bk2dd;if ($k2l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk376==$bkmin){ $kopt='3';$koptDb=$bk3dd;if ($k3l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk476==$bkmin){ $kopt='4';$koptDb=$bk4dd;if ($k4l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk576==$bkmin){ $kopt='5';$koptDb=$bk5dd;if ($k5l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk676==$bkmin){ $kopt='6';$koptDb=$bk6dd;if ($k6l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk776==$bkmin){ $kopt='7';$koptDb=$bk7dd;if ($k7l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk876==$bkmin){ $kopt='8';$koptDb=$bk8dd; if ($k8l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk976==$bkmin){ $kopt='9';$koptDb=$bk9dd;if ($k9l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1076==$bkmin){ $kopt='10';$koptDb=$bk10dd;if ($k10l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1176==$bkmin){ $kopt='11';$koptDb=$bk11dd;if ($k11l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1276==$bkmin){ $kopt='12';$koptDb=$bk12dd;if ($k12l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1376==$bkmin){ $kopt='13';$koptDb=$bk13dd;if ($k13l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1476==$bkmin){ $kopt='14';$koptDb=$bk14dd;if ($k14l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1576==$bkmin){ $kopt='15';$koptDb=$bk15dd;if ($k15l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1676==$bkmin){ $kopt='16';$koptDb=$bk16dd;if ($k16l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1776==$bkmin){ $kopt='17';$koptDb=$bk17dd;if ($k17l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1876==$bkmin){ $kopt='18';$koptDb=$bk18dd;if ($k18l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk1976==$bkmin){ $kopt='19';$koptDb=$bk19dd;if ($k19l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2076==$bkmin){ $kopt='20';$koptDb=$bk20dd;if ($k20l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2176==$bkmin){ $kopt='21';$koptDb=$bk21dd;if ($k21l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2276==$bkmin){ $kopt='22';$koptDb=$bk22dd;if ($k22l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2376==$bkmin){ $kopt='23';$koptDb=$bk23dd;if ($k23l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2476==$bkmin){ $kopt='24';$koptDb=$bk24dd;if ($k24l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2576==$bkmin){ $kopt='25';$koptDb=$bk25dd;if ($k25l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2676==$bkmin){ $kopt='26';$koptDb=$bk26dd;if ($k26l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2776==$bkmin){ $kopt='27';$koptDb=$bk27dd;if ($k27l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2876==$bkmin){ $kopt='28';$koptDb=$bk28dd;if ($k28l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk2976==$bkmin){ $kopt='29';$koptDb=$bk29dd;if ($k29l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($bdk3076==$bkmin){ $kopt='30';$koptDb=$bk30dd;if ($k30l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php
$bdc176=de76($cl,$ca,$cb,$bc1l,$bc1a,$bc1b);//echo "<br>deCC:".$bdc176;
$bdc276=de76($cl,$ca,$cb,$bc2l,$bc2a,$bc2b);
$bdc376=de76($cl,$ca,$cb,$bc3l,$bc3a,$bc3b);
$bdc476=de76($cl,$ca,$cb,$bc4l,$bc4a,$bc4b);
$bdc576=de76($cl,$ca,$cb,$bc5l,$bc5a,$bc5b);
$bdc676=de76($cl,$ca,$cb,$bc6l,$bc6a,$bc6b);
$bdc776=de76($cl,$ca,$cb,$bc7l,$bc7a,$bc7b);
$bdc876=de76($cl,$ca,$cb,$bc8l,$bc8a,$bc8b);
$bdc976=de76($cl,$ca,$cb,$bc9l,$bc9a,$bc9b);
$bdc1076=de76($cl,$ca,$cb,$bc10l,$bc10a,$bc10b);
$bdc1176=de76($cl,$ca,$cb,$bc11l,$bc11a,$bc11b);
$bdc1276=de76($cl,$ca,$cb,$bc12l,$bc12a,$bc12b);
$bdc1376=de76($cl,$ca,$cb,$bc13l,$bc13a,$bc13b);
$bdc1476=de76($cl,$ca,$cb,$bc14l,$bc14a,$bc14b);
$bdc1576=de76($cl,$ca,$cb,$bc15l,$bc15a,$bc15b);
$bdc1676=de76($cl,$ca,$cb,$bc16l,$bc16a,$bc16b);
$bdc1776=de76($cl,$ca,$cb,$bc17l,$bc17a,$bc17b);
$bdc1876=de76($cl,$ca,$cb,$bc18l,$bc18a,$bc18b);
$bdc1976=de76($cl,$ca,$cb,$bc19l,$bc19a,$bc19b);
$bdc2076=de76($cl,$ca,$cb,$bc20l,$bc20a,$bc20b);
$bdc2176=de76($cl,$ca,$cb,$bc21l,$bc21a,$bc21b);
$bdc2276=de76($cl,$ca,$cb,$bc22l,$bc22a,$bc22b);
$bdc2376=de76($cl,$ca,$cb,$bc23l,$bc23a,$bc23b);
$bdc2476=de76($cl,$ca,$cb,$bc24l,$bc24a,$bc24b);
$bdc2576=de76($cl,$ca,$cb,$bc25l,$bc25a,$bc25b);
$bdc2676=de76($cl,$ca,$cb,$bc26l,$bc26a,$bc26b);
$bdc2776=de76($cl,$ca,$cb,$bc27l,$bc27a,$bc27b);
$bdc2876=de76($cl,$ca,$cb,$bc28l,$bc28a,$bc28b);
$bdc2976=de76($cl,$ca,$cb,$bc29l,$bc29a,$bc29b);
$bdc3076=de76($cl,$ca,$cb,$bc30l,$bc30a,$bc30b);
$bcmin=min($bdc176,$bdc276,$bdc376,$bdc476,$bdc576,$bdc676,$bdc776,$bdc876,$bdc976,$bdc1076,$bdc1176,$bdc1276,$bdc1376,$bdc1476,$bdc1576,$bdc1676,$bdc1776,$bdc1876,$bdc1976,$bdc2076,$bdc2176,$bdc2276,$bdc2376,$bdc2476,$bdc2576,$bdc2676,$bdc2776,$bdc2876,$bdc2976,$bdc3076);
//echo "<br>xx".$cl."xx".$ca."xx".$cb."xxxx".$bc1l."xx".$bc1a."xx".$bc1b."dexx".$bdc176;
?>
<?php if ($bdc176==$bcmin){ $copt='1';$coptDb=$bc1dd;if ($c1b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc276==$bcmin){ $copt='2';$coptDb=$bc2dd;if ($c2b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc376==$bcmin){ $copt='3';$coptDb=$bc3dd;if ($c3b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc476==$bcmin){ $copt='4';$coptDb=$bc4dd;if ($c4b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc576==$bcmin){ $copt='5';$coptDb=$bc5dd;if ($c5b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc676==$bcmin){ $copt='6';$coptDb=$bc6dd;if ($c6b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc776==$bcmin){ $copt='7';$coptDb=$bc7dd;if ($c7b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc876==$bcmin){ $copt='8';$coptDb=$bc8dd; if ($c8b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc976==$bcmin){ $copt='9';$coptDb=$bc9dd;if ($c9b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1076==$bcmin){ $copt='10';$coptDb=$bc10dd;if ($c10b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1176==$bcmin){ $copt='11';$coptDb=$bc11dd;if ($c11b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1276==$bcmin){ $copt='12';$coptDb=$bc12dd;if ($c12b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1376==$bcmin){ $copt='13';$coptDb=$bc13dd;if ($c13b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1476==$bcmin){ $copt='14';$coptDb=$bc14dd;if ($c14b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1576==$bcmin){ $copt='15';$coptDb=$bc15dd;if ($c15b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1676==$bcmin){ $copt='16';$coptDb=$bc16dd;if ($c16b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1776==$bcmin){ $copt='17';$coptDb=$bc17dd;if ($c17b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1876==$bcmin){ $copt='18';$coptDb=$bc18dd;if ($c18b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc1976==$bcmin){ $copt='19';$coptDb=$bc19dd;if ($c19b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2076==$bcmin){ $copt='20';$coptDb=$bc20dd;if ($c20b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2176==$bcmin){ $copt='21';$coptDb=$bc21dd;if ($c21b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2276==$bcmin){ $copt='22';$coptDb=$bc22dd;if ($c22b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2376==$bcmin){ $copt='23';$coptDb=$bc23dd;if ($c23b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2476==$bcmin){ $copt='24';$coptDb=$bc24dd;if ($c24b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2576==$bcmin){ $copt='25';$coptDb=$bc25dd;if ($c25b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2676==$bcmin){ $copt='26';$coptDb=$bc26dd;if ($c26b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2776==$bcmin){ $copt='27';$coptDb=$bc27dd;if ($c27b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2876==$bcmin){ $copt='28';$coptDb=$bc28dd;if ($c28b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc2976==$bcmin){ $copt='29';$coptDb=$bc29dd;if ($c29b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($bdc3076==$bcmin){ $copt='30';$coptDb=$bc30dd;if ($c30b<-50) {$cdi="-";} else {$cdi='+';}}
echo "<br>xx".$bc30dd;
$bdm176=de76($ml,$ma,$mb,$bm1l,$bm1a,$bm1b);
$bdm276=de76($ml,$ma,$mb,$bm2l,$bm2a,$bm2b);
$bdm376=de76($ml,$ma,$mb,$bm3l,$bm3a,$bm3b);
$bdm476=de76($ml,$ma,$mb,$bm4l,$bm4a,$bm4b);
$bdm576=de76($ml,$ma,$mb,$bm5l,$bm5a,$bm5b);
$bdm676=de76($ml,$ma,$mb,$bm6l,$bm6a,$bm6b);
$bdm776=de76($ml,$ma,$mb,$bm7l,$bm7a,$bm7b);
$bdm876=de76($ml,$ma,$mb,$bm8l,$bm8a,$bm8b);
$bdm976=de76($ml,$ma,$mb,$bm9l,$bm9a,$bm9b);
$bdm1076=de76($ml,$ma,$mb,$bm10l,$bm10a,$bm10b);
$bdm1176=de76($ml,$ma,$mb,$bm11l,$bm11a,$bm11b);
$bdm1276=de76($ml,$ma,$mb,$bm12l,$bm12a,$bm12b);
$bdm1376=de76($ml,$ma,$mb,$bm13l,$bm13a,$bm13b);
$bdm1476=de76($ml,$ma,$mb,$bm14l,$bm14a,$bm14b);
$bdm1576=de76($ml,$ma,$mb,$bm15l,$bm15a,$bm15b);
$bdm1676=de76($ml,$ma,$mb,$bm16l,$bm16a,$bm16b);
$bdm1776=de76($ml,$ma,$mb,$bm17l,$bm17a,$bm17b);
$bdm1876=de76($ml,$ma,$mb,$bm18l,$bm18a,$bm18b);
$bdm1976=de76($ml,$ma,$mb,$bm19l,$bm19a,$bm19b);
$bdm2076=de76($ml,$ma,$mb,$bm20l,$bm20a,$bm20b);
$bdm2176=de76($ml,$ma,$mb,$bm21l,$bm21a,$bm21b);
$bdm2276=de76($ml,$ma,$mb,$bm22l,$bm22a,$bm22b);
$bdm2376=de76($ml,$ma,$mb,$bm23l,$bm23a,$bm23b);
$bdm2476=de76($ml,$ma,$mb,$bm24l,$bm24a,$bm24b);
$bdm2576=de76($ml,$ma,$mb,$bm25l,$bm25a,$bm25b);
$bdm2676=de76($ml,$ma,$mb,$bm26l,$bm26a,$bm26b);
$bdm2776=de76($ml,$ma,$mb,$bm27l,$bm27a,$bm27b);
$bdm2876=de76($ml,$ma,$mb,$bm28l,$bm28a,$bm28b);
$bdm2976=de76($ml,$ma,$mb,$bm29l,$bm29a,$bm29b);
$bdm3076=de76($ml,$ma,$mb,$bm30l,$bm30a,$bm30b);
$bmmin=min($bdm176,$bdm276,$bdm376,$bdm476,$bdm576,$bdm676,$bdm776,$bdm876,$bdm976,$bdm1076,$bdm1176,$bdm1276,$bdm1376,$bdm1476,$bdm1576,$bdm1676,$bdm1776,$bdm1876,$bdm1976,$bdm2076,$bdm2176,$bdm2276,$bdm2376,$bdm2476,$bdm2576,$bdm2676,$bdm2776,$bdm2876,$bdm2976,$bdm3076);
//$bdm194=de94($ml,$ma,$mb,$m1l,$m1a,$m1b);
?>
<?php if ($bdm176==$bmmin){ $mopt='1';$moptDb=$bm1dd;if ($m1a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm276==$bmmin){ $mopt='2';$moptDb=$bm2dd;if ($m2a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm376==$bmmin){ $mopt='3';$moptDb=$bm3dd;if ($m3a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm476==$bmmin){ $mopt='4';$moptDb=$bm4dd;if ($m4a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm576==$bmmin){ $mopt='5';$moptDb=$bm5dd;if ($m5a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm676==$bmmin){ $mopt='6';$moptDb=$bm6dd;if ($m6a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm776==$bmmin){ $mopt='7';$moptDb=$bm7dd;if ($m7a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm876==$bmmin){ $mopt='8';$moptDb=$bm8dd; if ($m8a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm976==$bmmin){ $mopt='9';$moptDb=$bm9dd;if ($m9a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1076==$bmmin){ $mopt='10';$moptDb=$bm10dd;if ($m10a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1176==$bmmin){ $mopt='11';$moptDb=$bm11dd;if ($m11a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1276==$bmmin){ $mopt='12';$moptDb=$bm12dd;if ($m12a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1376==$bmmin){ $mopt='13';$moptDb=$bm13dd;if ($m13a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1476==$bmmin){ $mopt='14';$moptDb=$bm14dd;if ($m14a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1576==$bmmin){ $mopt='15';$moptDb=$bm15dd;if ($m15a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1676==$bmmin){ $mopt='16';$moptDb=$bm16dd;if ($m16a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1776==$bmmin){ $mopt='17';$moptDb=$bm17dd;if ($m17a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1876==$bmmin){ $mopt='18';$moptDb=$bm18dd;if ($m18a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm1976==$bmmin){ $mopt='19';$moptDb=$bm19dd;if ($m19a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2076==$bmmin){ $mopt='20';$moptDb=$bm20dd;if ($m20a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2176==$bmmin){ $mopt='21';$moptDb=$bm21dd;if ($m21a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2276==$bmmin){ $mopt='22';$moptDb=$bm22dd;if ($m22a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2376==$bmmin){ $mopt='23';$moptDb=$bm23dd;if ($m23a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2476==$bmmin){ $mopt='24';$moptDb=$bm24dd;if ($m24a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2576==$bmmin){ $mopt='25';$moptDb=$bm25dd;if ($m25a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2676==$bmmin){ $mopt='26';$moptDb=$bm26dd;if ($m26a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2776==$bmmin){ $mopt='27';$moptDb=$bm27dd;if ($m27a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2876==$bmmin){ $mopt='28';$moptDb=$bm28dd;if ($m28a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm2976==$bmmin){ $mopt='29';$moptDb=$bm29dd;if ($m29a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($bdm3076==$bmmin){ $mopt='30';$moptDb=$bm30dd;if ($m30a>74) {$mdi="-";} else {$mdi='+';}}$bdy176=de76($yl,$ya,$yb,$y1l,$y1a,$y1b);
$bdy276=de76($yl,$ya,$yb,$by2l,$by2a,$by2b);
$bdy376=de76($yl,$ya,$yb,$by3l,$by3a,$by3b);
$bdy476=de76($yl,$ya,$yb,$by4l,$by4a,$by4b);
$bdy576=de76($yl,$ya,$yb,$by5l,$by5a,$by5b);
$bdy676=de76($yl,$ya,$yb,$by6l,$by6a,$by6b);
$bdy776=de76($yl,$ya,$yb,$by7l,$by7a,$by7b);
$bdy876=de76($yl,$ya,$yb,$by8l,$by8a,$by8b);
$bdy976=de76($yl,$ya,$yb,$by9l,$by9a,$by9b);
$bdy1076=de76($yl,$ya,$yb,$by10l,$by10a,$by10b);
$bdy1176=de76($yl,$ya,$yb,$by11l,$by11a,$by11b);
$bdy1276=de76($yl,$ya,$yb,$by12l,$by12a,$by12b);
$bdy1376=de76($yl,$ya,$yb,$by13l,$by13a,$by13b);
$bdy1476=de76($yl,$ya,$yb,$by14l,$by14a,$by14b);
$bdy1576=de76($yl,$ya,$yb,$by15l,$by15a,$by15b);
$bdy1676=de76($yl,$ya,$yb,$by16l,$by16a,$by16b);
$bdy1776=de76($yl,$ya,$yb,$by17l,$by17a,$by17b);
$bdy1876=de76($yl,$ya,$yb,$by18l,$by18a,$by18b);
$bdy1976=de76($yl,$ya,$yb,$by19l,$by19a,$by19b);
$bdy2076=de76($yl,$ya,$yb,$by20l,$by20a,$by20b);
$bdy2176=de76($yl,$ya,$yb,$by21l,$by21a,$by21b);
$bdy2276=de76($yl,$ya,$yb,$by22l,$by22a,$by22b);
$bdy2376=de76($yl,$ya,$yb,$by23l,$by23a,$by23b);
$bdy2476=de76($yl,$ya,$yb,$by24l,$by24a,$by24b);
$bdy2576=de76($yl,$ya,$yb,$by25l,$by25a,$by25b);
$bdy2676=de76($yl,$ya,$yb,$by26l,$by26a,$by26b);
$bdy2776=de76($yl,$ya,$yb,$by27l,$by27a,$by27b);
$bdy2876=de76($yl,$ya,$yb,$by28l,$by28a,$by28b);
$bdy2976=de76($yl,$ya,$yb,$by29l,$by29a,$by29b);
$bdy3076=de76($yl,$ya,$yb,$by30l,$by30a,$by30b);
$bymin=min($bdy176,$bdy276,$bdy376,$bdy476,$bdy576,$bdy676,$bdy776,$bdy876,$bdy976,$bdy1076,$bdy1176,$bdy1276,$bdy1376,$bdy1476,$bdy1576,$bdy1676,$bdy1776,$bdy1876,$bdy1976,$bdy2076,$bdy2176,$bdy2276,$bdy2376,$bdy2476,$bdy2576,$bdy2676,$bdy2776,$bdy2876,$bdy2976,$bdy3076);
//$bdy194=de94($yl,$ya,$yb,$y1l,$y1a,$y1b);
?>
<?php if ($bdy176==$bymin){ $yopt='1';$yoptDb=$by1dd;if ($y1b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy276==$bymin){ $yopt='2';$yoptDb=$by2dd;if ($y2b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy376==$bymin){ $yopt='3';$yoptDb=$by3dd;if ($y3b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy476==$bymin){ $yopt='4';$yoptDb=$by4dd;if ($y4b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy576==$bymin){ $yopt='5';$yoptDb=$by5dd;if ($y5b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy676==$bymin){ $yopt='6';$yoptDb=$by6dd;if ($y6b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy776==$bymin){ $yopt='7';$yoptDb=$by7dd;if ($y7b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy876==$bymin){ $yopt='8';$yoptDb=$by8dd; if ($y8b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy976==$bymin){ $yopt='9';$yoptDb=$by9dd;if ($y9b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1076==$bymin){ $yopt='10';$yoptDb=$by10dd;if ($y10b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1176==$bymin){ $yopt='11';$yoptDb=$by11dd;if ($y11b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1276==$bymin){ $yopt='12';$yoptDb=$by12dd;if ($y12b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1376==$bymin){ $yopt='13';$yoptDb=$by13dd;if ($y13b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1476==$bymin){ $yopt='14';$yoptDb=$by14dd;if ($y14b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1576==$bymin){ $yopt='15';$yoptDb=$by15dd;if ($y15b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1676==$bymin){ $yopt='16';$yoptDb=$by16dd;if ($y16b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1776==$bymin){ $yopt='17';$yoptDb=$by17dd;if ($y17b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1876==$bymin){ $yopt='18';$yoptDb=$by18dd;if ($y18b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy1976==$bymin){ $yopt='19';$yoptDb=$by19dd;if ($y19b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2076==$bymin){ $yopt='20';$yoptDb=$by20dd;if ($y20b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2176==$bymin){ $yopt='21';$yoptDb=$by21dd;if ($y21b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2276==$bymin){ $yopt='22';$yoptDb=$by22dd;if ($y22b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2376==$bymin){ $yopt='23';$yoptDb=$by23dd;if ($y23b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2476==$bymin){ $yopt='24';$yoptDb=$by24dd;if ($y24b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2576==$bymin){ $yopt='25';$yoptDb=$by25dd;if ($y25b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2676==$bymin){ $yopt='26';$yoptDb=$by26dd;if ($y26b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2776==$bymin){ $yopt='27';$yoptDb=$by27dd;if ($y27b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2876==$bymin){ $yopt='28';$yoptDb=$by28dd;if ($y28b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy2976==$bymin){ $yopt='29';$yoptDb=$by29dd;if ($y29b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($bdy3076==$bymin){ $yopt='30';$yoptDb=$by30dd;if ($y30b>93) {$ydi="-";} else {$ydi='+';}}?>
<table width="200" border="1" align="center">
<tr>
<?php // content="text/plain; charset=utf-8"
require_once ('../jpgraph/jpgraph.php');
require_once ('../jpgraph/jpgraph_scatter.php');
require_once ('../jpgraph/jpgraph_line.php');
require_once ('../jpgraph/jpgraph_plotline.php');
?>
<td>
<div align="center">
<?php // content="text/plain; charset=utf-8"
unlink('scatterC.png');
require_once ('../jpgraph/jpgraph.php');
require_once ('../jpgraph/jpgraph_scatter.php');
//echo "<br>bc1dd:".$coptDb."_bdc176:".$coptD."<br>";
$datax = array($bc1dd,$bc2dd,$bc3dd,$bc4dd,$bc5dd,$bc6dd,$bc7dd,$bc8dd,$bc9dd,$bc10dd,$bc11dd,$bc12dd,$bc13dd,$bc14dd,$bc15dd,$bc16dd,$bc17dd,$bc18dd,$bc19dd,$bc20dd,$bc21dd,$bc22dd,$bc23dd,$bc24dd,$bc25dd,$bc26dd,$bc27dd,$bc28dd,$bc29dd,$bc30dd);
$datay = array($bdc176,$bdc276,$bdc376,$bdc476,$bdc576,$bdc676,$bdc776,$bdc876,$bdc976,$bdc1076,$bdc1176,$bdc1276,$bdc1376,$bdc1476,$bdc1576,$bdc1676,$bdc1776,$bdc1876,$bdc1976,$bdc2076,$bdc2176,$bdc2276,$bdc2376,$bdc2476,$bdc2576,$bdc2676,$bdc2776,$bdc2876,$bdc2976,$bdc3076);
$dataxT = array($coptDb,$coptD);
$datayT = array($bcmin,$cmin);
$graph = new Graph(300,200);
$graph->SetScale("linint",0,8,0,0);
$graph->img->SetMargin(40,40,40,40);
$graph->SetShadow();
$graph->title->Set("C scatter plot");
$graph->title->SetFont(FF_FONT1,FS_BOLD);
//$graph->xgrid->Show();
$sp1 = new ScatterPlot($datayT,$dataxT);
$sp1->mark->SetType(MARK_SQUARE);
$sp1->SetImpuls();
$sp2 = new ScatterPlot($datay,$datax);
$sp2->SetLinkPoints(true,"#00ffff",2);
$sp2->mark->SetType(MARK_FILLEDCIRCLE);
$sp2->mark->SetFillColor("#00ffff");
$sp2->mark->SetWidth(3);
$sline = new PlotLine(HORIZONTAL,1.5,'black');
$sline2 = new PlotLine(HORIZONTAL,2.5,'#00ccff');
$sline3 = new PlotLine(HORIZONTAL,4.5,'#ff9900');
$graph->Add($sline);
$graph->Add($sline2);
$graph->Add($sline3);
$graph->Add($sp1);
$graph->Add($sp2);
$graph->Stroke('scatterC.png');
?>
<img src="scatterC.png">
</div>
</td>
<td><div align="center">
<?php // content="text/plain; charset=utf-8"
unlink('scatterM.png');
$datax = array($bm1dd,$bm2dd,$bm3dd,$bm4dd,$bm5dd,$bm6dd,$bm7dd,$bm8dd,$bm9dd,$bm10dd,$bm11dd,$bm12dd,$bm13dd,$bm14dd,$bm15dd,$bm16dd,$bm17dd,$bm18dd,$bm19dd,$bm20dd,$bm21dd,$bm22dd,$bm23dd,$bm24dd,$bm25dd,$bm26dd,$bm27dd,$bm28dd,$bm29dd,$bm30dd);
$datay = array($bdm176,$bdm276,$bdm376,$bdm476,$bdm576,$bdm676,$bdm776,$bdm876,$bdm976,$bdm1076,$bdm1176,$bdm1276,$bdm1376,$bdm1476,$bdm1576,$bdm1676,$bdm1776,$bdm1876,$bdm1976,$bdm2076,$bdm2176,$bdm2276,$bdm2376,$bdm2476,$bdm2576,$bdm2676,$bdm2776,$bdm2876,$bdm2976,$bdm3076);
$dataxT = array($moptDb,$moptD);
$datayT = array($bmmin,$mmin);
$graph = new Graph(300,200);
$graph->SetScale("linint",0,8,0,0);
$graph->img->SetMargin(40,40,40,40);
$graph->SetShadow();
$graph->title->Set("M scatter plot");
$graph->title->SetFont(FF_FONT1,FS_BOLD);
$sp1 = new ScatterPlot($datayT,$dataxT);
$sp1->mark->SetType(MARK_SQUARE);
$sp1->SetImpuls();
$sp2 = new ScatterPlot($datay,$datax);
$sp2->SetLinkPoints(true,"#ff99ff",2);
$sp2->mark->SetType(MARK_FILLEDCIRCLE);
$sp2->mark->SetFillColor("#ff99ff");
$sp2->mark->SetWidth(3);
$sline = new PlotLine(HORIZONTAL,1.5,'black');
$sline2 = new PlotLine(HORIZONTAL,2.5,'#00ccff');
$sline3 = new PlotLine(HORIZONTAL,4.5,'#ff9900');
$graph->Add($sline);
$graph->Add($sline2);
$graph->Add($sline3);
$graph->Add($sp1);
$graph->Add($sp2);
$graph->Stroke('scatterM.png');
?>
<img src="scatterM.png">
</div></td>
<td><div align="center">
<?php // content="text/plain; charset=utf-8"
unlink('scatterY.png');
$datax = array($by1dd,$by2dd,$by3dd,$by4dd,$by5dd,$by6dd,$by7dd,$by8dd,$by9dd,$by10dd,$by11dd,$by12dd,$by13dd,$by14dd,$by15dd,$by16dd,$by17dd,$by18dd,$by19dd,$by20dd,$by21dd,$by22dd,$by23dd,$by24dd,$by25dd,$by26dd,$by27dd,$by28dd,$by29dd,$by30dd);
$datay = array($bdy176,$bdy276,$bdy376,$bdy476,$bdy576,$bdy676,$bdy776,$bdy876,$bdy976,$bdy1076,$bdy1176,$bdy1276,$bdy1376,$bdy1476,$bdy1576,$bdy1676,$bdy1776,$bdy1876,$bdy1976,$bdy2076,$bdy2176,$bdy2276,$bdy2376,$bdy2476,$bdy2576,$bdy2676,$bdy2776,$bdy2876,$bdy2976,$bdy3076);
$dataxT = array($yoptDb,$yoptD);
$datayT = array($bymin,$ymin);
$graph = new Graph(300,200);
$graph->SetScale("linint",0,8,0,0);
$graph->img->SetMargin(40,40,40,40);
$graph->SetShadow();
$graph->title->Set("Y scatter plot");
$graph->title->SetFont(FF_FONT1,FS_BOLD);
//$graph->xgrid->Show();
$sp1 = new ScatterPlot($datayT,$dataxT);
$sp1->mark->SetType(MARK_SQUARE);
$sp1->SetImpuls();
$sp2 = new ScatterPlot($datay,$datax);
$sp2->SetLinkPoints(true,"#ffff99",2);
$sp2->mark->SetType(MARK_FILLEDCIRCLE);
$sp2->mark->SetFillColor("#ffff99");
$sp2->mark->SetWidth(3);
$sline = new PlotLine(HORIZONTAL,1.5,'black');
$sline2 = new PlotLine(HORIZONTAL,2.5,'#00ccff');
$sline3 = new PlotLine(HORIZONTAL,4.5,'#ff9900');
$graph->Add($sline);
$graph->Add($sline2);
$graph->Add($sline3);
$graph->Add($sp1);
$graph->Add($sp2);
$graph->Stroke('scatterY.png');
?>
<img src="scatterY.png">
</div></td>
<td><div align="center">
<?php // content="text/plain; charset=utf-8"
unlink('scatterK.png');
$datax = array($bk1dd,$bk2dd,$bk3dd,$bk4dd,$bk5dd,$bk6dd,$bk7dd,$bk8dd,$bk9dd,$bk10dd,$bk11dd,$bk12dd,$bk13dd,$bk14dd,$bk15dd,$bk16dd,$bk17dd,$bk18dd,$bk19dd,$bk20dd,$bk21dd,$bk22dd,$bk23dd,$bk24dd,$bk25dd,$bk26dd,$bk27dd,$bk28dd,$bk29dd,$bk30dd);
$datay = array($bdk176,$bdk276,$bdk376,$bdk476,$bdk576,$bdk676,$bdk776,$bdk876,$bdk976,$bdk1076,$bdk1176,$bdk1276,$bdk1376,$bdk1476,$bdk1576,$bdk1676,$bdk1776,$bdk1876,$bdk1976,$bdk2076,$bdk2176,$bdk2276,$bdk2376,$bdk2476,$bdk2576,$bdk2676,$bdk2776,$bdk2876,$bdk2976,$bdk3076);
//print_r($datax);
$dataxT = array($koptDb,$koptD);
$datayT = array($bkmin,$kmin);
$graph = new Graph(300,200);
$graph->SetScale("linint",0,8,0,0);
$graph->img->SetMargin(40,40,40,40);
$graph->SetShadow();
$graph->title->Set("K scatter plot");
$graph->title->SetFont(FF_FONT1,FS_BOLD);
$sp1 = new ScatterPlot($datayT,$dataxT);
$sp1->mark->SetType(MARK_SQUARE);
$sp1->SetImpuls();
$sp2 = new ScatterPlot($datay,$datax);
$sp2->SetLinkPoints(true,"gray",2);
$sp2->mark->SetType(MARK_FILLEDCIRCLE);
$sp2->mark->SetFillColor("gray");
$sp2->mark->SetWidth(3);
//$sp2->xgrid->Show();
$sline = new PlotLine(HORIZONTAL,1.5,'black');
$sline2 = new PlotLine(HORIZONTAL,2.5,'#00ccff');
$sline3 = new PlotLine(HORIZONTAL,4.5,'#ff9900');
$graph->Add($sline);
$graph->Add($sline2);
$graph->Add($sline3);
$graph->Add($sp1);
$graph->Add($sp2);
//$graph->AddLine($line);
$graph->Stroke('scatterK.png');
?>
<img src="scatterK.png">
</div></td>
</tr>
</table>
<table width="200" border="1" align="center">
<tr>
<td><div align="center"> id<?php echo $sNo;?></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>
</tr>
<tr bgcolor="#aaaaaa">
<td><div align="center">色差</div></td>
<td><div align="right"></div></td>
<td bgcolor="#00FFFF"><font color='<?php if ($cmin>5){echo "red";}else {echo "black";}?>'><div align="right"><?php $sum=$sum-$cmin; echo round($cmin,2);?></div></td>
<td bgcolor="#FF99FF"><font color='<?php if ($mmin>5){echo "red";}else {echo "black";}?>'><div align="right"><?php $sum=$sum-$mmin;echo round($mmin,2);?></div></td>
<td bgcolor="#FFFF99"><font color='<?php if ($ymin>5){echo "red";}else {echo "black";}?>'><div align="right"><?php $sum=$sum-$ymin; echo round($ymin,2);?></div></td>
<td bgcolor="#aaaaaa"><font color='<?php if ($kmin>5){echo "red";}else {echo "black";}?>'><div align="right"><?php $sum=$sum-$kmin; echo round($kmin,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>
</tr>
<tr>
<td><div align="center">量測濃度</div></td>
<td bgcolor="#CCCCCC"></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($coptD,2);?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo round($moptD,2);?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo round($yoptD,2);?></div></td>
<td bgcolor="#daffc2"><div align="right"><?php echo round($koptD,2);?></div></td>
</tr>
<tr>
<td><div align="center">預測濃度</div></td>
<td bgcolor="#CCCCCC"></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($coptDb,2);?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo round($moptDb,2);?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo round($yoptDb,2);?></div></td>
<td bgcolor="#daffc2"><div align="right"><?php echo round($koptDb,2);?></div></td>
</tr>
<tr>
<td><div align="center">最佳色差</div></td>
<td bgcolor="#CCCCCC"></td>
<td bgcolor="#00FFFF"><div align="right"><?php if ($bcmin>5) {?><font color="red"><?php } echo round($bcmin,2);?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php if ($bmmin>5) {?><font color="red"><?php } echo round($bmmin,2);?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php if ($bymin>5) {?><font color="red"><?php } echo round($bymin,2);?></div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php if ($bkmin>5) {?><font color="red"><?php } echo round($bkmin,2);?></div></td>
</tr>
</table>
</form>
<?php
}///////target process
else { ////2228
echo "content=1"."xx";
echo "2bd sec [26]:".$dot[26];
if ($okName=='') {
$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!");
$querys = "select okName from fogra123 where po='$dbstr[1]' and setOK='1' ORDER BY id";
//echo $querys;
$results = mysql_query($querys) or die ("Error in query: $querys. " . mysql_error());
if (mysql_num_rows($results) > 0)
{
$row = mysql_fetch_object($results);
$okName=$row->okName;}
mysql_close($connection);
}
echo "<br><table align='center'>";
echo "<tr><td bgcolor='#FFFF99'>印件目標:".$okName."</td></tr></table>";
?>
<form action="TVI-parsingCTOKXT.php?f123=<?php echo "target.txt".'&f321='.$_FILES["file"]["name"];?>" method="post">
<table width="200" border="1" align="center">
<input size="15" maxlength="50" type="hidden" name="rtarget" value=<?php echo $f321;?> /></td>
</table>
<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="#aaaaaa">5</td>
<td><font color="#aaaaaa">6</td>
<td><font color="#aaaaaa">7</td>
<td><font color="#aaaaaa">8</td>
<td><font color="#666666">9</td>
<td><font color="#666666">10</td>
<td><font color="#666666">11</td>
<td bgcolor="#aaaaaa">12T</td>
<td><font color="#666666">13</td>
<td><font color="#666666">14</td>
<td><font color="#666666">15</td>
<td><font color="#666666">16</td>
<td>17</td>
<td>18</td>
<td>19</td>
<td>20</td>
<td bgcolor="#aaaaaa">21T</td>
<td>22</td>
<td>23</td>
<td><font color="#666666">24</td>
<td><font color="#666666">25</td>
<td><font color="#666666">26</td>
<td>27</td>
<td>28</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 k2d:".$k2d."__";
/////////////////////////////////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;
$k850l=$k8l;$k850a=$k8a;$k850b=$k8b;
$k1750l=$k17l;$k1750a=$k17a;$k850b=$k17b;
$c850l=$c8l;$c850a=$c8a;$c850b=$c8b;
$c1750l=$c17l;$c1750a=$c17a;$c850b=$c17b;
$m850l=$m8l;$m850a=$m8a;$m850b=$m8b;
$m1750l=$m17l;$m1750a=$m17a;$m850b=$m17b;
$y850l=$y8l;$y850a=$y8a;$y850b=$y8b;
$y1750l=$y17l;$y1750a=$y17a;$y850b=$y17b;
$s850l=$s8l;$s850a=$s8a;$s850b=$s8b;
$s1750l=$s17l;$s1750a=$s17a;$s850b=$s17b;
$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 "<br>note 2dT:".$k2dT."__";
/////////////////////////////////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 "<br>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;
$k850lt=$k8lT;$k850at=$k8aT;$k850bt=$k8bT;
$k1750lt=$k17lT;$k1750at=$k17aT;$k850bt=$k17bT;
$c850lt=$c8lT;$c850at=$c8aT;$c850bt=$c8bT;
$c1750lt=$c17lT;$c1750at=$c17aT;$c850bt=$c17bT;
$m850lt=$m8lT;$m850at=$m8aT;$m850bt=$m8bT;
$m1750lt=$m17lT;$m1750at=$m17aT;$m850bt=$m17bT;
$y850lt=$y8lT;$y850at=$y8aT;$y850bt=$y8bT;
$y1750lt=$y17lT;$y1750at=$y17aT;$y850bt=$y17bT;
$s850lt=$s8lT;$s850at=$s8aT;$s850bt=$s8bT;
$s1750lt=$s17lT;$s1750at=$s17aT;$s850bt=$s17bT;
$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);
}
//$dk276=de76($kl,$ka,$kb,$k2l,$k2a,$k2b);
//$dk376=de76($kl,$ka,$kb,$k3l,$k3a,$k3b);
$dk476=de76($k4lT,$k4aT,$k4bT,$k4l,$k4a,$k4b);
// echo $k4lT."x".$k4aT."x".$k4bT."x".$k4l."x".$k4a."x".$k4b."x".$k4dT."xd".$k4d;
//$dk576=de76($kl,$ka,$kb,$k5l,$k5a,$k5b);
//$dk676=de76($kl,$ka,$kb,$k6l,$k6a,$k6b);
//$dk776=de76($kl,$ka,$kb,$k7l,$k7a,$k7b);
//$dk876=de76($kl,$ka,$kb,$k8l,$k8a,$k8b);
$dk976=de76($k9lT,$k9aT,$k9bT,$k9l,$k9a,$k9b);
//$dk1076=de76($kl,$ka,$kb,$k10l,$k10a,$k10b);
//$dk1176=de76($kl,$ka,$kb,$k11l,$k11a,$k11b);
//$dk1276=de76($kl,$ka,$kb,$k12l,$k12a,$k12b);
// $dk1376=de76($kl,$ka,$kb,$k13l,$k13a,$k13b);
$dk1476=de76($k14lT,$k14aT,$k14bT,$k14l,$k14a,$k14b);
$dk1976=de76($k19lT,$k19aT,$k19bT,$k19l,$k19a,$k19b);
// $dk1576=de76($kl,$ka,$kb,$k15l,$k15a,$k15b);
$asum=$asum-($dk276+$dk376+$dk476+$dk576+$dk676+$dk776+$dk876+$dk976+$dk1076+$dk1176+$dk1276+$dk1376+$dk1476+$dk1576+$dk1676+$dk1776+$dk1876+$dk1976+$dk2076+$dk2176+$dk2276+$dk2376);
// $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>
<td></td>
<td></td>
<td bgcolor="#777777"><div align="right"><?php echo round(($k8_50dT-$k8_50d),2);?></div></td>
<td><div align="right"><?php if ($dk976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dk976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dk1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dk1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="#777777"><div align="right"><?php echo round($k17_50dT-$k17_50d,2);?></div></td>
<td></td>
<td><div align="right"><?php if ($dk1976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dk1976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php }
if ($plC==1) {
//$dk276=de76($kl,$ka,$kb,$k2l,$k2a,$k2b);
//$dk376=de76($kl,$ka,$kb,$k3l,$k3a,$k3b);
$dc1976=de76($c19lT,$c19aT,$c19bT,$c19l,$c19a,$c19b);
// echo $c14lT."x".$c14aT."x".$c14bT."x".$c14l."x".$c14a."x".$c14b."x".$c14dT."xd".$c14d;
//$dc576=de76($cl,$ca,$cb,$c5l,$c5a,$c5b);
//$dc676=de76($cl,$ca,$cb,$c6l,$c6a,$c6b);
//$dc776=de76($cl,$ca,$cb,$c7l,$c7a,$c7b);
//$dc876=de76($cl,$ca,$cb,$c8l,$c8a,$c8b);
$dc976=de76($c9lT,$c9aT,$c9bT,$c9l,$c9a,$c9b);
//$dc1076=de76($cl,$ca,$cb,$c10l,$c10a,$c10b);
//$dc1176=de76($cl,$ca,$cb,$c11l,$c11a,$c11b);
//$dc1276=de76($cl,$ca,$cb,$c12l,$c12a,$c12b);
// $dc1376=de76($cl,$ca,$cb,$c13l,$c13a,$c13b);
$dc1476=de76($c14lT,$c14aT,$c14bT,$c14l,$c14a,$c14b);
// $dc1576=de76($cl,$ca,$cb,$c15l,$c15a,$c15b);
$asum=$asum-($dc176+$dc276+$dc376+$dc476+$dc576+$dc676+$dc776+$dc876+$dc976+$dc1076+$dc1176+$dc1276+$dc1376+$dc1476+$dc1576+$dc1676+$dc1776+$dc1876+$dc1976+$dc2076+$dc2176+$dc2276+$dc2376+$dc2476);
// $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></td>
<td></td>
<td></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($c8_50dT-$c8_50d,2);?></div></td>
<td><div align="right"><?php if ($dc976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dc976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dc1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dc1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($c17_50dT-$c17_50d,2);?></div></td>
<td></td>
<td><div align="right"><?php if ($dc1976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dc1976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php }
if ($plM==1) {
$dm1976=de76($m19lT,$m19aT,$m19bT,$m19l,$m19a,$m19b);
//echo $m14lT."x".$m14aT."x".$m14bT."x".$m14l."x".$m14a."x".$m14b."x".$m14dT."xd".$m14d;
$dm976=de76($m9lT,$m9aT,$m9bT,$m9l,$m9a,$m9b);
$dm1476=de76($m14lT,$m14aT,$m14bT,$m14l,$m14a,$m14b);
$asum=$asum-($dm176+$dm276+$dm376+$dm476+$dm576+$dm676+$dm776+$dm876+$dm976+$dm1076+$dm1076+$dm1276+$dm1376+$dm1476+$dm1576+$dm1676+$dm1776+$dm1876+$dm1976+$dm2076+$dm2176+$dm2276+$dm2376+$dm2476);
?>
<tr bgcolor="#e9bed7">
<td><div align="center">mE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td bgcolor="#FF00FF"><div align="right"><?php echo round($m8_50dT-$m8_50d,2);?></div></td>
<td><div align="right"><?php if ($dm976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dm976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dm1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dm1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="#FF00FF"><div align="right"><?php echo round($m17_50dT-$m17_50d,2);?></div></td>
<td></td>
<td><div align="right"><?php if ($dm1976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dm1976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php }
if ($plY==1) {
$dy1976=de76($y19lT,$y19aT,$y19bT,$y19l,$y19a,$y19b);
// echo $y14lT."x".$y14aT."x".$y14bT."x".$y14l."x".$y14a."x".$y14b."x".$y14dT."xd".$y14d;
$dy976=de76($y9lT,$y9aT,$y9bT,$y9l,$y9a,$y9b);
$dy1476=de76($y14lT,$y14aT,$y14bT,$y14l,$y14a,$y14b);
$asum=$asum-($dy276+$dy376+$dy476+$dy576+$dy676+$dy776+$dy876+$dy976+$dy1076+$dy1176+$dy1276+$dy1376+$dy1476+$dy1576+$dy1676+$dy1776+$dy1876+$dy1976+$dy2076+$dy2176+$dy2276+$dy2376);
?>
<tr bgcolor="#f2ebc0">
<td><div align="center">yE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td bgcolor="yellow"><div align="right"><?php echo round($y8_50dT-$y8_50d,2);?></div></td>
<td><div align="right"><?php if ($dy976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dy976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dy1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dy1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="yellow"><div align="right"><?php echo round($y17_50dT-$y17_50d,2);?></div></td>
<td></td>
<td><div align="right"><?php if ($dy1976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dy1976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
<td>score</td>
<td><?php echo $asum;?></td>
</tr>
<?php }
if ($plS1==1) { /////////////////////////////////////////////////////////////////////////////////////////////////s1
$ds1976=de76($s19lT,$s19aT,$s19bT,$s19l,$s19a,$s19b);
// echo $s14lT."x".$s14aT."x".$s14bT."x".$s14l."x".$s14a."x".$s14b."x".$s14dT."xd".$s14d;
$ds976=de76($s9lT,$s9aT,$s9bT,$s9l,$s9a,$s9b);
$ds1476=de76($s14lT,$s14aT,$s14bT,$s14l,$s14a,$s14b);
?>
<tr bgcolor="#daffc2">
<td><div align="center">sE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td bgcolor="green"><div align="right"><?php echo round(($s8_50dT-$s8_50d),2);?></div></td>
<td><div align="right"><?php if ($ds976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($ds976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($ds1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($ds1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="green"><div align="right"><?php echo round(($s17_50dT-$s17_50d),2);?></div></td>
<td></td>
<td><div align="right"><?php if ($ds1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($ds1476,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php } ?>
</table>
</form>
<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,$k19dT-$k19d,$k20dT-$k20d,$k21dT-$k21d,$k22dT-$k22d,$k23dT-$k23d,0.01,0.01,$dk276+2,$dk376+2,$dk476+2,$dk576+2,$dk676+2,$dk776+2,$dk876+2,$dk976+2,$dk1076+2,$dk1176+2,$dk1276+2,$dk1376+2,$dk1476+2,$dk1576+2,$dk1676+2,$dk1776+2,$dk1876+2,$dk1976+2,$dk2076+2,$dk2176+2,$dk2276+2,$dk2376+2,0.01);
$dk501=de76($k850lt,$k850at,$k850bt,$k850l,$k850a,$k850b);
$dk502=de76($k1750lt,$k1750at,$k1750bt,$k1750l,$k1750a,$k1750b);
//echo "dk50:".$dk502;
GenGraphT($k8_50dT-$k8_50d,$k17_50dT-$k17_50d,$dk501+2,$dk502+2);
?>
<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,$c20dT-$c20d,$c21dT-$c21d,$c22dT-$c22d,$c23dT-$c23d,$c24dT-$c24d,$dc176+2,$dc276+2,$dc376+2,$dc476+2,$dc576+2,$dc676+2,$dc776+2,$dc876+2,$dc976+2,$dc1076+2,$dc1176+2,$dc1276+2,$dc1376+2,$dc1476+2,$dc1576+2,$dc1676+2,$dc1776+2,$dc1876+2,$dc1976+2,$dc2076+2,$dc2176+2,$dc2276+2,$dc2376+2,$dc2476+2);
$dc501=de76($c850lt,$c850at,$c850bt,$c850l,$c850a,$c850b);
$dc502=de76($c1750lt,$c1750at,$c1750bt,$c1750l,$c1750a,$c1750b);
//echo "dk50:".$dk502;
GenGraphT2($c8_50dT-$c8_50d,$c17_50dT-$c17_50d,$dc501+2,$dc502+2);
?>
<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,$m20dT-$m20d,$m21dT-$m21d,$m22dT-$m22d,$m23dT-$m23d,$m24dT-$m24d,$dm176+2,$dm276+2,$dm376+2,$dm476+2,$dm576+2,$dm676+2,$dm776+2,$dm876+2,$dm976+2,$dm1076+2,$dm1176+2,$dm1276+2,$dm1376+2,$dm1476+2,$dm1576+2,$dm1676+2,$dm1776+2,$dm1876+2,$dm1976+2,$dm2076+2,$dm2176+2,$dm2276+2,$dm2376+2,$dm2476+2);
$dm501=de76($m850lt,$m850at,$m850bt,$m850l,$m850a,$m850b);
$dm502=de76($m1750lt,$m1750at,$m1750bt,$m1750l,$m1750a,$m1750b);
//emho "dk50:".$dk502;
GenGraphT3($m8_50dT-$m8_50d,$m17_50dT-$m17_50d,$dm501+2,$dm502+2);
?>
<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,$y19dT-$y19d,$y20dT-$y20d,$y21dT-$y21d,$y22dT-$y22d,$y23dT-$y23d,0.01,0.01,$dy276+2,$dy376+2,$dy476+2,$dy576+2,$dy676+2,$dy776+2,$dy876+2,$dy976+2,$dy1076+2,$dy1176+2,$dy1276+2,$dy1376+2,$dy1476+2,$dy1576+2,$dy1676+2,$dy1776+2,$dy1876+2,$dy1976+2,$dy2076+2,$dy2176+2,$dy2276+2,$dy2376+2,0.01);
$dy501=de76($y850lt,$y850at,$y850bt,$y850l,$y850a,$y850b);
$dy502=de76($y1750lt,$y1750at,$y1750bt,$y1750l,$y1750a,$y1750b);
//eyho "dk50:".$dk502;
GenGraphT4($y8_50dT-$y8_50d,$y17_50dT-$y17_50d,$dy501+2,$dy502+2);
?>
<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,$s19dT-$s19d,$s20dT-$s20d,$s21dT-$s21d,$s22dT-$s22d,$s23dT-$s23d,0.01,0.01,$ds276+2,$ds376+2,$ds476+2,$ds576+2,$ds676+2,$ds776+2,$ds876+2,$ds976+2,$ds1076+2,$ds1176+2,$ds1276+2,$ds1376+2,$ds1476+2,$ds1576+2,$ds1676+2,$ds1776+2,$ds1876+2,$ds1976+2,$ds2076+2,$ds2176+2,$ds2276+2,$ds2376+2,0.01);
$ds501=de76($s850lt,$s850at,$s850bt,$s850l,$s850a,$s850b);
$ds502=de76($s1750lt,$s1750at,$s1750bt,$s1750l,$s1750a,$s1750b);
//eyho "dk50:".$dk502;
GenGraphT5($s8_50dT-$s8_50d,$s17_50dT-$s17_50d,$ds501+2,$ds502+2);
?>
<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 fogra123(company, contact, email, type, filename, ascore, 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','$asum', '$passbit', NOW(), '$device', '$dsn', '$dbstr[0]', '$dbstr[1]', '$dbstr[2]', '$paper', '$ink', '$rankbit', '$k4dT','$k80db', '$k8_50dT', '$c4dT','$c80db', '$c8_50dT', '$m4dT','$m80db', '$m8_50dT', '$y4dT','$y80db', '$y8_50dT')";
//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>