HEX
Server: Apache/2.4.46 (Win64) OpenSSL/1.1.1j PHP/8.4.25
System: Windows NT DESKTOP-4TAV2RJ 10.0 build 19045 (Windows 10) AMD64
User: fred (0)
PHP: 8.4.25
Disabled: NONE
$ pwd: C:/xampp/htdocs/PBN/PSASID/
Upload Files
File: C:/xampp/htdocs/PBN/PSASID/TVI-parsing13-2.php
<?php
extract($_REQUEST);
session_start();?>
 <!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

if ($target == "Fogra39") {
  $PTL=95;$PTa=0;$PTb=-2;
  $RPCCl=55;$RPCCa=-37;$RPCCb=-50;
  $RPCMl=48;$RPCMa=74;$RPCMb=-3;
  $RPCYl=89;$RPCYa=-5;$RPCYb=93;
  $RPCKl=16;$RPCKa=0.01;$RPCKb=0.01;
 }
elseif ($target == "CRPC6") {
  $PTL=95;$PTa=1;$PTb=-4;
  $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;
}
elseif ($target == "GRACoL2006") {
  $PTL=95;$PTa=0;$PTb=-2;
  $RPCCl=55;$RPCCa=-37;$RPCCb=-50;
  $RPCMl=48;$RPCMa=74;$RPCMb=-3;
  $RPCYl=89;$RPCYa=-5;$RPCYb=93;
  $RPCKl=16;$RPCKa=0.01;$RPCKb=0.01;
}


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 />";
	echo "do text area";
	$filename='text-area';
	//echo $_POST['spData'];
	
		$p = ereg_replace("\r\n?", "\n", $_POST['spData']);
$p = str_replace("\n", "\t", $p);

	//$stringC = implode($_POST['spData']);
	


	$dot = explode("\t", $p);
//print_r ($dot);
echo "<br>";
$Pdot=1; //paper
//echo "take:".$dot[6+$cols*$Pdot];
$cols=36;

$PX=sp38XYZ("X",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);

$PY=sp38XYZ("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);

$PZ=sp38XYZ("Z",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$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 $target." paper: L ".$PTL." a:".$PTa." b:".$PTb.  "<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 />";
$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,$target);
$scCY=SCCA06("y",$RPCCY,$Yp,$target);
$scCZ=SCCA06("z",$RPCCZ,$Zp,$target);

$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,$target);
$scMY=SCCA06("y",$RPCMY,$Yp,$target);
$scMZ=SCCA06("z",$RPCMZ,$Zp,$target);

$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,$target);
$scYY=SCCA06("y",$RPCYY,$Yp,$target);
$scYZ=SCCA06("z",$RPCYZ,$Zp,$target);

$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,$target);
$scKY=SCCA06("y",$RPCKY,$Yp,$target);
$scKZ=SCCA06("z",$RPCKZ,$Zp,$target);

$scKL=xyz2lab("l",$scKX,$scKY,$scKZ);
$scKa=xyz2lab("a",$scKX,$scKY,$scKZ);
$scKb=xyz2lab("b",$scKX,$scKY,$scKZ);

echo $target." 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///////////////////////////////////////////////////////////
	if ($dot[94]<0.07 and $dot[94]>0.025 and $dot[108]<>'') {
	$Pdot=2;
	
 	$mcx=sp38XYZ("X",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mcy=sp38XYZ("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mcz=sp38XYZ("Z",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$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[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]); }
	elseif ($dot[94]<0.07 and $dot[94]>0.025 and $dot[108]=='') {
	$Pdot=2;
	
 	$mcx=sp38XYZ("X",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mcy=sp38XYZ("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mcz=sp38XYZ("Z",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
 
	$mcl=xyz2lab01("l",$mcx,$mcy,$mcz);
	$mca=xyz2lab01("a",$mcx,$mcy,$mcz);
	$mcb=xyz2lab01("b",$mcx,$mcy,$mcz);
	
	$mkl=16.5;
	$mka=-0.5;
	$mkb=-1.5;
	
	$mml=48.5;
	$mma=74.5;
	$mmb=-3.5;
	
	$myl=89.5;
	$mya=-5.5;
	$myb=90.5;
 
	$mcD=DensitySp38("C",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	$mkD=1.1;
	$mmD=1.1;
	$myD=1.1;
	
	}
////////////////////////////////////////////////////// mk
	if ($dot[94]<0.023 and $dot[108]=='') {
	$Pdot=2; 
	 	$mkx=sp38XYZ("X",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mky=sp38XYZ("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mkz=sp38XYZ("Z",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
 
	$mkl=xyz2lab01("l",$mkx,$mky,$mkz);
	$mka=xyz2lab01("a",$mkx,$mky,$mkz);
	$mkb=xyz2lab01("b",$mkx,$mky,$mkz);
	
	$mcl=55.5;
	$mca=-37.5;
	$mcb=-50.5;
	
	$mml=48.5;
	$mma=74.5;
	$mmb=-3.5;
	
	$myl=89.5;
	$mya=-5.5;
	$myb=90.5;
 
	$mkD=DensitySp38("K",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	$mcD=1.1;
	$mmD=1.1;
	$myD=1.1;
	}
	elseif ($dot[108]<>'') {
	$Pdot=5;

 	//$Pdot=5;
 	$mkx=sp38XYZ("X",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mky=sp38XYZ("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mkz=sp38XYZ("Z",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$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[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	}
////////////////////////////////////////////////////// mm

	if ($dot[94]<0.5 and $dot[94]>0.2 and $dot[108]=='') {
	$Pdot=2; 
	$mmx=sp38XYZ("X",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mmy=sp38XYZ("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mmz=sp38XYZ("Z",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
 
	$mml=xyz2lab01("l",$mmx,$mmy,$mmz);
	$mma=xyz2lab01("a",$mmx,$mmy,$mmz);
	$mmb=xyz2lab01("b",$mmx,$mmy,$mmz);
	
	$mkl=16.5;
	$mka=-0.5;
	$mkb=-1.5;
	
	$mcl=55.5;
	$mca=-37.5;
	$mcb=-50.5;
	
	$myl=89.5;
	$mya=-5.5;
	$myb=90.5;
 
	$mmD=DensitySp38("M",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	$mcD=1.1;
	$mkD=1.1;
	$myD=1.1;
	}
	
	elseif ($dot[108]<>'') {
	$Pdot=3;
 	$mmx=sp38XYZ("X",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mmy=sp38XYZ("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$mmz=sp38XYZ("Z",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$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[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);}

////////////////////////////////////////////////////// my
	if ($dot[94]>0.7 and $dot[108]=='') {
	$Pdot=2; 
	$myx=sp38XYZ("X",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$myy=sp38XYZ("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$myz=sp38XYZ("Z",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
 
	$myl=xyz2lab01("l",$myx,$myy,$myz);
	$mya=xyz2lab01("a",$myx,$myy,$myz);
	$myb=xyz2lab01("b",$myx,$myy,$myz);
	
	$mkl=16.5;
	$mka=-0.5;
	$mkb=-1.5;
	
	$mml=48.5;
	$mma=74.5;
	$mmb=-3.5;
	
	$mcl=55.5;
	$mca=-37.5;
	$mcb=-50.5;
	
 
	$myD=DensitySp38("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	$mcD=1.1;
	$mmD=1.1;
	$mkD=1.1;
	}
	elseif ($dot[108]<>'') {
 	$Pdot=4;
 	$myx=sp38XYZ("X",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$myy=sp38XYZ("Y",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);
	
	$myz=sp38XYZ("Z",$dot[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$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[$cols*$Pdot],$dot[$cols*$Pdot+1],$dot[$cols*$Pdot+2],$dot[$cols*$Pdot+3],$dot[$cols*$Pdot+4],$dot[$cols*$Pdot+5],$dot[$cols*$Pdot+6],$dot[$cols*$Pdot+7],$dot[$cols*$Pdot+8],$dot[$cols*$Pdot+9],$dot[$cols*$Pdot+10],$dot[$cols*$Pdot+11],$dot[$cols*$Pdot+12],$dot[$cols*$Pdot+13],$dot[$cols*$Pdot+14],$dot[$cols*$Pdot+15],$dot[$cols*$Pdot+16],$dot[$cols*$Pdot+17],$dot[$cols*$Pdot+18],$dot[$cols*$Pdot+19],$dot[$cols*$Pdot+20],$dot[$cols*$Pdot+21],$dot[$cols*$Pdot+22],$dot[$cols*$Pdot+23],$dot[$cols*$Pdot+24],$dot[$cols*$Pdot+25],$dot[$cols*$Pdot+26],$dot[$cols*$Pdot+27],$dot[$cols*$Pdot+28],$dot[$cols*$Pdot+29],$dot[$cols*$Pdot+30],$dot[$cols*$Pdot+31],$dot[$cols*$Pdot+32],$dot[$cols*$Pdot+33],$dot[$cols*$Pdot+34],$dot[$cols*$Pdot+35]);}


 ////////////////sec K
	$ki=0.820;
	for ( $i = 1; $i <= 30; $i+= 1) {
	if ($dot[94]<0.023) {
	$Pdot=2; 
	$factor=$Pdot-1;
	${'c'.$i.'dd'}=1;
	${'m'.$i.'dd'}=1;
	${'y'.$i.'dd'}=1;
	$si=0;
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dot[$cols*$factor+$si];
	//echo "p".$s."=".${'p'.$s}.",";
	${'m'.$s}=$dot[$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'});
	
	${'c'.$i.'l'}=55;
	${'c'.$i.'a'}=-37;
	${'c'.$i.'b'}=-50;
	
	${'m'.$i.'l'}=48;
	${'m'.$i.'a'}=74;
	${'m'.$i.'b'}=-3;
	
	${'y'.$i.'l'}=89;
	${'y'.$i.'a'}=-5;
	${'y'.$i.'b'}=90;
	
	
	
	//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);
	}
	elseif ($dot[108]<>'') {
	$Pdot=5;
	$factor=$Pdot-4;
	//$Pdot=5;////K line
	$si=0;
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dot[$cols*$factor+$si];
	//echo "p".$s."=".${'p'.$s}.",";
	${'m'.$s}=$dot[$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) {
	if ($dot[94]<0.07 and $dot[94]>0.025 and $dot[108]=='') {
	${'k'.$i.'dd'}=1;
	${'m'.$i.'dd'}=1;
	${'y'.$i.'dd'}=1;
	$Pdot=2; 
	//$Pdot=2;////C line
	$si=0;
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dot[$cols*($Pdot-1)+$si];
	//echo "p".$s."=".${'p'.$s}.",";
	${'m'.$s}=$dot[$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'});
	
	${'k'.$i.'l'}=16;
	${'k'.$i.'a'}=-0.1;
	${'k'.$i.'b'}=-0.1;
	
	${'m'.$i.'l'}=48;
	${'m'.$i.'a'}=74;
	${'m'.$i.'b'}=-3;
	
	${'y'.$i.'l'}=89;
	${'y'.$i.'a'}=-5;
	${'y'.$i.'b'}=90;
	
	
	//echo "K1L=".round($c1l,3).",".round($c1a,3).",".round($c1b,3);
	${'c'.$i.'dd'}=DensitySp38("C",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	//echo "K1D=".round($k1dd,3);
	}
	else {
	$Pdot=2; 
	//$Pdot=2;////C line
	$si=0;
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dot[$cols*($Pdot-1)+$si];
	//echo "p".$s."=".${'p'.$s}.",";
	${'m'.$s}=$dot[$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);
	}
	}
//////////////////////////sec M
	$ki=0.820;
	for ( $i = 1; $i <= 30; $i+= 1) {
	if ($dot[94]<0.5 and $dot[94]>0.2) {
	$Pdot=2; 
	$factor=$Pdot-1;
	${'c'.$i.'dd'}=1;
	${'k'.$i.'dd'}=1;
	${'y'.$i.'dd'}=1;
	$si=0;
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dot[$cols*$factor+$si];
	//echo "p".$s."=".${'p'.$s}.",";
	${'m'.$s}=$dot[$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'});
	
	${'c'.$i.'l'}=55;
	${'c'.$i.'a'}=-37;
	${'c'.$i.'b'}=-50;
	
	${'k'.$i.'l'}=16;
	${'k'.$i.'a'}=0.1;
	${'k'.$i.'b'}=0.1;
	
	${'y'.$i.'l'}=89;
	${'y'.$i.'a'}=-5;
	${'y'.$i.'b'}=90;
	
	//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);
	}
	elseif ($dot[108]<>'') {
	$Pdot=3;
	$factor=$Pdot+1;
	
	//$Pdot=3;////M line
	$si=0;
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dot[$cols*$factor+$si];
	//echo "p".$s."=".${'p'.$s}.",";
	${'m'.$s}=$dot[$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) {
	if ($dot[94]>0.7) {
	$Pdot=2; 
	$factor=$Pdot-1;
	${'c'.$i.'dd'}=1;
	${'m'.$i.'dd'}=1;
	${'k'.$i.'dd'}=1;
	$si=0;
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dot[$cols*$factor+$si];
	//echo "p".$s."=".${'p'.$s}.",";
	${'m'.$s}=$dot[$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'});
	
	${'c'.$i.'l'}=55;
	${'c'.$i.'a'}=-37;
	${'c'.$i.'b'}=-50;
	
	${'m'.$i.'l'}=48;
	${'m'.$i.'a'}=74;
	${'m'.$i.'b'}=-3;
	
	${'k'.$i.'l'}=16;
	${'k'.$i.'a'}=-0.1;
	${'k'.$i.'b'}=0.1;
	
	//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);
	
	}
	elseif ($dot[108]<>'') {
	$Pdot=4;
	$factor=$Pdot-3;
	$si=0;
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dot[$cols*$factor+$si];
	//echo "p".$s."=".${'p'.$s}.",";
	${'m'.$s}=$dot[$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);
	}
	//$Pdot=4;////Y line
	
	 
	} 
	
	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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</td>
      <td width="132" bgcolor="#66ddFF">Den.(T) Meas.</td>
      <td width="143" bgcolor="#66ddFF"><?php echo round($mcD,2);?>&nbsp;</td>
      <td width="145" bgcolor="#FFddFF">Den.(T) Meas.</td>
      <td width="155" bgcolor="#FFddFF"><?php echo round($mmD,2);?>&nbsp;</td>
      <td width="133" bgcolor="#FFFFbb">Den.(T) Meas.</td>
      <td width="150" bgcolor="#FFFFbb"><?php echo round($myD,2);?>&nbsp;</td>
    </tr>
    <tr>
      <td bgcolor="#CCCCCC" scope="row">Lab Measured</td>
      <td bgcolor="#CCCCCC"><?php echo $mkl.";".$mka.";".$mkb;?>&nbsp;</td>
      <td bgcolor="#66ddFF">Lab Measured</td>
      <td bgcolor="#66ddFF"><?php echo $mcl.";".$mca.";".$mcb;?>&nbsp;</td>
      <td bgcolor="#FFddFF">Lab Measured</td>
      <td bgcolor="#FFddFF"><?php echo $mml.";".$mma.";".$mmb;?>&nbsp;</td>
      <td bgcolor="#FFFFbb">Lab Measured</td>
      <td bgcolor="#FFFFbb"><?php echo $myl.";".$mya.";".$myb;?>&nbsp;</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(contact,  filename,  target, ddate,  printer, paper, ink ) VALUES( '$contact',  '$filename', '$target', NOW(),  '$printer', '$paper', '$ink')";
		
		//echo $query;
		$result = mysql_query($query) or die ("Error in query: $query. " . mysql_error());
  
		mysql_close($connection);
}
	
    
	/////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////big section for text area	///////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////////////////
  else
    {
	echo $target." 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 "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[$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 $target." paper: L ".$PTL." a:".$PTa." b:".$PTb.  "<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 />";










$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,$target);
$scCY=SCCA06("y",$RPCCY,$Yp,$target);
$scCZ=SCCA06("z",$RPCCZ,$Zp,$target);

$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,$target);
$scMY=SCCA06("y",$RPCMY,$Yp,$target);
$scMZ=SCCA06("z",$RPCMZ,$Zp,$target);

$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,$target);
$scYY=SCCA06("y",$RPCYY,$Yp,$target);
$scYZ=SCCA06("z",$RPCYZ,$Zp,$target);

$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,$target);
$scKY=SCCA06("y",$RPCKY,$Yp,$target);
$scKZ=SCCA06("z",$RPCKZ,$Zp,$target);

$scKL=xyz2lab("l",$scKX,$scKY,$scKZ);
$scKa=xyz2lab("a",$scKX,$scKY,$scKZ);
$scKb=xyz2lab("b",$scKX,$scKY,$scKZ);

echo $target." 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 $target." 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 />";









$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,$target);
$scCY=SCCA06("y",$RPCCY,$Yp,$target);
$scCZ=SCCA06("z",$RPCCZ,$Zp,$target);

$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,$target);
$scMY=SCCA06("y",$RPCMY,$Yp,$target);
$scMZ=SCCA06("z",$RPCMZ,$Zp,$target);

$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,$target);
$scYY=SCCA06("y",$RPCYY,$Yp,$target);
$scYZ=SCCA06("z",$RPCYZ,$Zp,$target);

$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,$target);
$scKY=SCCA06("y",$RPCKY,$Yp,$target);
$scKZ=SCCA06("z",$RPCKZ,$Zp,$target);

$scKL=xyz2lab("l",$scKX,$scKY,$scKZ);
$scKa=xyz2lab("a",$scKX,$scKY,$scKZ);
$scKb=xyz2lab("b",$scKX,$scKY,$scKZ);

echo $target." 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;
 	error_reporting(0);
 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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</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);?>&nbsp;</td>
      <td width="132" bgcolor="#66ddFF">Den.(T) Meas.</td>
      <td width="143" bgcolor="#66ddFF"><?php echo round($mcD,2);?>&nbsp;</td>
      <td width="145" bgcolor="#FFddFF">Den.(T) Meas.</td>
      <td width="155" bgcolor="#FFddFF"><?php echo round($mmD,2);?>&nbsp;</td>
      <td width="133" bgcolor="#FFFFbb">Den.(T) Meas.</td>
      <td width="150" bgcolor="#FFFFbb"><?php echo round($myD,2);?>&nbsp;</td>
    </tr>
    <tr>
      <td bgcolor="#CCCCCC" scope="row">Lab Measured</td>
      <td bgcolor="#CCCCCC"><?php echo $mkl.";".$mka.";".$mkb;?>&nbsp;</td>
      <td bgcolor="#66ddFF">Lab Measured</td>
      <td bgcolor="#66ddFF"><?php echo $mcl.";".$mca.";".$mcb;?>&nbsp;</td>
      <td bgcolor="#FFddFF">Lab Measured</td>
      <td bgcolor="#FFddFF"><?php echo $mml.";".$mma.";".$mmb;?>&nbsp;</td>
      <td bgcolor="#FFFFbb">Lab Measured</td>
      <td bgcolor="#FFFFbb"><?php echo $myl.";".$mya.";".$myb;?>&nbsp;</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(contact,  filename,  target, ddate,  printer, paper, ink ) VALUES( '$contact',  '$filename', '$target', NOW(),  '$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"> &copy; <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>
@ Telegram