File: C:/xampp/htdocs/PSASID/TVI-parsing13.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>CRPC6 SID 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
function get_betweenC ($text, $s1, $s2) {
$mid_url = "";
$pos_s = strrpos($text,$s1);
$pos_e = strpos($text,$s2);
for ( $i=$pos_s+strlen($s1) ; (( $i<($pos_e)) && $i < strlen($text)) ; $i++ ) {
$mid_url .= $text[$i];
}
return $mid_url;
}
include 'sp38XYZ.php';
include 'spXYZ.php';
include 'lab2xyz.php';
include 'SCCA06.php';
include 'xyz2lab01.php';
include 'xyz2lab.php';
//include 'DensityV.php';
$sum=260;
$check=1;
$dtime=time();
$dStr=substr($dtime,7,9)."-";
if ($_FILES["file"]["error"] > 0)
{
echo "Return Code: " . $_FILES["file"]["error"] . "<br />";
}
else
{
echo "CRPC6 SID Checking form! (for Type 1 paper, white backing)" . "<br />";
echo "Upload: " . $_FILES["file"]["name"] . "<br />";
$filename=$dStr.$_FILES["file"]["name"];
//echo "Type: " . $_FILES["file"]["type"] . "<br />";
echo "Size: " . ($_FILES["file"]["size"] / 1024) . " Kb<br />";
// echo "Temp file: " . $_FILES["file"]["tmp_name"] . "<br />";
if (file_exists("upload/" .$dStr. $_FILES["file"]["name"]))
{
echo $_FILES["file"]["name"] . " already exists. ". "<br />";
}
else
{
move_uploaded_file($_FILES["file"]["tmp_name"],
"upload/" .$dStr. $_FILES["file"]["name"]);
echo "upload sucess! " . "<br />";
echo "if you see anything in ";$check=0;$sid=0;?><font color="red">RED</font><?php echo", Fix it! " . "<br />";
echo "Report start: " . "<br />";
// echo "Stored in: " . "upload/" . $_FILES["file"]["name"]. "<br />";
///parsing start
$contents = file("upload/".$dStr.$_FILES["file"]["name"]);
$stringC = implode($contents);
$fMark = strrpos($stringC,'i1Profiler');
//echo "fMark:".$fMark."<br>";
$fMarkC = strrpos($stringC,'ColorPort');
//echo "fMarkC:".$fMarkC."<br>";
if ($fMark>0) { ////////////////////////////////////////////////////////////// i1 profiler go 437
$cols=get_betweenC($stringC,"NUMBER_OF_FIELDS",'BEGIN_DATA_FORMAT');
//echo "cols:".$cols."_zz<br>";
//echo $contents[20];
//echo $stringC;
$string = implode($contents);
$p = ereg_replace("\r\n?", "\n", $string);
$p = str_replace("\n", ',', $p);
//echo $p;
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;
}
$datastring=get_between($p,"BEGIN_DATA,",",END_DATA");
$dot = explode("\t", $datastring);
//print_r ($dot);
echo "<br>";
$Pdot=0; //paper
//echo "take:".$dot[6+$cols*$Pdot];
$PX=sp38XYZ("X",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$PY=sp38XYZ("Y",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$PZ=sp38XYZ("Z",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
//echo "take PX:".$PX."_Y:".$PY."_Z:".$PZ;
$PL=xyz2lab01("l",$PX,$PY,$PZ);
$Pa=xyz2lab01("a",$PX,$PY,$PZ);
$Pb=xyz2lab01("b",$PX,$PY,$PZ);
//$depaper=sqrt(pow((95-$PL),2)+ pow((1-$Pa),2)+pow(((4)-$Pb),2));
echo "CRPC6 paper: L:95, a:1, b:-4<br />";
echo "paper measured: L:".$PL.", a:".$Pa.", b:".$Pb. "<br />";
//echo "CRPC 6 Paper: 95 1 -4,<br> Cyan:56 -37 -50".", Magenta:48 75 -4".", Yellow:89 -4 93".", Black:16 0 0". "<br />";
$RPCCl=56;$RPCCa=-37;$RPCCb=-50;
$RPCMl=48;$RPCMa=75;$RPCMb=-4;
$RPCYl=89;$RPCYa=-4;$RPCYb=93;
$RPCKl=16;$RPCKa=0.01;$RPCKb=0.01;
$Xp=$PX*100;
$Yp=$PY*100;
$Zp=$PZ*100;
//////////////////////////////////////////////////////////////
$RPCCX=lab2xyz("x",$RPCCl,$RPCCa,$RPCCb);
$RPCCY=lab2xyz("y",$RPCCl,$RPCCa,$RPCCb);
$RPCCZ=lab2xyz("z",$RPCCl,$RPCCa,$RPCCb);
$scCX=SCCA06("x",$RPCCX,$Xp);
$scCY=SCCA06("y",$RPCCY,$Yp);
$scCZ=SCCA06("z",$RPCCZ,$Zp);
$scCL=xyz2lab("l",$scCX,$scCY,$scCZ);
$scCa=xyz2lab("a",$scCX,$scCY,$scCZ);
$scCb=xyz2lab("b",$scCX,$scCY,$scCZ);
/////////////////////////////////////////////////////////////
$RPCMX=lab2xyz("x",$RPCMl,$RPCMa,$RPCMb);
$RPCMY=lab2xyz("y",$RPCMl,$RPCMa,$RPCMb);
$RPCMZ=lab2xyz("z",$RPCMl,$RPCMa,$RPCMb);
$scMX=SCCA06("x",$RPCMX,$Xp);
$scMY=SCCA06("y",$RPCMY,$Yp);
$scMZ=SCCA06("z",$RPCMZ,$Zp);
$scML=xyz2lab("l",$scMX,$scMY,$scMZ);
$scMa=xyz2lab("a",$scMX,$scMY,$scMZ);
$scMb=xyz2lab("b",$scMX,$scMY,$scMZ);
////////////////////////////////////////////////////////////////
$RPCYX=lab2xyz("x",$RPCYl,$RPCYa,$RPCYb);
$RPCYY=lab2xyz("y",$RPCYl,$RPCYa,$RPCYb);
$RPCYZ=lab2xyz("z",$RPCYl,$RPCYa,$RPCYb);
$scYX=SCCA06("x",$RPCYX,$Xp);
$scYY=SCCA06("y",$RPCYY,$Yp);
$scYZ=SCCA06("z",$RPCYZ,$Zp);
$scYL=xyz2lab("l",$scYX,$scYY,$scYZ);
$scYa=xyz2lab("a",$scYX,$scYY,$scYZ);
$scYb=xyz2lab("b",$scYX,$scYY,$scYZ);
////////////////////////////////////////////////////////////////////
$RPCKX=lab2xyz("x",$RPCKl,$RPCKa,$RPCKb);
$RPCKY=lab2xyz("y",$RPCKl,$RPCKa,$RPCKb);
$RPCKZ=lab2xyz("z",$RPCKl,$RPCKa,$RPCKb);
$scKX=SCCA06("x",$RPCKX,$Xp);
$scKY=SCCA06("y",$RPCKY,$Yp);
$scKZ=SCCA06("z",$RPCKZ,$Zp);
$scKL=xyz2lab("l",$scKX,$scKY,$scKZ);
$scKa=xyz2lab("a",$scKX,$scKY,$scKZ);
$scKb=xyz2lab("b",$scKX,$scKY,$scKZ);
echo "CRPC 6 SCCA <br> Cyan L:".round($scCL,2)." a:".round($scCa,2)." b:".round($scCb,2)."<br>Magenta L:".round($scML,2)." a:".round($scMa,2)." b:".round($scMb,2)."<br>Yellow L:".round($scYL,2)." a:".round($scYa,2)." b:".round($scYb,2)."<br>Black L:".round($scKL,2)." a:".round($scKa,2)." b:".round($scKb,2). "<br />";
?>
<p><p>
<table width="200" border="1" align="center">
<tr>
<td><div align="center">SID</div></td>
<td><font color="#aaaaaa">1</td>
<td><font color="#aaaaaa">2</td>
<td><font color="#aaaaaa">3</td>
<td><font color="#aaaaaa">4</td>
<td><font color="#aaaaaa">5</td>
<td><font color="#666666">6</td>
<td><font color="#666666">7</td>
<td><font color="#666666">8</td>
<td><font color="#666666">9</td>
<td><font color="#666666">10</td>
<td><font color="#666666">11</td>
<td><font color="#666666">12</td>
<td><font color="#666666">13</td>
<td>14</td>
<td>15</td>
<td>16</td>
<td>17</td>
<td>18</td>
<td>19</td>
<td>20</td>
<td><font color="#666666">21</td>
<td><font color="#666666">22</td>
<td><font color="#666666">23</td>
<td>24</td>
<td>25</td>
<td>26</td>
<td>27</td>
<td>28</td>
<td>29</td>
<td>30</td>
</tr>
<?php
//////////////////////////////////////////////////Fogra Media Check
$psum=20;
// $pl=95; $pa=-0.01;$pb=-2;
$cl=$scCL; $ca=$scCa;$cb=$scCb;
$ml=$scML; $ma=$scMa;$mb=$scMb;
$yl=$scYL; $ya=$scYa;$yb=$scYb;
$kl=$scKL; $ka=$scKa;$kb=$scKb;
include 'densityV38.php';
include 'densityV.php';
//////////////////////////////mc///////////////////////////////////////////////////////////
$Pdot=1;
$mcx=sp38XYZ("X",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$mcy=sp38XYZ("Y",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$mcz=sp38XYZ("Z",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$mcl=xyz2lab01("l",$mcx,$mcy,$mcz);
$mca=xyz2lab01("a",$mcx,$mcy,$mcz);
$mcb=xyz2lab01("b",$mcx,$mcy,$mcz);
$mcD=DensitySp38("C",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
////////////////////////////////////////////////////// mk
$Pdot=4;
$mkx=sp38XYZ("X",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$mky=sp38XYZ("Y",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$mkz=sp38XYZ("Z",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$mkl=xyz2lab01("l",$mkx,$mky,$mkz);
$mka=xyz2lab01("a",$mkx,$mky,$mkz);
$mkb=xyz2lab01("b",$mkx,$mky,$mkz);
$mkD=DensitySp38("K",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
////////////////////////////////////////////////////// mm
$Pdot=2;
$mmx=sp38XYZ("X",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$mmy=sp38XYZ("Y",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$mmz=sp38XYZ("Z",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$mml=xyz2lab01("l",$mmx,$mmy,$mmz);
$mma=xyz2lab01("a",$mmx,$mmy,$mmz);
$mmb=xyz2lab01("b",$mmx,$mmy,$mmz);
$mmD=DensitySp38("M",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
////////////////////////////////////////////////////// my
$Pdot=3;
$myx=sp38XYZ("X",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$myy=sp38XYZ("Y",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$myz=sp38XYZ("Z",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
$myl=xyz2lab01("l",$myx,$myy,$myz);
$mya=xyz2lab01("a",$myx,$myy,$myz);
$myb=xyz2lab01("b",$myx,$myy,$myz);
$myD=DensitySp38("Y",$dot[6+$cols*$Pdot],$dot[6+$cols*$Pdot+1],$dot[6+$cols*$Pdot+2],$dot[6+$cols*$Pdot+3],$dot[6+$cols*$Pdot+4],$dot[6+$cols*$Pdot+5],$dot[6+$cols*$Pdot+6],$dot[6+$cols*$Pdot+7],$dot[6+$cols*$Pdot+8],$dot[6+$cols*$Pdot+9],$dot[6+$cols*$Pdot+10],$dot[6+$cols*$Pdot+11],$dot[6+$cols*$Pdot+12],$dot[6+$cols*$Pdot+13],$dot[6+$cols*$Pdot+14],$dot[6+$cols*$Pdot+15],$dot[6+$cols*$Pdot+16],$dot[6+$cols*$Pdot+17],$dot[6+$cols*$Pdot+18],$dot[6+$cols*$Pdot+19],$dot[6+$cols*$Pdot+20],$dot[6+$cols*$Pdot+21],$dot[6+$cols*$Pdot+22],$dot[6+$cols*$Pdot+23],$dot[6+$cols*$Pdot+24],$dot[6+$cols*$Pdot+25],$dot[6+$cols*$Pdot+26],$dot[6+$cols*$Pdot+27],$dot[6+$cols*$Pdot+28],$dot[6+$cols*$Pdot+29],$dot[6+$cols*$Pdot+30],$dot[6+$cols*$Pdot+31],$dot[6+$cols*$Pdot+32],$dot[6+$cols*$Pdot+33],$dot[6+$cols*$Pdot+34],$dot[6+$cols*$Pdot+35]);
////////////////sec K
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=4;////K line
$si=0;
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dot[6+$cols*($Pdot+2)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[6+$cols*$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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($k1dd,3);
}
//////////////////////sec C
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=1;////C line
$si=0;
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dot[6+$cols*($Pdot+8)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[6+$cols*$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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);
}
//////////////////////////sec M
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=2;////M line
$si=0;
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dot[6+$cols*($Pdot+6)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[6+$cols*$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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);
//echo "K1D=".round($k1dd,3);
}
///////////////////sec Y
$ki=0.880;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=3;////Y line
$si=0;
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dot[6+$cols*($Pdot+4)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[6+$cols*$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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($k1dd,3);
}
}////////////////////////////fMark i1Profiler
////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////
if ($fMarkC>0) { ////////////////////////////////////////////////////////////// ColorPort 400
$cols=get_betweenC($stringC,"NUMBER_OF_FIELDS",'WEIGHTING_FUNCTION ');
//echo "cols:".$cols."_zz<br>";
//echo $contents[20];
//echo $stringC;
$string = implode($contents);
$p = ereg_replace("\r\n?", "\n", $string);
$p = str_replace("\n", ',', $p);
//echo $p;
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;
}
$datastring=get_between($p,"BEGIN_DATA,",",END_DATA");
$dot = explode("\t", $datastring);
//print_r ($dot);
echo "<br>";
$Pdot=0;///paper line
//echo "take:".$dot[9+$cols*$Pdot-$Pdot];
if ($cols<>45) { /////////////// 400- 700
$PX=spXYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$PY=spXYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$PZ=spXYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
}
else { /////380-730 paper
$PX=sp38XYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$PY=sp38XYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$PZ=sp38XYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
}
//echo "take PX:".$PX."_Y:".$PY."_Z:".$PZ;
$PL=xyz2lab01("l",$PX,$PY,$PZ);
$Pa=xyz2lab01("a",$PX,$PY,$PZ);
$Pb=xyz2lab01("b",$PX,$PY,$PZ);
//$depaper=sqrt(pow((95-$PL),2)+ pow((1-$Pa),2)+pow(((4)-$Pb),2));
echo "CRPC6 paper: L:95, a:1, b:-4<br />";
echo "paper measured: L:".$PL.", a:".$Pa.", b:".$Pb. "<br />";
//echo "CRPC 6 Paper: 95 1 -4,<br> Cyan:56 -37 -50".", Magenta:48 75 -4".", Yellow:89 -4 93".", Black:16 0 0". "<br />";
$RPCCl=56;$RPCCa=-37;$RPCCb=-50;
$RPCMl=48;$RPCMa=75;$RPCMb=-4;
$RPCYl=89;$RPCYa=-4;$RPCYb=93;
$RPCKl=16;$RPCKa=0.01;$RPCKb=0.01;
$Xp=$PX*100;
$Yp=$PY*100;
$Zp=$PZ*100;
//////////////////////////////////////////////////////////////
$RPCCX=lab2xyz("x",$RPCCl,$RPCCa,$RPCCb);
$RPCCY=lab2xyz("y",$RPCCl,$RPCCa,$RPCCb);
$RPCCZ=lab2xyz("z",$RPCCl,$RPCCa,$RPCCb);
$scCX=SCCA06("x",$RPCCX,$Xp);
$scCY=SCCA06("y",$RPCCY,$Yp);
$scCZ=SCCA06("z",$RPCCZ,$Zp);
$scCL=xyz2lab("l",$scCX,$scCY,$scCZ);
$scCa=xyz2lab("a",$scCX,$scCY,$scCZ);
$scCb=xyz2lab("b",$scCX,$scCY,$scCZ);
/////////////////////////////////////////////////////////////
$RPCMX=lab2xyz("x",$RPCMl,$RPCMa,$RPCMb);
$RPCMY=lab2xyz("y",$RPCMl,$RPCMa,$RPCMb);
$RPCMZ=lab2xyz("z",$RPCMl,$RPCMa,$RPCMb);
$scMX=SCCA06("x",$RPCMX,$Xp);
$scMY=SCCA06("y",$RPCMY,$Yp);
$scMZ=SCCA06("z",$RPCMZ,$Zp);
$scML=xyz2lab("l",$scMX,$scMY,$scMZ);
$scMa=xyz2lab("a",$scMX,$scMY,$scMZ);
$scMb=xyz2lab("b",$scMX,$scMY,$scMZ);
////////////////////////////////////////////////////////////////
$RPCYX=lab2xyz("x",$RPCYl,$RPCYa,$RPCYb);
$RPCYY=lab2xyz("y",$RPCYl,$RPCYa,$RPCYb);
$RPCYZ=lab2xyz("z",$RPCYl,$RPCYa,$RPCYb);
$scYX=SCCA06("x",$RPCYX,$Xp);
$scYY=SCCA06("y",$RPCYY,$Yp);
$scYZ=SCCA06("z",$RPCYZ,$Zp);
$scYL=xyz2lab("l",$scYX,$scYY,$scYZ);
$scYa=xyz2lab("a",$scYX,$scYY,$scYZ);
$scYb=xyz2lab("b",$scYX,$scYY,$scYZ);
////////////////////////////////////////////////////////////////////
$RPCKX=lab2xyz("x",$RPCKl,$RPCKa,$RPCKb);
$RPCKY=lab2xyz("y",$RPCKl,$RPCKa,$RPCKb);
$RPCKZ=lab2xyz("z",$RPCKl,$RPCKa,$RPCKb);
$scKX=SCCA06("x",$RPCKX,$Xp);
$scKY=SCCA06("y",$RPCKY,$Yp);
$scKZ=SCCA06("z",$RPCKZ,$Zp);
$scKL=xyz2lab("l",$scKX,$scKY,$scKZ);
$scKa=xyz2lab("a",$scKX,$scKY,$scKZ);
$scKb=xyz2lab("b",$scKX,$scKY,$scKZ);
echo "CRPC 6 SCCA <br> Cyan L:".round($scCL,2)." a:".round($scCa,2)." b:".round($scCb,2)."<br>Magenta L:".round($scML,2)." a:".round($scMa,2)." b:".round($scMb,2)."<br>Yellow L:".round($scYL,2)." a:".round($scYa,2)." b:".round($scYb,2)."<br>Black L:".round($scKL,2)." a:".round($scKa,2)." b:".round($scKb,2). "<br />";
?>
<p><p>
<table width="200" border="1" align="center">
<tr>
<td><div align="center">SID</div></td>
<td><font color="#aaaaaa">1</td>
<td><font color="#aaaaaa">2</td>
<td><font color="#aaaaaa">3</td>
<td><font color="#aaaaaa">4</td>
<td><font color="#aaaaaa">5</td>
<td><font color="#666666">6</td>
<td><font color="#666666">7</td>
<td><font color="#666666">8</td>
<td><font color="#666666">9</td>
<td><font color="#666666">10</td>
<td><font color="#666666">11</td>
<td><font color="#666666">12</td>
<td><font color="#666666">13</td>
<td>14</td>
<td>15</td>
<td>16</td>
<td>17</td>
<td>18</td>
<td>19</td>
<td>20</td>
<td><font color="#666666">21</td>
<td><font color="#666666">22</td>
<td><font color="#666666">23</td>
<td>24</td>
<td>25</td>
<td>26</td>
<td>27</td>
<td>28</td>
<td>29</td>
<td>30</td>
</tr>
<?php
//////////////////////////////////////////////////Fogra Media Check
$psum=20;
// $pl=95; $pa=-0.01;$pb=-2;
$cl=$scCL; $ca=$scCa;$cb=$scCb;
$ml=$scML; $ma=$scMa;$mb=$scMb;
$yl=$scYL; $ya=$scYa;$yb=$scYb;
$kl=$scKL; $ka=$scKa;$kb=$scKb;
include 'densityV38.php';
include 'densityV.php';
if ($cols<>45) { ////////400-700
$Pdot=4;/////K
$mkx=spXYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$mky=spXYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$mkz=spXYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$mkl=xyz2lab01("l",$mkx,$mky,$mkz);
$mka=xyz2lab01("a",$mkx,$mky,$mkz);
$mkb=xyz2lab01("b",$mkx,$mky,$mkz);
$mkD=DensitySp("K",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
////////////////////////////////sec c
$Pdot=1;
$mcx=spXYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$mcy=spXYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$mcz=spXYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$mcl=xyz2lab01("l",$mcx,$mcy,$mcz);
$mca=xyz2lab01("a",$mcx,$mcy,$mcz);
$mcb=xyz2lab01("b",$mcx,$mcy,$mcz);
$mcD=DensitySp("C",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
///////////////////////////////////////////////////////////////sec M
$Pdot=2;
$mmx=spXYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$mmy=spXYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$mmz=spXYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$mml=xyz2lab01("l",$mmx,$mmy,$mmz);
$mma=xyz2lab01("a",$mmx,$mmy,$mmz);
$mmb=xyz2lab01("b",$mmx,$mmy,$mmz);
$mmD=DensitySp("M",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
////////////////////////////////////sec Y
$Pdot=3;
$myx=spXYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$myy=spXYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$myz=spXYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
$myl=xyz2lab01("l",$myx,$myy,$myz);
$mya=xyz2lab01("a",$myx,$myy,$myz);
$myb=xyz2lab01("b",$myx,$myy,$myz);
$myD=DensitySp("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30]);
/////////////////////////////////////////////////////////////////////////
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=4;////K line
$si=0;
for ($s=400; $s<=700; $s+=10) {
${'p'.$s}=$dot[9+$cols*($Pdot+2)-($Pdot+2)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[9+$cols*$Pdot-$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'k'.$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);
${'k'.$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);
${'k'.$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($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'}=DensitySp("K",$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);
//////////////////////////////////////////sec c
}
}
else { ///////////////////380-730
$Pdot=4;
$mkx=sp38XYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$mky=sp38XYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$mkz=sp38XYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$mkl=xyz2lab01("l",$mkx,$mky,$mkz);
$mka=xyz2lab01("a",$mkx,$mky,$mkz);
$mkb=xyz2lab01("b",$mkx,$mky,$mkz);
$mkD=DensitySp38("K",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
////////////////////////////////sec c
$Pdot=1;
$mcx=sp38XYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$mcy=sp38XYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$mcz=sp38XYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$mcl=xyz2lab01("l",$mcx,$mcy,$mcz);
$mca=xyz2lab01("a",$mcx,$mcy,$mcz);
$mcb=xyz2lab01("b",$mcx,$mcy,$mcz);
$mcD=DensitySp38("C",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
///////////////////////////////////////////////////////////////sec M
$Pdot=2;
$mmx=sp38XYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$mmy=sp38XYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$mmz=sp38XYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$mml=xyz2lab01("l",$mmx,$mmy,$mmz);
$mma=xyz2lab01("a",$mmx,$mmy,$mmz);
$mmb=xyz2lab01("b",$mmx,$mmy,$mmz);
$mmD=DensitySp38("M",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
////////////////////////////////////sec Y
$Pdot=3;
$myx=sp38XYZ("X",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$myy=sp38XYZ("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$myz=sp38XYZ("Z",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
$myl=xyz2lab01("l",$myx,$myy,$myz);
$mya=xyz2lab01("a",$myx,$myy,$myz);
$myb=xyz2lab01("b",$myx,$myy,$myz);
$myD=DensitySp38("Y",$dot[9+$cols*$Pdot-$Pdot],$dot[9+$cols*$Pdot-$Pdot+1],$dot[9+$cols*$Pdot-$Pdot+2],$dot[9+$cols*$Pdot-$Pdot+3],$dot[9+$cols*$Pdot-$Pdot+4],$dot[9+$cols*$Pdot-$Pdot+5],$dot[9+$cols*$Pdot-$Pdot+6],$dot[9+$cols*$Pdot-$Pdot+7],$dot[9+$cols*$Pdot-$Pdot+8],$dot[9+$cols*$Pdot-$Pdot+9],$dot[9+$cols*$Pdot-$Pdot+10],$dot[9+$cols*$Pdot-$Pdot+11],$dot[9+$cols*$Pdot-$Pdot+12],$dot[9+$cols*$Pdot-$Pdot+13],$dot[9+$cols*$Pdot-$Pdot+14],$dot[9+$cols*$Pdot-$Pdot+15],$dot[9+$cols*$Pdot-$Pdot+16],$dot[9+$cols*$Pdot-$Pdot+17],$dot[9+$cols*$Pdot-$Pdot+18],$dot[9+$cols*$Pdot-$Pdot+19],$dot[9+$cols*$Pdot-$Pdot+20],$dot[9+$cols*$Pdot-$Pdot+21],$dot[9+$cols*$Pdot-$Pdot+22],$dot[9+$cols*$Pdot-$Pdot+23],$dot[9+$cols*$Pdot-$Pdot+24],$dot[9+$cols*$Pdot-$Pdot+25],$dot[9+$cols*$Pdot-$Pdot+26],$dot[9+$cols*$Pdot-$Pdot+27],$dot[9+$cols*$Pdot-$Pdot+28],$dot[9+$cols*$Pdot-$Pdot+29],$dot[9+$cols*$Pdot-$Pdot+30],$dot[9+$cols*$Pdot-$Pdot+31],$dot[9+$cols*$Pdot-$Pdot+32],$dot[9+$cols*$Pdot-$Pdot+33],$dot[9+$cols*$Pdot-$Pdot+34],$dot[9+$cols*$Pdot-$Pdot+35]);
/////////////////////////////////////////////////////////////////////////
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=4;////K line
//$p380=$dot[9+$cols*($Pdot+2)-($Pdot+2)+1];
//$m380=$dot[9+$cols*$Pdot-$Pdot+1];
//$r380=pow(10,-((((-log10($m380))-(-log10($p380)))*0.145)+(-log10($p380))))*1;
//$r380=pow(10,(-log($dot[9+$cols*$Pdot-$Pdot]))); =10^(-((((-LOG(U$12))-(-LOG(U$11)))*$T58)+(-LOG(U$11))))*1
//echo "p380:".$p380."me380:".$m380."r380:".$r380."xx<br>";
$si=0;
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dot[9+$cols*($Pdot+2)-($Pdot+2)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[9+$cols*$Pdot-$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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($k1dd,3);
}
}
//////////////////////////////////////////////////sec C
if ($cols<>45) { ///////////400nm
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=1;////c line
$si=0;
for ($s=400; $s<=700; $s+=10) {
${'p'.$s}=$dot[9+$cols*($Pdot+8)-($Pdot+8)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[9+$cols*$Pdot-$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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($c1X,3).",".round($c1Y,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'}=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);
}
}
else {
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=1;////C line
//$p380=$dot[9+$cols*($Pdot+8)-($Pdot+8)+0];
//$m380=$dot[9+$cols*$Pdot-$Pdot+0];
//$r380=pow(10,-((((-log10($m380))-(-log10($p380)))*0.145)+(-log10($p380))))*1;
//$r380=pow(10,(-log($dot[9+$cols*$Pdot-$Pdot]))); =10^(-((((-LOG(U$12))-(-LOG(U$11)))*$T58)+(-LOG(U$11))))*1
//echo "p380:".$p380."me380:".$m380."r380:".$r380."xx<br>";
$si=0;
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dot[9+$cols*($Pdot+8)-($Pdot+8)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[9+$cols*$Pdot-$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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 "cX1=".round($c1X,3).",".round($c1Y,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 "c1L=".round(${'c'.$i.'l'},3).",".round(${'c'.$i.'a'},3).",".round(${'c'.$i.'b'},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 "c1D=".round($c1dd,3);
}
}
//echo "take c:".$c6ll."_Y:".$c6aa."_Z:".$c6bb."_d:".$c6dd;
///////////////////////////////////////////////////////////////////////
///
//////////////////////////////////////////////////////////sec M
if ($cols<>45) {
/////////////////////////////////////Sec M
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=2;////M line
$si=0;
for ($s=400; $s<=700; $s+=10) {
${'p'.$s}=$dot[9+$cols*($Pdot+6)-($Pdot+6)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[9+$cols*$Pdot-$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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);
//emho "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'});
//emho "K1L=".round($m1l,3).",".round($m1a,3).",".round($m1b,3);
${'m'.$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);
}
}
else {
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=2;////M line
//$p380=$dot[9+$cols*($Pdot+8)-($Pdot+8)+0];
//$m380=$dot[9+$cols*$Pdot-$Pdot+0];
//$r380=pow(10,-((((-log10($m380))-(-log10($p380)))*0.145)+(-log10($p380))))*1;
//$r380=pow(10,(-log($dot[9+$cols*$Pdot-$Pdot]))); =10^(-((((-LOG(U$12))-(-LOG(U$11)))*$T58)+(-LOG(U$11))))*1
//echo "p380:".$p380."me380:".$m380."r380:".$r380."xx<br>";
$si=0;
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dot[9+$cols*($Pdot+6)-($Pdot+6)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[9+$cols*$Pdot-$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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 "mX1=".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 "m".$i."=".round(${'m'.$i.'l'},3).",".round(${'m'.$i.'a'},3).",".round(${'m'.$i.'b'},3)."<br>";
${'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);
//echo "m1D=".round($m1dd,3);
}
}
//echo "take m:".$m6ll."_Y:".$m6aa."_Z:".$m6bb."_d:".$m6dd;
///////////////////////////////////////////////////////////////////////
///
//////////////////////////////////////////////////////////sec Y
if ($cols<>45) {
///////////////////////////////////////sec Y
$ki=0.880;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=3;////y line
$si=0;
for ($s=400; $s<=700; $s+=10) {
${'p'.$s}=$dot[9+$cols*($Pdot+4)-($Pdot+4)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[9+$cols*$Pdot-$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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);
//eyho "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'}=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);
}
}
else {
$ki=0.880;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=3;////y line
//$p380=$dot[9+$cols*($Pdot+8)-($Pdot+8)+0];
//$m380=$dot[9+$cols*$Pdot-$Pdot+0];
//$r380=pow(10,-((((-log10($m380))-(-log10($p380)))*0.145)+(-log10($p380))))*1;
//$r380=pow(10,(-log($dot[9+$cols*$Pdot-$Pdot]))); =10^(-((((-LOG(U$12))-(-LOG(U$11)))*$T58)+(-LOG(U$11))))*1
//echo "p380:".$p380."me380:".$m380."r380:".$r380."xx<br>";
$si=0;
for ($s=380; $s<=730; $s+=10) {
${'p'.$s}=$dot[9+$cols*($Pdot+4)-($Pdot+4)+$si];
//echo "p".$s."=".${'p'.$s}.",";
${'m'.$s}=$dot[9+$cols*$Pdot-$Pdot+$si];
//echo "m".$s."=".${'m'.$s}.",";
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo "r".$s."=".round(${'r'.$s},3).",";
$si=$si+1;
}
$ki=$ki+0.015;
${'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 "yX1=".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 "y1L=".round(${'y'.$i.'l'},3).",".round(${'y'.$i.'a'},3).",".round(${'y'.$i.'b'},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 "y1D=".round($y1dd,3);
}
}
//echo "take y:".$y6ll."_Y:".$y6aa."_Z:".$y6bb."_d:".$y6dd;
///////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////sec Y
}////////////////////////////fMark ColorPort
include 'dE00.php';
$tt00=de00(55,-37,-50,54.3,-34.47,-52.63);
$dek00=de00($kl,$ka,$kb,$mkl,$mka,$mkb);
$dec00=de00($cl,$ca,$cb,$mcl,$mca,$mcb);
$dem00=de00($ml,$ma,$mb,$mml,$mma,$mmb);
$dey00=de00($yl,$ya,$yb,$myl,$mya,$myb);
$dk176=de00($kl,$ka,$kb,$k1l,$k1a,$k1b);
$dk276=de00($kl,$ka,$kb,$k2l,$k2a,$k2b);
$dk376=de00($kl,$ka,$kb,$k3l,$k3a,$k3b);
$dk476=de00($kl,$ka,$kb,$k4l,$k4a,$k4b);
$dk576=de00($kl,$ka,$kb,$k5l,$k5a,$k5b);
$dk676=de00($kl,$ka,$kb,$k6l,$k6a,$k6b);
$dk776=de00($kl,$ka,$kb,$k7l,$k7a,$k7b);
$dk876=de00($kl,$ka,$kb,$k8l,$k8a,$k8b);
$dk976=de00($kl,$ka,$kb,$k9l,$k9a,$k9b);
$dk1076=de00($kl,$ka,$kb,$k10l,$k10a,$k10b);
$dk1176=de00($kl,$ka,$kb,$k11l,$k11a,$k11b);
$dk1276=de00($kl,$ka,$kb,$k12l,$k12a,$k12b);
$dk1376=de00($kl,$ka,$kb,$k13l,$k13a,$k13b);
$dk1476=de00($kl,$ka,$kb,$k14l,$k14a,$k14b);
$dk1576=de00($kl,$ka,$kb,$k15l,$k15a,$k15b);
$dk1676=de00($kl,$ka,$kb,$k16l,$k16a,$k16b);
$dk1776=de00($kl,$ka,$kb,$k17l,$k17a,$k17b);
$dk1876=de00($kl,$ka,$kb,$k18l,$k18a,$k18b);
$dk1976=de00($kl,$ka,$kb,$k19l,$k19a,$k19b);
$dk2076=de00($kl,$ka,$kb,$k20l,$k20a,$k20b);
$dk2176=de00($kl,$ka,$kb,$k21l,$k21a,$k21b);
$dk2276=de00($kl,$ka,$kb,$k22l,$k22a,$k22b);
$dk2376=de00($kl,$ka,$kb,$k23l,$k23a,$k23b);
$dk2476=de00($kl,$ka,$kb,$k24l,$k24a,$k24b);
$dk2576=de00($kl,$ka,$kb,$k25l,$k25a,$k25b);
$dk2676=de00($kl,$ka,$kb,$k26l,$k26a,$k26b);
$dk2776=de00($kl,$ka,$kb,$k27l,$k27a,$k27b);
$dk2876=de00($kl,$ka,$kb,$k28l,$k28a,$k28b);
$dk2976=de00($kl,$ka,$kb,$k29l,$k29a,$k29b);
$dk3076=de00($kl,$ka,$kb,$k30l,$k30a,$k30b);
$kmin=min($dk176,$dk276,$dk376,$dk476,$dk576,$dk676,$dk776,$dk876,$dk976,$dk1076,$dk1176,$dk1276,$dk1376,$dk1476,$dk1576,$dk1676,$dk1776,$dk1876,$dk1976,$dk2076,$dk2176,$dk2276,$dk2376,$dk2476,$dk2576,$dk2676,$dk2776,$dk2876,$dk2976,$dk3076);
// $dk194=de94($kl,$ka,$kb,$k1l,$k1a,$k1b);
?>
<tr bgcolor="#aaaaaa">
<td><div align="center">KD</div></td>
<td><div align="right"><?php echo round($k1dd,2);?></div></td>
<td><div align="right"><?php echo round($k2dd,2);?></div></td>
<td><div align="right"><?php echo round($k3dd,2);?></div></td>
<td><div align="right"><?php echo round($k4dd,2);?></div></td>
<td><div align="right"><?php echo round($k5dd,2);?></div></td>
<td><div align="right"><?php echo round($k6dd,2);?></div></td>
<td><div align="right"><?php echo round($k7dd,2);?></div></td>
<td><div align="right"><?php echo round($k8dd,2);?></div></td>
<td><div align="right"><?php echo round($k9dd,2);?></div></td>
<td><div align="right"><?php echo round($k10dd,2);?></div></td>
<td><div align="right"><?php echo round($k11dd,2);?></div></td>
<td><div align="right"><?php echo round($k12dd,2);?></div></td>
<td><div align="right"><?php echo round($k13dd,2);?></div></td>
<td><div align="right"><?php echo round($k14dd,2);?></div></td>
<td><div align="right"><?php echo round($k15dd,2);?></div></td>
<td><div align="right"><?php echo round($k16dd,2);?></div></td>
<td><div align="right"><?php echo round($k17dd,2);?></div></td>
<td><div align="right"><?php echo round($k18dd,2);?></div></td>
<td><div align="right"><?php echo round($k19dd,2);?></div></td>
<td><div align="right"><?php echo round($k20dd,2);?></div></td>
<td><div align="right"><?php echo round($k21dd,2);?></div></td>
<td><div align="right"><?php echo round($k22dd,2);?></div></td>
<td><div align="right"><?php echo round($k23dd,2);?></div></td>
<td><div align="right"><?php echo round($k24dd,2);?></div></td>
<td><div align="right"><?php echo round($k25dd,2);?></div></td>
<td><div align="right"><?php echo round($k26dd,2);?></div></td>
<td><div align="right"><?php echo round($k27dd,2);?></div></td>
<td><div align="right"><?php echo round($k28dd,2);?></div></td>
<td><div align="right"><?php echo round($k29dd,2);?></div></td>
<td><div align="right"><?php echo round($k30dd,2);?></div></td>
</tr>
<tr bgcolor="#aaaaaa">
<td><div align="center">KE</div></td>
<?php if ($dk176==$kmin){ $kopt='1';$koptD=$k1dd;if ($k1l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk276==$kmin){ $kopt='2';$koptD=$k2dd;if ($k2l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk376==$kmin){ $kopt='3';$koptD=$k3dd;if ($k3l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk476==$kmin){ $kopt='4';$koptD=$k4dd;if ($k4l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk576==$kmin){ $kopt='5';$koptD=$k5dd;if ($k5l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk676==$kmin){ $kopt='6';$koptD=$k6dd;if ($k6l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk776==$kmin){ $kopt='7';$koptD=$k7dd;if ($k7l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk876==$kmin){ $kopt='8';$koptD=$k8dd; if ($k8l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk976==$kmin){ $kopt='9';$koptD=$k9dd;if ($k9l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1076==$kmin){ $kopt='10';$koptD=$k10dd;if ($k10l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1176==$kmin){ $kopt='11';$koptD=$k11dd;if ($k11l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1276==$kmin){ $kopt='12';$koptD=$k12dd;if ($k12l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1376==$kmin){ $kopt='13';$koptD=$k13dd;if ($k13l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1476==$kmin){ $kopt='14';$koptD=$k14dd;if ($k14l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1576==$kmin){ $kopt='15';$koptD=$k15dd;if ($k15l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1676==$kmin){ $kopt='16';$koptD=$k16dd;if ($k16l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1776==$kmin){ $kopt='17';$koptD=$k17dd;if ($k17l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1876==$kmin){ $kopt='18';$koptD=$k18dd;if ($k18l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1976==$kmin){ $kopt='19';$koptD=$k19dd;if ($k19l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2076==$kmin){ $kopt='20';$koptD=$k20dd;if ($k20l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2176==$kmin){ $kopt='21';$koptD=$k21dd;if ($k21l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2276==$kmin){ $kopt='22';$koptD=$k22dd;if ($k22l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2376==$kmin){ $kopt='23';$koptD=$k23dd;if ($k23l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2476==$kmin){ $kopt='24';$koptD=$k24dd;if ($k24l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2576==$kmin){ $kopt='25';$koptD=$k25dd;if ($k25l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2676==$kmin){ $kopt='26';$koptD=$k26dd;if ($k26l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2776==$kmin){ $kopt='27';$koptD=$k27dd;if ($k27l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2876==$kmin){ $kopt='28';$koptD=$k28dd;if ($k28l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2976==$kmin){ $kopt='29';$koptD=$k29dd;if ($k29l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk3076==$kmin){ $kopt='30';$koptD=$k30dd;if ($k30l<16) {$kdi="-";} else {$kdi='+';}}?>
<td <?php if ($dk176==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk176>4) {?><font color="red"><?php }elseif ($dk176==$kmin){ $kopt='1';$koptD=$k1dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk176,2);?></div></td>
<td <?php if ($dk276==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk276>4) {?><font color="red"><?php }elseif ($dk276==$kmin){ $kopt='2';$koptD=$k2dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk276,2);?></div></td>
<td <?php if ($dk376==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk376>4) {?><font color="red"><?php }elseif ($dk376==$kmin){ $kopt='3';$koptD=$k3dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk376,2);?></div></td>
<td <?php if ($dk476==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk476>4) {?><font color="red"><?php }elseif ($dk476==$kmin){ $kopt='4';$koptD=$k4dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk476,2);?></div></td>
<td <?php if ($dk576==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk576>4) {?><font color="red"><?php }elseif ($dk576==$kmin){ $kopt='5';$koptD=$k5dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk576,2);?></div></td>
<td <?php if ($dk676==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk676>4) {?><font color="red"><?php }elseif ($dk676==$kmin){ $kopt='6';$koptD=$k6dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk676,2);?></div></td>
<td <?php if ($dk776==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk776>4) {?><font color="red"><?php }elseif ($dk776==$kmin){ $kopt='7';$koptD=$k7dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk776,2);?></div></td>
<td <?php if ($dk876==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk876>4) {?><font color="red"><?php }elseif ($dk876==$kmin){ $kopt='8';$koptD=$k8dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk876,2);?></div></td>
<td <?php if ($dk976==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk976>4) {?><font color="red"><?php }elseif ($dk976==$kmin){ $kopt='9';$koptD=$k9dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk976,2);?></div></td>
<td <?php if ($dk1076==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1076>4) {?><font color="red"><?php }elseif ($dk1076==$kmin){ $kopt='10';$koptD=$k10dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1076,2);?></div></td>
<td <?php if ($dk1176==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1176>4) {?><font color="red"><?php }elseif ($dk1176==$kmin){ $kopt='11';$koptD=$k11dd;
?> <font color="green"><?php }else {?><font color="black"><?php }echo round($dk1176,2);?></div></td>
<td <?php if ($dk1276==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1276>4) {?><font color="red"><?php }elseif ($dk1276==$kmin){ $kopt='12';$koptD=$k12dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1276,2);?></div></td>
<td <?php if ($dk1376==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1376>4) {?><font color="red"><?php }elseif ($dk1376==$kmin){ $kopt='13';$koptD=$k13dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1376,2);?></div></td>
<td <?php if ($dk1476==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1476>4) {?><font color="red"><?php }elseif ($dk1476==$kmin){ $kopt='14';$koptD=$k14dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1476,2);?></div></td>
<td <?php if ($dk1576==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1576>4) {?><font color="red"><?php }elseif ($dk1576==$kmin){ $kopt='15';$koptD=$k15dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1576,2);?></div></td>
<td <?php if ($dk1676==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1676>4) {?><font color="red"><?php }elseif ($dk1676==$kmin){ $kopt='16';$koptD=$k16dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1676,2);?></div></td>
<td <?php if ($dk1776==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1776>4) {?><font color="red"><?php }elseif ($dk1776==$kmin){ $kopt='17';$koptD=$k17dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1776,2);?></div></td>
<td <?php if ($dk1876==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1876>4) {?><font color="red"><?php }elseif ($dk1876==$kmin){ $kopt='18';$koptD=$k18dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1876,2);?></div></td>
<td <?php if ($dk1976==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk1976>4) {?><font color="red"><?php }elseif ($dk1976==$kmin){ $kopt='19';$koptD=$k19dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1976,2);?></div></td>
<td <?php if ($dk2076==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2076>4) {?><font color="red"><?php }elseif ($dk2076==$kmin){ $kopt='20'; $koptD=$k20dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2076,2);?></div></td>
<td <?php if ($dk2176==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2176>4) {?><font color="red"><?php }elseif ($dk2176==$kmin){ $kopt='21';$koptD=$k21dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2176,2);?></div></td>
<td <?php if ($dk2276==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2276>4) {?><font color="red"><?php }elseif ($dk2276==$kmin){ $kopt='22';$koptD=$k22dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2276,2);?></div></td>
<td <?php if ($dk2376==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2376>4) {?><font color="red"><?php }elseif ($dk2376==$kmin){ $kopt='23';$koptD=$k23dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2376,2);?></div></td>
<td <?php if ($dk2476==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2476>4) {?><font color="red"><?php }elseif ($dk2476==$kmin){ $kopt='24';$koptD=$k24dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2476,2);?></div></td>
<td <?php if ($dk2576==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2576>4) {?><font color="red"><?php }elseif ($dk2576==$kmin){ $kopt='25';$koptD=$k25dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2576,2);?></div></td>
<td <?php if ($dk2676==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2676>4) {?><font color="red"><?php }elseif ($dk2676==$kmin){ $kopt='26';$koptD=$k26dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2676,2);?></div></td>
<td <?php if ($dk2776==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2776>4) {?><font color="red"><?php }elseif ($dk2776==$kmin){ $kopt='27';$koptD=$k27dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2776,2);?></div></td>
<td <?php if ($dk2876==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2876>4) {?><font color="red"><?php }elseif ($dk2876==$kmin){ $kopt='28';$koptD=$k28dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2876,2);?></div></td>
<td <?php if ($dk2976==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk2976>4) {?><font color="red"><?php }elseif ($dk2976==$kmin){ $kopt='29';$koptD=$k29dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2976,2);?></div></td>
<td <?php if ($dk3076==$kmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dk3076>4) {?><font color="red"><?php }elseif ($dk3076==$kmin){ $kopt='30';$koptD=$k30dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk3076,2);?></div></td>
</tr>
<?php ////C sect
$dc176=de00($cl,$ca,$cb,$c1l,$c1a,$c1b);
$dc276=de00($cl,$ca,$cb,$c2l,$c2a,$c2b);
$dc376=de00($cl,$ca,$cb,$c3l,$c3a,$c3b);
$dc476=de00($cl,$ca,$cb,$c4l,$c4a,$c4b);
$dc576=de00($cl,$ca,$cb,$c5l,$c5a,$c5b);
$dc676=de00($cl,$ca,$cb,$c6l,$c6a,$c6b);
$dc776=de00($cl,$ca,$cb,$c7l,$c7a,$c7b);
$dc876=de00($cl,$ca,$cb,$c8l,$c8a,$c8b);
$dc976=de00($cl,$ca,$cb,$c9l,$c9a,$c9b);
$dc1076=de00($cl,$ca,$cb,$c10l,$c10a,$c10b);
$dc1176=de00($cl,$ca,$cb,$c11l,$c11a,$c11b);
$dc1276=de00($cl,$ca,$cb,$c12l,$c12a,$c12b);
$dc1376=de00($cl,$ca,$cb,$c13l,$c13a,$c13b);
$dc1476=de00($cl,$ca,$cb,$c14l,$c14a,$c14b);
$dc1576=de00($cl,$ca,$cb,$c15l,$c15a,$c15b);
$dc1676=de00($cl,$ca,$cb,$c16l,$c16a,$c16b);
$dc1776=de00($cl,$ca,$cb,$c17l,$c17a,$c17b);
$dc1876=de00($cl,$ca,$cb,$c18l,$c18a,$c18b);
$dc1976=de00($cl,$ca,$cb,$c19l,$c19a,$c19b);
$dc2076=de00($cl,$ca,$cb,$c20l,$c20a,$c20b);
$dc2176=de00($cl,$ca,$cb,$c21l,$c21a,$c21b);
$dc2276=de00($cl,$ca,$cb,$c22l,$c22a,$c22b);
$dc2376=de00($cl,$ca,$cb,$c23l,$c23a,$c23b);
$dc2476=de00($cl,$ca,$cb,$c24l,$c24a,$c24b);
$dc2576=de00($cl,$ca,$cb,$c25l,$c25a,$c25b);
$dc2676=de00($cl,$ca,$cb,$c26l,$c26a,$c26b);
$dc2776=de00($cl,$ca,$cb,$c27l,$c27a,$c27b);
$dc2876=de00($cl,$ca,$cb,$c28l,$c28a,$c28b);
$dc2976=de00($cl,$ca,$cb,$c29l,$c29a,$c29b);
$dc3076=de00($cl,$ca,$cb,$c30l,$c30a,$c30b);
$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,$dc2576,$dc2676,$dc2776,$dc2876,$dc2976,$dc3076);
//$//dc194=de94($cl,$ca,$cb,$c1l,$c1a,$c1b);
?>
<tr bgcolor="#b1e5ff">
<td><div align="center">cD</div></td>
<td><div align="right"><?php echo round($c1dd,2);?></div></td>
<td><div align="right"><?php echo round($c2dd,2);?></div></td>
<td><div align="right"><?php echo round($c3dd,2);?></div></td>
<td><div align="right"><?php echo round($c4dd,2);?></div></td>
<td><div align="right"><?php echo round($c5dd,2);?></div></td>
<td><div align="right"><?php echo round($c6dd,2);?></div></td>
<td><div align="right"><?php echo round($c7dd,2);?></div></td>
<td><div align="right"><?php echo round($c8dd,2);?></div></td>
<td><div align="right"><?php echo round($c9dd,2);?></div></td>
<td><div align="right"><?php echo round($c10dd,2);?></div></td>
<td><div align="right"><?php echo round($c11dd,2);?></div></td>
<td><div align="right"><?php echo round($c12dd,2);?></div></td>
<td><div align="right"><?php echo round($c13dd,2);?></div></td>
<td><div align="right"><?php echo round($c14dd,2);?></div></td>
<td><div align="right"><?php echo round($c15dd,2);?></div></td>
<td><div align="right"><?php echo round($c16dd,2);?></div></td>
<td><div align="right"><?php echo round($c17dd,2);?></div></td>
<td><div align="right"><?php echo round($c18dd,2);?></div></td>
<td><div align="right"><?php echo round($c19dd,2);?></div></td>
<td><div align="right"><?php echo round($c20dd,2);?></div></td>
<td><div align="right"><?php echo round($c21dd,2);?></div></td>
<td><div align="right"><?php echo round($c22dd,2);?></div></td>
<td><div align="right"><?php echo round($c23dd,2);?></div></td>
<td><div align="right"><?php echo round($c24dd,2);?></div></td>
<td><div align="right"><?php echo round($c25dd,2);?></div></td>
<td><div align="right"><?php echo round($c26dd,2);?></div></td>
<td><div align="right"><?php echo round($c27dd,2);?></div></td>
<td><div align="right"><?php echo round($c28dd,2);?></div></td>
<td><div align="right"><?php echo round($c29dd,2);?></div></td>
<td><div align="right"><?php echo round($c30dd,2);?></div></td>
</tr>
<tr bgcolor="#b1e5ff">
<td><div align="center">cE</div></td>
<?php if ($dc176==$cmin){ $copt='1';$coptD=$c1dd;if ($c1b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc276==$cmin){ $copt='2';$coptD=$c2dd;if ($c2b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc376==$cmin){ $copt='3';$coptD=$c3dd;if ($c3b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc476==$cmin){ $copt='4';$coptD=$c4dd;if ($c4b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc576==$cmin){ $copt='5';$coptD=$c5dd;if ($c5b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc676==$cmin){ $copt='6';$coptD=$c6dd;if ($c6b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc776==$cmin){ $copt='7';$coptD=$c7dd;if ($c7b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc876==$cmin){ $copt='8';$coptD=$c8dd; if ($c8b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc976==$cmin){ $copt='9';$coptD=$c9dd;if ($c9b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1076==$cmin){ $copt='10';$coptD=$c10dd;if ($c10b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1176==$cmin){ $copt='11';$coptD=$c11dd;if ($c11b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1276==$cmin){ $copt='12';$coptD=$c12dd;if ($c12b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1376==$cmin){ $copt='13';$coptD=$c13dd;if ($c13b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1476==$cmin){ $copt='14';$coptD=$c14dd;if ($c14b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1576==$cmin){ $copt='15';$coptD=$c15dd;if ($c15b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1676==$cmin){ $copt='16';$coptD=$c16dd;if ($c16b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1776==$cmin){ $copt='17';$coptD=$c17dd;if ($c17b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1876==$cmin){ $copt='18';$coptD=$c18dd;if ($c18b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1976==$cmin){ $copt='19';$coptD=$c19dd;if ($c19b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2076==$cmin){ $copt='20';$coptD=$c20dd;if ($c20b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2176==$cmin){ $copt='21';$coptD=$c21dd;if ($c21b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2276==$cmin){ $copt='22';$coptD=$c22dd;if ($c22b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2376==$cmin){ $copt='23';$coptD=$c23dd;if ($c23b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2476==$cmin){ $copt='24';$coptD=$c24dd;if ($c24b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2576==$cmin){ $copt='25';$coptD=$c25dd;if ($c25b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2676==$cmin){ $copt='26';$coptD=$c26dd;if ($c26b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2776==$cmin){ $copt='27';$coptD=$c27dd;if ($c27b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2876==$cmin){ $copt='28';$coptD=$c28dd;if ($c28b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2976==$cmin){ $copt='29';$coptD=$c29dd;if ($c29b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc3076==$cmin){ $copt='30';$coptD=$c30dd;if ($c30b<-50) {$cdi="-";} else {$cdi='+';}}?>
<td <?php if ($dc176==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc176>4) {?><font color="red"><?php }elseif ($dc176==$cmin){ $copt='1';$coptD=$c1dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc176,2);?></div></td>
<td <?php if ($dc276==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc276>4) {?><font color="red"><?php }elseif ($dc276==$cmin){ $copt='2';$coptD=$c2dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc276,2);?></div></td>
<td <?php if ($dc376==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc376>4) {?><font color="red"><?php }elseif ($dc376==$cmin){ $copt='3';$coptD=$c3dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc376,2);?></div></td>
<td <?php if ($dc476==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc476>4) {?><font color="red"><?php }elseif ($dc476==$cmin){ $copt='4';$coptD=$c4dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc476,2);?></div></td>
<td <?php if ($dc576==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc576>4) {?><font color="red"><?php }elseif ($dc576==$cmin){ $copt='5';$coptD=$c5dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc576,2);?></div></td>
<td <?php if ($dc676==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc676>4) {?><font color="red"><?php }elseif ($dc676==$cmin){ $copt='6';$coptD=$c6dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc676,2);?></div></td>
<td <?php if ($dc776==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc776>4) {?><font color="red"><?php }elseif ($dc776==$cmin){ $copt='7';$coptD=$c7dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc776,2);?></div></td>
<td <?php if ($dc876==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc876>4) {?><font color="red"><?php }elseif ($dc876==$cmin){ $copt='8';$coptD=$c8dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc876,2);?></div></td>
<td <?php if ($dc976==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc976>4) {?><font color="red"><?php }elseif ($dc976==$cmin){ $copt='9';$coptD=$c9dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc976,2);?></div></td>
<td <?php if ($dc1076==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1076>4) {?><font color="red"><?php }elseif ($dc1076==$cmin){ $copt='10';$coptD=$c10dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1076,2);?></div></td>
<td <?php if ($dc1176==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1176>4) {?><font color="red"><?php }elseif ($dc1176==$cmin){ $copt='11';$coptD=$c11dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1176,2);?></div></td>
<td <?php if ($dc1276==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1276>4) {?><font color="red"><?php }elseif ($dc1276==$cmin){ $copt='12';$coptD=$c12dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1276,2);?></div></td>
<td <?php if ($dc1376==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1376>4) {?><font color="red"><?php }elseif ($dc1376==$cmin){ $copt='13';$coptD=$c13dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1376,2);?></div></td>
<td <?php if ($dc1476==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1476>4) {?><font color="red"><?php }elseif ($dc1476==$cmin){ $copt='14';$coptD=$c14dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1476,2);?></div></td>
<td <?php if ($dc1576==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1576>4) {?><font color="red"><?php }elseif ($dc1576==$cmin){ $copt='15';$coptD=$c15dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1576,2);?></div></td>
<td <?php if ($dc1676==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1676>4) {?><font color="red"><?php }elseif ($dc1676==$cmin){ $copt='16';$coptD=$c16dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1676,2);?></div></td>
<td <?php if ($dc1776==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1776>4) {?><font color="red"><?php }elseif ($dc1776==$cmin){ $copt='17';$coptD=$c17dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1776,2);?></div></td>
<td <?php if ($dc1876==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1876>4) {?><font color="red"><?php }elseif ($dc1876==$cmin){ $copt='18';$coptD=$c18dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1876,2);?></div></td>
<td <?php if ($dc1976==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc1976>4) {?><font color="red"><?php }elseif ($dc1976==$cmin){ $copt='19';$coptD=$c19dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1976,2);?></div></td>
<td <?php if ($dc2076==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2076>4) {?><font color="red"><?php }elseif ($dc2076==$cmin){ $copt='20';$coptD=$c20dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2076,2);?></div></td>
<td <?php if ($dc2176==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2176>4) {?><font color="red"><?php }elseif ($dc2176==$cmin){ $copt='21';$coptD=$c21dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2176,2);?></div></td>
<td <?php if ($dc2276==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2276>4) {?><font color="red"><?php }elseif ($dc2276==$cmin){ $copt='22';$coptD=$c22dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2276,2);?></div></td>
<td <?php if ($dc2376==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2376>4) {?><font color="red"><?php }elseif ($dc2376==$cmin){ $copt='23';$coptD=$c23dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2376,2);?></div></td>
<td <?php if ($dc2476==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2476>4) {?><font color="red"><?php }elseif ($dc2476==$cmin){ $copt='24';$coptD=$c24dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2476,2);?></div></td>
<td <?php if ($dc2576==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2576>4) {?><font color="red"><?php }elseif ($dc2576==$cmin){ $copt='25';$coptD=$c25dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2576,2);?></div></td>
<td <?php if ($dc2676==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2676>4) {?><font color="red"><?php }elseif ($dc2676==$cmin){ $copt='26';$coptD=$c26dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2676,2);?></div></td>
<td <?php if ($dc2776==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2776>4) {?><font color="red"><?php }elseif ($dc2776==$cmin){ $copt='27';$coptD=$c27dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2776,2);?></div></td>
<td <?php if ($dc2876==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2876>4) {?><font color="red"><?php }elseif ($dc2876==$cmin){ $copt='28';$coptD=$c28dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2876,2);?></div></td>
<td <?php if ($dc2976==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc2976>4) {?><font color="red"><?php }elseif ($dc2976==$cmin){ $copt='29';$coptD=$c29dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2976,2);?></div></td>
<td <?php if ($dc3076==$cmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dc3076>4) {?><font color="red"><?php }elseif ($dc3076==$cmin){ $copt='30';$coptD=$c30dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc3076,2);?></div></td>
</tr>
<?php ////m sect
$device='isis';
if ($device=='isis') {
$ml=$ml;$mb=$mb;}
else {
$ml=$ml+0.8;$mb=$mb+1.2;}
$dm176=de00($ml,$ma,$mb,$m1l,$m1a,$m1b);
$dm276=de00($ml,$ma,$mb,$m2l,$m2a,$m2b);
$dm376=de00($ml,$ma,$mb,$m3l,$m3a,$m3b);
$dm476=de00($ml,$ma,$mb,$m4l,$m4a,$m4b);
$dm576=de00($ml,$ma,$mb,$m5l,$m5a,$m5b);
$dm676=de00($ml,$ma,$mb,$m6l,$m6a,$m6b);
$dm776=de00($ml,$ma,$mb,$m7l,$m7a,$m7b);
$dm876=de00($ml,$ma,$mb,$m8l,$m8a,$m8b);
$dm976=de00($ml,$ma,$mb,$m9l,$m9a,$m9b);
$dm1076=de00($ml,$ma,$mb,$m10l,$m10a,$m10b);
$dm1176=de00($ml,$ma,$mb,$m11l,$m11a,$m11b);
$dm1276=de00($ml,$ma,$mb,$m12l,$m12a,$m12b);
$dm1376=de00($ml,$ma,$mb,$m13l,$m13a,$m13b);
$dm1476=de00($ml,$ma,$mb,$m14l,$m14a,$m14b);
$dm1576=de00($ml,$ma,$mb,$m15l,$m15a,$m15b);
$dm1676=de00($ml,$ma,$mb,$m16l,$m16a,$m16b);
$dm1776=de00($ml,$ma,$mb,$m17l,$m17a,$m17b);
$dm1876=de00($ml,$ma,$mb,$m18l,$m18a,$m18b);
$dm1976=de00($ml,$ma,$mb,$m19l,$m19a,$m19b);
$dm2076=de00($ml,$ma,$mb,$m20l,$m20a,$m20b);
$dm2176=de00($ml,$ma,$mb,$m21l,$m21a,$m21b);
$dm2276=de00($ml,$ma,$mb,$m22l,$m22a,$m22b);
$dm2376=de00($ml,$ma,$mb,$m23l,$m23a,$m23b);
$dm2476=de00($ml,$ma,$mb,$m24l,$m24a,$m24b);
$dm2576=de00($ml,$ma,$mb,$m25l,$m25a,$m25b);
$dm2676=de00($ml,$ma,$mb,$m26l,$m26a,$m26b);
$dm2776=de00($ml,$ma,$mb,$m27l,$m27a,$m27b);
$dm2876=de00($ml,$ma,$mb,$m28l,$m28a,$m28b);
$dm2976=de00($ml,$ma,$mb,$m29l,$m29a,$m29b);
$dm3076=de00($ml,$ma,$mb,$m30l,$m30a,$m30b);
$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,$dm2576,$dm2676,$dm2776,$dm2876,$dm2976,$dm3076);
//$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($m1dd,2);?></div></td>
<td><div align="right"><?php echo round($m2dd,2);?></div></td>
<td><div align="right"><?php echo round($m3dd,2);?></div></td>
<td><div align="right"><?php echo round($m4dd,2);?></div></td>
<td><div align="right"><?php echo round($m5dd,2);?></div></td>
<td><div align="right"><?php echo round($m6dd,2);?></div></td>
<td><div align="right"><?php echo round($m7dd,2);?></div></td>
<td><div align="right"><?php echo round($m8dd,2);?></div></td>
<td><div align="right"><?php echo round($m9dd,2);?></div></td>
<td><div align="right"><?php echo round($m10dd,2);?></div></td>
<td><div align="right"><?php echo round($m11dd,2);?></div></td>
<td><div align="right"><?php echo round($m12dd,2);?></div></td>
<td><div align="right"><?php echo round($m13dd,2);?></div></td>
<td><div align="right"><?php echo round($m14dd,2);?></div></td>
<td><div align="right"><?php echo round($m15dd,2);?></div></td>
<td><div align="right"><?php echo round($m16dd,2);?></div></td>
<td><div align="right"><?php echo round($m17dd,2);?></div></td>
<td><div align="right"><?php echo round($m18dd,2);?></div></td>
<td><div align="right"><?php echo round($m19dd,2);?></div></td>
<td><div align="right"><?php echo round($m20dd,2);?></div></td>
<td><div align="right"><?php echo round($m21dd,2);?></div></td>
<td><div align="right"><?php echo round($m22dd,2);?></div></td>
<td><div align="right"><?php echo round($m23dd,2);?></div></td>
<td><div align="right"><?php echo round($m24dd,2);?></div></td>
<td><div align="right"><?php echo round($m25dd,2);?></div></td>
<td><div align="right"><?php echo round($m26dd,2);?></div></td>
<td><div align="right"><?php echo round($m27dd,2);?></div></td>
<td><div align="right"><?php echo round($m28dd,2);?></div></td>
<td><div align="right"><?php echo round($m29dd,2);?></div></td>
<td><div align="right"><?php echo round($m30dd,2);?></div></td>
</tr>
<tr bgcolor="#e9bed7">
<td><div align="center">mE</div></td>
<?php if ($dm176==$mmin){ $mopt='1';$moptD=$m1dd;if ($m1a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm276==$mmin){ $mopt='2';$moptD=$m2dd;if ($m2a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm376==$mmin){ $mopt='3';$moptD=$m3dd;if ($m3a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm476==$mmin){ $mopt='4';$moptD=$m4dd;if ($m4a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm576==$mmin){ $mopt='5';$moptD=$m5dd;if ($m5a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm676==$mmin){ $mopt='6';$moptD=$m6dd;if ($m6a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm776==$mmin){ $mopt='7';$moptD=$m7dd;if ($m7a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm876==$mmin){ $mopt='8';$moptD=$m8dd; if ($m8a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm976==$mmin){ $mopt='9';$moptD=$m9dd;if ($m9a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1076==$mmin){ $mopt='10';$moptD=$m10dd;if ($m10a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1176==$mmin){ $mopt='11';$moptD=$m11dd;if ($m11a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1276==$mmin){ $mopt='12';$moptD=$m12dd;if ($m12a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1376==$mmin){ $mopt='13';$moptD=$m13dd;if ($m13a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1476==$mmin){ $mopt='14';$moptD=$m14dd;if ($m14a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1576==$mmin){ $mopt='15';$moptD=$m15dd;if ($m15a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1676==$mmin){ $mopt='16';$moptD=$m16dd;if ($m16a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1776==$mmin){ $mopt='17';$moptD=$m17dd;if ($m17a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1876==$mmin){ $mopt='18';$moptD=$m18dd;if ($m18a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1976==$mmin){ $mopt='19';$moptD=$m19dd;if ($m19a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2076==$mmin){ $mopt='20';$moptD=$m20dd;if ($m20a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2176==$mmin){ $mopt='21';$moptD=$m21dd;if ($m21a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2276==$mmin){ $mopt='22';$moptD=$m22dd;if ($m22a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2376==$mmin){ $mopt='23';$moptD=$m23dd;if ($m23a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2476==$mmin){ $mopt='24';$moptD=$m24dd;if ($m24a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2576==$mmin){ $mopt='25';$moptD=$m25dd;if ($m25a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2676==$mmin){ $mopt='26';$moptD=$m26dd;if ($m26a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2776==$mmin){ $mopt='27';$moptD=$m27dd;if ($m27a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2876==$mmin){ $mopt='28';$moptD=$m28dd;if ($m28a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2976==$mmin){ $mopt='29';$moptD=$m29dd;if ($m29a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm3076==$mmin){ $mopt='30';$moptD=$m30dd;if ($m30a>74) {$mdi="-";} else {$mdi='+';}}?>
<td <?php if ($dm176==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm176>4) {?><font color="red"><?php }elseif ($dm176==$mmin){ $mopt='1';$moptD=$m1dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm176,2);?></div></td>
<td <?php if ($dm276==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm276>4) {?><font color="red"><?php }elseif ($dm276==$mmin){ $mopt='2';$moptD=$m2dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm276,2);?></div></td>
<td <?php if ($dm376==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm376>4) {?><font color="red"><?php }elseif ($dm376==$mmin){ $mopt='3';$moptD=$m3dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm376,2);?></div></td>
<td <?php if ($dm476==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm476>4) {?><font color="red"><?php }elseif ($dm476==$mmin){ $mopt='4';$moptD=$m4dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm476,2);?></div></td>
<td <?php if ($dm576==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm576>4) {?><font color="red"><?php }elseif ($dm576==$mmin){ $mopt='5';$moptD=$m5dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm576,2);?></div></td>
<td <?php if ($dm676==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm676>4) {?><font color="red"><?php }elseif ($dm676==$mmin){ $mopt='6';$moptD=$m6dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm676,2);?></div></td>
<td <?php if ($dm776==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm776>4) {?><font color="red"><?php }elseif ($dm776==$mmin){ $mopt='7';$moptD=$m7dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm776,2);?></div></td>
<td <?php if ($dm876==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm876>4) {?><font color="red"><?php }elseif ($dm876==$mmin){ $mopt='8';$moptD=$m8dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm876,2);?></div></td>
<td <?php if ($dm976==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm976>4) {?><font color="red"><?php }elseif ($dm976==$mmin){ $mopt='9';$moptD=$m9dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm976,2);?></div></td>
<td <?php if ($dm1076==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1076>4) {?><font color="red"><?php }elseif ($dm1076==$mmin){ $mopt='10';$moptD=$m10dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1076,2);?></div></td>
<td <?php if ($dm1176==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1176>4) {?><font color="red"><?php }elseif ($dm1176==$mmin){ $mopt='11';$moptD=$m11dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1176,2);?></div></td>
<td <?php if ($dm1276==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1276>4) {?><font color="red"><?php }elseif ($dm1276==$mmin){ $mopt='12';$moptD=$m12dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1276,2);?></div></td>
<td <?php if ($dm1376==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1376>4) {?><font color="red"><?php }elseif ($dm1376==$mmin){ $mopt='13';$moptD=$m13dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1376,2);?></div></td>
<td <?php if ($dm1476==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1476>4) {?><font color="red"><?php }elseif ($dm1476==$mmin){ $mopt='14';$moptD=$m14dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1476,2);?></div></td>
<td <?php if ($dm1576==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1576>4) {?><font color="red"><?php }elseif ($dm1576==$mmin){ $mopt='15';$moptD=$m15dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1576,2);?></div></td>
<td <?php if ($dm1676==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1676>4) {?><font color="red"><?php }elseif ($dm1676==$mmin){ $mopt='16';$moptD=$m16dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1676,2);?></div></td>
<td <?php if ($dm1776==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1776>4) {?><font color="red"><?php }elseif ($dm1776==$mmin){ $mopt='17';$moptD=$m17dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1776,2);?></div></td>
<td <?php if ($dm1876==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1876>4) {?><font color="red"><?php }elseif ($dm1876==$mmin){ $mopt='18';$moptD=$m18dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1876,2);?></div></td>
<td <?php if ($dm1976==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm1976>4) {?><font color="red"><?php }elseif ($dm1976==$mmin){ $mopt='19';$moptD=$m19dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1976,2);?></div></td>
<td <?php if ($dm2076==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2076>4) {?><font color="red"><?php }elseif ($dm2076==$mmin){ $mopt='20';$moptD=$m20dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2076,2);?></div></td>
<td <?php if ($dm2176==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2176>4) {?><font color="red"><?php }elseif ($dm2176==$mmin){ $mopt='21';$moptD=$m21dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2176,2);?></div></td>
<td <?php if ($dm2276==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2276>4) {?><font color="red"><?php }elseif ($dm2276==$mmin){ $mopt='22';$moptD=$m22dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2276,2);?></div></td>
<td <?php if ($dm2376==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2376>4) {?><font color="red"><?php }elseif ($dm2376==$mmin){ $mopt='23';$moptD=$m23dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2376,2);?></div></td>
<td <?php if ($dm2476==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2476>4) {?><font color="red"><?php }elseif ($dm2476==$mmin){ $mopt='24';$moptD=$m24dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2476,2);?></div></td>
<td <?php if ($dm2576==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2576>4) {?><font color="red"><?php }elseif ($dm2576==$mmin){ $mopt='25';$moptD=$m25dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2576,2);?></div></td>
<td <?php if ($dm2676==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2676>4) {?><font color="red"><?php }elseif ($dm2676==$mmin){ $mopt='26';$moptD=$m26dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2676,2);?></div></td>
<td <?php if ($dm2776==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2776>4) {?><font color="red"><?php }elseif ($dm2776==$mmin){ $mopt='27';$moptD=$m27dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2776,2);?></div></td>
<td <?php if ($dm2876==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2876>4) {?><font color="red"><?php }elseif ($dm2876==$mmin){ $mopt='28';$moptD=$m28dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2876,2);?></div></td>
<td <?php if ($dm2976==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm2976>4) {?><font color="red"><?php }elseif ($dm2976==$mmin){ $mopt='29';$moptD=$km29dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2976,2);?></div></td>
<td <?php if ($dm3076==$mmin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dm3076>4) {?><font color="red"><?php }elseif ($dm3076==$mmin){ $mopt='30';$moptD=$m30dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm3076,2);?></div></td>
</tr>
<?php ////y sect
$dy176=de00($yl,$ya,$yb,$y1l,$y1a,$y1b);
$dy276=de00($yl,$ya,$yb,$y2l,$y2a,$y2b);
$dy376=de00($yl,$ya,$yb,$y3l,$y3a,$y3b);
$dy476=de00($yl,$ya,$yb,$y4l,$y4a,$y4b);
$dy576=de00($yl,$ya,$yb,$y5l,$y5a,$y5b);
$dy676=de00($yl,$ya,$yb,$y6l,$y6a,$y6b);
$dy776=de00($yl,$ya,$yb,$y7l,$y7a,$y7b);
$dy876=de00($yl,$ya,$yb,$y8l,$y8a,$y8b);
$dy976=de00($yl,$ya,$yb,$y9l,$y9a,$y9b);
$dy1076=de00($yl,$ya,$yb,$y10l,$y10a,$y10b);
$dy1176=de00($yl,$ya,$yb,$y11l,$y11a,$y11b);
$dy1276=de00($yl,$ya,$yb,$y12l,$y12a,$y12b);
$dy1376=de00($yl,$ya,$yb,$y13l,$y13a,$y13b);
$dy1476=de00($yl,$ya,$yb,$y14l,$y14a,$y14b);
$dy1576=de00($yl,$ya,$yb,$y15l,$y15a,$y15b);
$dy1676=de00($yl,$ya,$yb,$y16l,$y16a,$y16b);
$dy1776=de00($yl,$ya,$yb,$y17l,$y17a,$y17b);
$dy1876=de00($yl,$ya,$yb,$y18l,$y18a,$y18b);
$dy1976=de00($yl,$ya,$yb,$y19l,$y19a,$y19b);
$dy2076=de00($yl,$ya,$yb,$y20l,$y20a,$y20b);
$dy2176=de00($yl,$ya,$yb,$y21l,$y21a,$y21b);
$dy2276=de00($yl,$ya,$yb,$y22l,$y22a,$y22b);
$dy2376=de00($yl,$ya,$yb,$y23l,$y23a,$y23b);
$dy2476=de00($yl,$ya,$yb,$y24l,$y24a,$y24b);
$dy2576=de00($yl,$ya,$yb,$y25l,$y25a,$y25b);
$dy2676=de00($yl,$ya,$yb,$y26l,$y26a,$y26b);
$dy2776=de00($yl,$ya,$yb,$y27l,$y27a,$y27b);
$dy2876=de00($yl,$ya,$yb,$y28l,$y28a,$y28b);
$dy2976=de00($yl,$ya,$yb,$y29l,$y29a,$y29b);
$dy3076=de00($yl,$ya,$yb,$y30l,$y30a,$y30b);
$ymin=min($dy176,$dy276,$dy376,$dy476,$dy576,$dy676,$dy776,$dy876,$dy976,$dy1076,$dy1176,$dy1276,$dy1376,$dy1476,$dy1576,$dy1676,$dy1776,$dy1876,$dy1976,$dy2076,$dy2176,$dy2276,$dy2376,$dy2476,$dy2576,$dy2676,$dy2776,$dy2876,$dy2976,$dy3076);
//$dy194=de94($yl,$ya,$yb,$y1l,$y1a,$y1b);
?>
<tr bgcolor="#f2ebc0">
<td><div align="menter">YD</div></td>
<td><div align="right"><?php echo round($y1dd,2);?></div></td>
<td><div align="right"><?php echo round($y2dd,2);?></div></td>
<td><div align="right"><?php echo round($y3dd,2);?></div></td>
<td><div align="right"><?php echo round($y4dd,2);?></div></td>
<td><div align="right"><?php echo round($y5dd,2);?></div></td>
<td><div align="right"><?php echo round($y6dd,2);?></div></td>
<td><div align="right"><?php echo round($y7dd,2);?></div></td>
<td><div align="right"><?php echo round($y8dd,2);?></div></td>
<td><div align="right"><?php echo round($y9dd,2);?></div></td>
<td><div align="right"><?php echo round($y10dd,2);?></div></td>
<td><div align="right"><?php echo round($y11dd,2);?></div></td>
<td><div align="right"><?php echo round($y12dd,2);?></div></td>
<td><div align="right"><?php echo round($y13dd,2);?></div></td>
<td><div align="right"><?php echo round($y14dd,2);?></div></td>
<td><div align="right"><?php echo round($y15dd,2);?></div></td>
<td><div align="right"><?php echo round($y16dd,2);?></div></td>
<td><div align="right"><?php echo round($y17dd,2);?></div></td>
<td><div align="right"><?php echo round($y18dd,2);?></div></td>
<td><div align="right"><?php echo round($y19dd,2);?></div></td>
<td><div align="right"><?php echo round($y20dd,2);?></div></td>
<td><div align="right"><?php echo round($y21dd,2);?></div></td>
<td><div align="right"><?php echo round($y22dd,2);?></div></td>
<td><div align="right"><?php echo round($y23dd,2);?></div></td>
<td><div align="right"><?php echo round($y24dd,2);?></div></td>
<td><div align="right"><?php echo round($y25dd,2);?></div></td>
<td><div align="right"><?php echo round($y26dd,2);?></div></td>
<td><div align="right"><?php echo round($y27dd,2);?></div></td>
<td><div align="right"><?php echo round($y28dd,2);?></div></td>
<td><div align="right"><?php echo round($y29dd,2);?></div></td>
<td><div align="right"><?php echo round($y30dd,2);?></div></td>
</tr>
<tr bgcolor="#f2ebc0">
<td><div align="center">YE</div></td>
<?php if ($dy176==$ymin){ $yopt='1';$yoptD=$y1dd;if ($y1b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy276==$ymin){ $yopt='2';$yoptD=$y2dd;if ($y2b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy376==$ymin){ $yopt='3';$yoptD=$y3dd;if ($y3b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy476==$ymin){ $yopt='4';$yoptD=$y4dd;if ($y4b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy576==$ymin){ $yopt='5';$yoptD=$y5dd;if ($y5b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy676==$ymin){ $yopt='6';$yoptD=$y6dd;if ($y6b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy776==$ymin){ $yopt='7';$yoptD=$y7dd;if ($y7b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy876==$ymin){ $yopt='8';$yoptD=$y8dd; if ($y8b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy976==$ymin){ $yopt='9';$yoptD=$y9dd;if ($y9b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1076==$ymin){ $yopt='10';$yoptD=$y10dd;if ($y10b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1176==$ymin){ $yopt='11';$yoptD=$y11dd;if ($y11b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1276==$ymin){ $yopt='12';$yoptD=$y12dd;if ($y12b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1376==$ymin){ $yopt='13';$yoptD=$y13dd;if ($y13b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1476==$ymin){ $yopt='14';$yoptD=$y14dd;if ($y14b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1576==$ymin){ $yopt='15';$yoptD=$y15dd;if ($y15b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1676==$ymin){ $yopt='16';$yoptD=$y16dd;if ($y16b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1776==$ymin){ $yopt='17';$yoptD=$y17dd;if ($y17b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1876==$ymin){ $yopt='18';$yoptD=$y18dd;if ($y18b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1976==$ymin){ $yopt='19';$yoptD=$y19dd;if ($y19b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2076==$ymin){ $yopt='20';$yoptD=$y20dd;if ($y20b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2176==$ymin){ $yopt='21';$yoptD=$y21dd;if ($y21b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2276==$ymin){ $yopt='22';$yoptD=$y22dd;if ($y22b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2376==$ymin){ $yopt='23';$yoptD=$y23dd;if ($y23b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2476==$ymin){ $yopt='24';$yoptD=$y24dd;if ($y24b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2576==$ymin){ $yopt='25';$yoptD=$y25dd;if ($y25b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2676==$ymin){ $yopt='26';$yoptD=$y26dd;if ($y26b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2776==$ymin){ $yopt='27';$yoptD=$y27dd;if ($y27b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2876==$ymin){ $yopt='28';$yoptD=$y28dd;if ($y28b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2976==$ymin){ $yopt='29';$yoptD=$y29dd;if ($y29b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy3076==$ymin){ $yopt='30';$yoptD=$y30dd;if ($y30b>93) {$ydi="-";} else {$ydi='+';}}?>
<td <?php if ($dy176==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy176>4) {?><font color="red"><?php }elseif ($dy176==$ymin){ $yopt='1';$yoptD=$y1dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy176,2);?></div></td>
<td <?php if ($dy276==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy276>4) {?><font color="red"><?php }elseif ($dy276==$ymin) { $yopt='2';$yoptD=$y2dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy276,2);?></div></td>
<td <?php if ($dy376==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy376>4) {?><font color="red"><?php }elseif ($dy376==$ymin){ $yopt='3';$yoptD=$y3dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy376,2);?></div></td>
<td <?php if ($dy476==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy476>4) {?><font color="red"><?php }elseif ($dy476==$ymin){$yopt='4';$yoptD=$y4dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy476,2);?></div></td>
<td <?php if ($dy576==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy576>4) {?><font color="red"><?php }elseif ($dy576==$ymin){ $yopt='5';$yoptD=$y5dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy576,2);?></div></td>
<td <?php if ($dy676==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy676>4) {?><font color="red"><?php }elseif ($dy676==$ymin){ $yopt='6';$yoptD=$y6dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy676,2);?></div></td>
<td <?php if ($dy776==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy776>4) {?><font color="red"><?php }elseif ($dy776==$ymin){ $yopt='7';$yoptD=$y7dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy776,2);?></div></td>
<td <?php if ($dy876==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy876>4) {?><font color="red"><?php }elseif ($dy876==$ymin){ $yopt='8';$yoptD=$y8dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy876,2);?></div></td>
<td <?php if ($dy976==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy976>4) {?><font color="red"><?php }elseif ($dy976==$ymin){$yopt='9';$yoptD=$y9dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy976,2);?></div></td>
<td <?php if ($dy1076==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1076>4) {?><font color="red"><?php }elseif ($dy1076==$ymin){ $yopt='10';$yoptD=$y10dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1076,2);?></div></td>
<td <?php if ($dy1176==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1176>4) {?><font color="red"><?php }elseif ($dy1176==$ymin){ $yopt='11';$yoptD=$y11dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1176,2);?></div></td>
<td <?php if ($dy1276==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1276>4) {?><font color="red"><?php }elseif ($dy1276==$ymin){ $yopt='12';$yoptD=$y12dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1276,2);?></div></td>
<td <?php if ($dy1376==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1376>4) {?><font color="red"><?php }elseif ($dy1376==$ymin){ $yopt='13';$yoptD=$y13dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1376,2);?></div></td>
<td <?php if ($dy1476==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1476>4) {?><font color="red"><?php }elseif ($dy1476==$ymin){ $yopt='14';$yoptD=$y14dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1476,2);?></div></td>
<td <?php if ($dy1576==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1576>4) {?><font color="red"><?php }elseif ($dy1576==$ymin){ $yopt='15';$yoptD=$y15dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1576,2);?></div></td>
<td <?php if ($dy1676==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1676>4) {?><font color="red"><?php }elseif ($dy1676==$ymin){ $yopt='16';$yoptD=$y16dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1676,2);?></div></td>
<td <?php if ($dy1776==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1776>4) {?><font color="red"><?php }elseif ($dy1776==$ymin){ $yopt='17';$yoptD=$y17dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1776,2);?></div></td>
<td <?php if ($dy1876==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1876>4) {?><font color="red"><?php }elseif ($dy1876==$ymin){ $yopt='18';$yoptD=$y18dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1876,2);?></div></td>
<td <?php if ($dy1976==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy1976>4) {?><font color="red"><?php }elseif ($dy1976==$ymin){ $yopt='19';$yoptD=$y19dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1976,2);?></div></td>
<td <?php if ($dy2076==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2076>4) {?><font color="red"><?php }elseif ($dy2076==$ymin){ $yopt='20';$yoptD=$y20dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2076,2);?></div></td>
<td <?php if ($dy2176==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2176>4) {?><font color="red"><?php }elseif ($dy2176==$ymin){ $yopt='21';$yoptD=$y21dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2176,2);?></div></td>
<td <?php if ($dy2276==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2276>4) {?><font color="red"><?php }elseif ($dy2276==$ymin){ $yopt='22';$yoptD=$y22dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2276,2);?></div></td>
<td <?php if ($dy2376==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2376>4) {?><font color="red"><?php }elseif ($dy2376==$ymin){ $yopt='23';$yoptD=$y23dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2376,2);?></div></td>
<td <?php if ($dy2476==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2476>4) {?><font color="red"><?php }elseif ($dy2476==$ymin){ $yopt='24';$yoptD=$y24dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2476,2);?></div></td>
<td <?php if ($dy2576==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2576>4) {?><font color="red"><?php }elseif ($dy2576==$ymin){ $yopt='25';$yoptD=$y25dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2576,2);?></div></td>
<td <?php if ($dy2676==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2676>4) {?><font color="red"><?php }elseif ($dy2676==$ymin){ $yopt='26';$yoptD=$y26dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2676,2);?></div></td>
<td <?php if ($dy2776==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2776>4) {?><font color="red"><?php }elseif ($dy2776==$ymin){ $yopt='27';$yoptD=$y27dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2776,2);?></div></td>
<td <?php if ($dy2876==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2876>4) {?><font color="red"><?php }elseif ($dy2876==$ymin){ $yopt='28';$yoptD=$y28dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2876,2);?></div></td>
<td <?php if ($dy2976==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy2976>4) {?><font color="red"><?php }elseif ($dy2976==$ymin){ $yopt='29';$yoptD=$y29dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2976,2);?></div></td>
<td <?php if ($dy3076==$ymin){ echo 'bgcolor="#91ff78">'; }?><div align="right"><?php if ($dy3076>4) {?><font color="red"><?php }elseif ($dy3076==$ymin){ $yopt='30';$yoptD=$y30dd;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy3076,2);?></div></td>
</tr>
<tr>
<td><div align="center"></div></td>
<td><div align="center">No.</div></td>
<td><div align="center"></div></td>
<td><div align="center">sL</div></td>
<td><div align="center">sa</div></td>
<td><div align="center">sb</div></td>
<td><div align="center">P</div></td>
<td><div align="center">pL</div></td>
<td><div align="center">pa</div></td>
<td><div align="center">pb</div></td>
<td><div align="center">dE00</div></td>
<td><div align="center">pD</div></td>
<td>P</td>
<td><div align="center">mL</div></td>
<td><div align="center">ma</div></td>
<td><div align="center">mb</div></td>
<td><div align="center">dE00</div></td>
<td><div align="center">mD</div></td>
<td><div align="center">Correction</div></td>
<?php $cch=sqrt(pow(${ 'c'.$copt.'a'},2)+pow(${ 'c'.$copt.'b'},2));
$sccch= sqrt(pow($scCa,2)+pow($scCb,2));
$mch=sqrt(pow(${ 'm'.$mopt.'a'},2)+pow(${ 'm'.$mopt.'b'},2));
$scmch= sqrt(pow($scMa,2)+pow($scMb,2));
$ych=sqrt(pow(${ 'y'.$yopt.'a'},2)+pow(${ 'y'.$yopt.'b'},2));
$scych= sqrt(pow($scYa,2)+pow($scYb,2));?>
<?php
if ($device=='isis') {
$mlt=${ 'm'.$mopt.'l'};}
else {
$mlt=${ 'm'.$mopt.'l'}-0.8;}
if ($device=='isis') {
$mbt=${ 'm'.$mopt.'b'};}
else {
$mbt=${ 'm'.$mopt.'b'}-1.2;}
?>
</tr>
<tr>
<td><div align="center">K</div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php echo $kopt;?></div></td>
<td><div align="center">S</div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php echo round($scKL,2);?></div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php echo round($scKa,2);?></div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php echo round($scKb,2);?></div></td>
<td><div align="center">R</div></td>
<td bgcolor="#DDDDDD"><div align="right"><?php echo ${ 'k'.$kopt.'l'};?></div></td>
<td bgcolor="#DDDDDD"><div align="right"><?php echo ${ 'k'.$kopt.'a'};?></div></td>
<td bgcolor="#DDDDDD"><div align="right"><?php echo ${ 'k'.$kopt.'b'};?></div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php if ($kmin>5) {?><font color="red"><?php }
if (${ 'k'.$kopt.'l'}<$scKL) { echo round($kmin,2)."*";} else {echo round($kmin,2); }?></div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php if ($kmin>4.5) {echo round($koptD,2).$kdi;} else { echo round($koptD,2);}?></div></td>
<td>R</td>
<td bgcolor="#DDDDDD"><div align="right"><?php echo $mkl;?></div></td>
<td bgcolor="#DDDDDD"><div align="right"><?php echo $mka;?></div></td>
<td bgcolor="#DDDDDD"><div align="right"><?php echo $mkb;?></div></td>
<td bgcolor="#DDDDDD"><div align="right"><?php echo round($dek00,2);?></div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php echo round($mkD,2);?></div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php if ($koptD>$mkD){$sign="+";} else {$sign="";}echo $sign.round(($koptD-$mkD),2);?></div></td>
</tr>
<tr>
<td><div align="center">C</div></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo $copt;?></div></td>
<td><div align="center">C</div></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($scCL,2);?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($scCa,2);?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($scCb,2);?></div></td>
<td>D</td>
<td bgcolor="#bbFFFF"><div align="right"><?php echo ${ 'c'.$copt.'l'};?></div></td>
<td bgcolor="#bbFFFF"><div align="right"><?php echo ${ 'c'.$copt.'a'};?></div></td>
<td bgcolor="#bbFFFF"><div align="right"><?php echo ${ 'c'.$copt.'b'};?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php if ($cmin>5) {?><font color="red"><?php }
if ($cch>$sccch) { echo round($cmin,2)."*";} else {echo round($cmin,2); }?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php if ($cmin>4.5) {echo round($coptD,2).$cdi;} else { echo round($coptD,2);}?></div></td>
<td>I</td>
<td bgcolor="#bbFFFF"><div align="right"><?php echo $mcl;?></div></td>
<td bgcolor="#bbFFFF"><div align="right"><?php echo $mca;?></div></td>
<td bgcolor="#bbFFFF"><div align="right"><?php echo $mcb;?></div></td>
<td bgcolor="#bbFFFF"><div align="right"><?php echo round($dec00,2);?></div></td>
<td bgcolor="#bbFFFF"><div align="right"><?php echo round($mcD,2);?></div></td>
<td bgcolor="#bbFFFF"><div align="right"><?php if ($coptD>$mcD){$sign="+";} else {$sign="";}echo $sign.round(($coptD-$mcD),2);?></div></td>
</tr>
<tr>
<td><div align="center">M</div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo $mopt;?></div></td>
<td>C</td>
<td bgcolor="#FF99FF"><div align="right"><?php echo round($scML,2);?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo round($scMa,2);?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo round($scMb,2);?></div></td>
<td>I</td>
<td bgcolor="#FFccFF"><div align="right"><?php echo $mlt;?></div></td>
<td bgcolor="#FFccFF"><div align="right"><?php echo ${ 'm'.$mopt.'a'};?></div></td>
<td bgcolor="#FFccFF"><div align="right"><?php echo $mbt;?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php if ($mmin>5) {?><font color="red"><?php }
if ($mch>$scmch) { echo round($mmin,2)."*";} else {echo round($mmin,2); }?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php if ($mmin>4.5) {echo round($moptD,2).$mdi;} else { echo round($moptD,2);}?></div></td>
<td>N</td>
<td bgcolor="#FFccFF"><div align="right"><?php echo $mml;?></div></td>
<td bgcolor="#FFccFF"><div align="right"><?php echo $mma;?></div></td>
<td bgcolor="#FFccFF"><div align="right"><?php echo $mmb;?></div></td>
<td bgcolor="#FFccFF"><div align="right"><?php echo round($dem00,2);?></div></td>
<td bgcolor="#FFccFF"><div align="right"><?php echo round($mmD,2);?></div></td>
<td bgcolor="#FFccFF"><div align="right"><?php if ($moptD>$mmD){$sign="+";} else {$sign="";}echo $sign.round(($moptD-$mmD),2);?></div></td>
</tr>
<tr>
<td><div align="center">Y</div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo $yopt;?></div></td>
<td>A</td>
<td bgcolor="#FFFF99"><div align="right"><?php echo round($scYL,2);?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo round($scYa,2);?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo round($scYb,2);?></div></td>
<td>C</td>
<td bgcolor="#FFFFbb"><div align="right"><?php echo ${ 'y'.$yopt.'l'};?></div></td>
<td bgcolor="#FFFFbb"><div align="right"><?php echo ${ 'y'.$yopt.'a'};?></div></td>
<td bgcolor="#FFFFbb"><div align="right"><?php echo ${ 'y'.$yopt.'b'};?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php if ($ymin>5) {?><font color="red"><?php }
if ($ych>$scych) { echo round($ymin,2)."*";} else {echo round($ymin,2); }?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php if ($ymin>4.5) {echo round($yoptD,2).$ydi;} else { echo round($yoptD,2);}?></div></td>
<td>T</td>
<td bgcolor="#FFFFbb"><div align="right"><?php echo $myl;?></div></td>
<td bgcolor="#FFFFbb"><div align="right"><?php echo $mya;?></div></td>
<td bgcolor="#FFFFbb"><div align="right"><?php echo $myb;?></div></td>
<td bgcolor="#FFFFbb"><div align="right"><?php echo round($dey00,2);?></div></td>
<td bgcolor="#FFFFbb"><div align="right"><?php echo round($myD,2);?></div></td>
<td bgcolor="#FFFFbb"><div align="right"><?php if ($yoptD>$myD){$sign="+";} else {$sign="";}echo $sign.round(($yoptD-$myD),2);?></div></td>
</tr>
</table>
<br>
<table width="200" border="1" align="center">
<tr>
<td><div align="center">
<?php // content="text/plain; charset=utf-8"
unlink('scatterK.png');
require_once ('../jpgraph/jpgraph.php');
require_once ('../jpgraph/jpgraph_scatter.php');
require_once ('../jpgraph/jpgraph_line.php');
require_once ('../jpgraph/jpgraph_plotline.php');
$datax = array($k1dd,$k2dd,$k3dd,$k4dd,$k5dd,$k6dd,$k7dd,$k8dd,$k9dd,$k10dd,$k11dd,$k12dd,$k13dd,$k14dd,$k15dd,$k16dd,$k17dd,$k18dd,$k19dd,$k20dd,$k21dd,$k22dd,$k23dd,$k24dd,$k25dd,$k26dd,$k27dd,$k28dd,$k29dd,$k30dd);
$datay = array($dk176,$dk276,$dk376,$dk476,$dk576,$dk676,$dk776,$dk876,$dk976,$dk1076,$dk1176,$dk1276,$dk1376,$dk1476,$dk1576,$dk1676,$dk1776,$dk1876,$dk1976,$dk2076,$dk2176,$dk2276,$dk2376,$dk2476,$dk2576,$dk2676,$dk2776,$dk2876,$dk2976,$dk3076);
$dataxT = array($koptD,$mkD);
$datayT = array($kmin,$dek00);
$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>
<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');
$datax = array($c1dd,$c2dd,$c3dd,$c4dd,$c5dd,$c6dd,$c7dd,$c8dd,$c9dd,$c10dd,$c11dd,$c12dd,$c13dd,$c14dd,$c15dd,$c16dd,$c17dd,$c18dd,$c19dd,$c20dd,$c21dd,$c22dd,$c23dd,$c24dd,$c25dd,$c26dd,$c27dd,$c28dd,$c29dd,$c30dd);
$datay = array($dc176,$dc276,$dc376,$dc476,$dc576,$dc676,$dc776,$dc876,$dc976,$dc1076,$dc1176,$dc1276,$dc1376,$dc1476,$dc1576,$dc1676,$dc1776,$dc1876,$dc1976,$dc2076,$dc2176,$dc2276,$dc2376,$dc2476,$dc2576,$dc2676,$dc2776,$dc2876,$dc2976,$dc3076);
$dataxT = array($coptD,$mcD);
$datayT = array($cmin,$dec00);
$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');
require_once ('../jpgraph/jpgraph.php');
require_once ('../jpgraph/jpgraph_scatter.php');
$datax = array($m1dd,$m2dd,$m3dd,$m4dd,$m5dd,$m6dd,$m7dd,$m8dd,$m9dd,$m10dd,$m11dd,$m12dd,$m13dd,$m14dd,$m15dd,$m16dd,$m17dd,$m18dd,$m19dd,$m20dd,$m21dd,$m22dd,$m23dd,$m24dd,$m25dd,$m26dd,$m27dd,$m28dd,$m29dd,$m30dd);
$datay = array($dm176,$dm276,$dm376,$dm476,$dm576,$dm676,$dm776,$dm876,$dm976,$dm1076,$dm1176,$dm1276,$dm1376,$dm1476,$dm1576,$dm1676,$dm1776,$dm1876,$dm1976,$dm2076,$dm2176,$dm2276,$dm2376,$dm2476,$dm2576,$dm2676,$dm2776,$dm2876,$dm2976,$dm3076);
$dataxT = array($moptD,$mmD);
$datayT = array($mmin,$dem00);
$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');
require_once ('../jpgraph/jpgraph.php');
require_once ('../jpgraph/jpgraph_scatter.php');
$datax = array($y1dd,$y2dd,$y3dd,$y4dd,$y5dd,$y6dd,$y7dd,$y8dd,$y9dd,$y10dd,$y11dd,$y12dd,$y13dd,$y14dd,$y15dd,$y16dd,$y17dd,$y18dd,$y19dd,$y20dd,$y21dd,$y22dd,$y23dd,$y24dd,$y25dd,$y26dd,$y27dd,$y28dd,$y29dd,$y30dd);
$datay = array($dy176,$dy276,$dy376,$dy476,$dy576,$dy676,$dy776,$dy876,$dy976,$dy1076,$dy1176,$dy1276,$dy1376,$dy1476,$dy1576,$dy1676,$dy1776,$dy1876,$dy1976,$dy2076,$dy2176,$dy2276,$dy2376,$dy2476,$dy2576,$dy2676,$dy2776,$dy2876,$dy2976,$dy3076);
$dataxT = array($yoptD,$myD);
$datayT = array($ymin,$dey00);
$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>
</tr>
</table>
<tr>
<td align="center"><font size="+0">
<table width="1228" height="128" border="2" align="center" cellpadding="1" cellspacing="2">
<tr>
<td colspan = "2" bgcolor="#999999" scope="row">Required Density Correction</td>
<td colspan = "2" bgcolor="#999999">Set This Aim density</td>
<td colspan = "2" bgcolor="#66CCFF">Required Density Correction:</td>
<td colspan = "2" bgcolor="#66CCFF">Set This Aim density</td>
<td colspan = "2" bgcolor="#FFCCFF">Required Density Correction:</td>
<td colspan = "2" bgcolor="#FFCCFF">Set This Aim density</td>
<td colspan = "2" bgcolor="#FFFF99">Required Density Correction:</td>
<td colspan = "2" bgcolor="#FFFF99">Set This Aim density</td>
</tr>
<tr>
<td width="70" height="57" bgcolor="#999999" scope="row"><h3><strong>K</strong></h3></td>
<td width="67" bgcolor="#999999"><font color='red'><h3><strong><?php if ($koptD>$mkD){$sign="+";} else {$sign="";}echo $sign.round(($koptD-$mkD),2);?> </strong></td>
<td width="55" bgcolor="#999999"><h3><strong>K</strong></h3></td>
<td width="97" bgcolor="#999999"><font color='green'><h3><strong><?php echo round($koptD,2);?> </td>
<td width="51" bgcolor="#66CCFF"><h3><strong>C</td>
<td width="79" bgcolor="#66CCFF"><font color='red'><h3><strong><?php if ($coptD>$mcD){$sign="+";} else {$sign="";}echo $sign.round(($coptD-$mcD),2);?> </td>
<td width="68" bgcolor="#66CCFF"><h3><strong>C</td>
<td width="84" bgcolor="#66CCFF"><font color='green'><h3><strong><?php echo round($coptD,2);?> </td>
<td width="64" bgcolor="#FFCCFF"><h3><strong>M</td>
<td width="75" bgcolor="#FFCCFF"><font color='red'><h3><strong><?php if ($moptD>$mmD){$sign="+";} else {$sign="";}echo $sign.round(($moptD-$mmD),2);?> </td>
<td width="72" bgcolor="#FFCCFF"><h3><strong>M</td>
<td width="77" bgcolor="#FFCCFF"><h3><font color='green'><strong><?php echo round($moptD,2);?> </td>
<td width="55" bgcolor="#FFFF99"><h3><strong>Y</td>
<td width="58" bgcolor="#FFFF99"><font color='red'><h3><strong><?php if ($yoptD>$myD){$sign="+";} else {$sign="";}echo $sign.round(($yoptD-$myD),2);?> </td>
<td width="76" bgcolor="#FFFF99"><h3><strong>Y</td>
<td width="78" bgcolor="#FFFF99"><font color='green'><h3><strong><?php echo round($yoptD,2);?> </td>
</tr>
</table>
<table width="1228" border="2" align="center" cellpadding="2" cellspacing="2" >
<tr>
<td width="144" bgcolor="#CCCCCC" scope="row">Den.(T) Meas.</td>
<td width="156" bgcolor="#CCCCCC"><?php echo round($mkD,2);?> </td>
<td width="132" bgcolor="#66ddFF">Den.(T) Meas.</td>
<td width="143" bgcolor="#66ddFF"><?php echo round($mcD,2);?> </td>
<td width="145" bgcolor="#FFddFF">Den.(T) Meas.</td>
<td width="155" bgcolor="#FFddFF"><?php echo round($mmD,2);?> </td>
<td width="133" bgcolor="#FFFFbb">Den.(T) Meas.</td>
<td width="150" bgcolor="#FFFFbb"><?php echo round($myD,2);?> </td>
</tr>
<tr>
<td bgcolor="#CCCCCC" scope="row">Lab Measured</td>
<td bgcolor="#CCCCCC"><?php echo $mkl.";".$mka.";".$mkb;?> </td>
<td bgcolor="#66ddFF">Lab Measured</td>
<td bgcolor="#66ddFF"><?php echo $mcl.";".$mca.";".$mcb;?> </td>
<td bgcolor="#FFddFF">Lab Measured</td>
<td bgcolor="#FFddFF"><?php echo $mml.";".$mma.";".$mmb;?> </td>
<td bgcolor="#FFFFbb">Lab Measured</td>
<td bgcolor="#FFFFbb"><?php echo $myl.";".$mya.";".$myb;?> </td>
</tr>
<tr>
<td bgcolor="#CCCCCC" scope="row">dE00 to Aim</td>
<td bgcolor="#CCCCCC"><?php echo round($dek00,2);?></td>
<td bgcolor="#66ddFF">dE00 to Aim</td>
<td bgcolor="#66ddFF"><?php echo round($dec00,2);?></td>
<td bgcolor="#FFddFF">dE00 to Aim</td>
<td bgcolor="#FFddFF"><?php echo round($dem00,2);?></td>
<td bgcolor="#FFFFbb">dE00 to Aim</td>
<td bgcolor="#FFFFbb"><?php echo round($dey00,2);?></td>
</tr>
<tr><td bgcolor="#CCCCCC"><td bgcolor="#CCCCCC"><td bgcolor="#66ddFF"><td bgcolor="#66ddFF"><td bgcolor="#FFddFF"><td bgcolor="#FFddFF"><td bgcolor="#FFFFbb"><td bgcolor="#FFFFbb"></tr>
<tr>
<td bgcolor="#CCCCCC">Den.(T) Predict</td>
<td bgcolor="#CCCCCC"><?php echo round($koptD,2);?> </td>
<td bgcolor="#66ddFF">Den.(T) Predict</td>
<td bgcolor="#66ddFF"><?php echo round($coptD,2);?> </td>
<td bgcolor="#FFddFF">Den.(T) Predict</td>
<td bgcolor="#FFddFF"><?php echo round($moptD,2);?> </td>
<td bgcolor="#FFFFbb">Den.(T) Predict</td>
<td bgcolor="#FFFFbb"><?php echo round($yoptD,2);?> </td>
</tr>
<tr>
<td bgcolor="#CCCCCC">Lab Measured</td>
<td bgcolor="#CCCCCC"><?php echo ${ 'k'.$kopt.'l'}.";".${ 'k'.$kopt.'a'}.";".${ 'k'.$kopt.'b'};?></td>
<td bgcolor="#66ddFF">Lab Measured</td>
<td bgcolor="#66ddFF"><?php echo ${ 'c'.$copt.'l'}.";".${ 'c'.$copt.'a'}.";".${ 'c'.$copt.'b'};?></td>
<td bgcolor="#FFddFF">Lab Measured</td>
<td bgcolor="#FFddFF"><?php echo ${ 'm'.$mopt.'l'}.";".${ 'm'.$mopt.'a'}.";".${ 'm'.$mopt.'b'};?></td>
<td bgcolor="#FFFFbb">Lab Measured</td>
<td bgcolor="#FFFFbb"><?php echo ${ 'y'.$yopt.'l'}.";".${ 'y'.$yopt.'a'}.";".${ 'y'.$yopt.'b'};?></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" scope="row">dE00 to Aim</td>
<td bgcolor="#CCCCCC"><?php echo round($kmin,2);?></td>
<td bgcolor="#66ddFF" scope="row">dE00 to Aim</td>
<td bgcolor="#66ddFF"><?php echo round($cmin,2);?></td>
<td bgcolor="#FFddFF" scope="row">dE00 to Aim</td>
<td bgcolor="#FFddFF"><?php echo round($mmin,2);?></td>
<td bgcolor="#FFFFbb" scope="row">dE00 to Aim</td>
<td bgcolor="#FFFFbb"><?php echo round($ymin,2);?></td>
</tr>
</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 PSASID(company, contact, filename, ddate, device, dsn, printer, paper, ink ) VALUES('$company', '$contact', '$filename', NOW(), '$device', '$dsn', '$printer', '$paper', '$ink')";
//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>, 2014. All rights reserved.<br><a href="http://www.fredkuo.idv.tw/wordpress/?p=1025">Read more.</a><br>
</td>
</tr>
</body>
</html>