File: C:/xampp/htdocs/Fogra778/tvireportx.php
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Fogra 778 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">
<br>
<br>
<?php
include 'sp38XYZ.php';
include 'spXYZ.php';
include 'lab2xyz.php';
include 'SCCA06.php';
include 'xyz2lab01.php';
include 'xyz2lab.php';
echo "操作員:".$contact." 機型:".$printer." 量測儀器:".$device ." 日期:" .$date. " 檔名:".$tvifile. " ok file:".$okfile;
?><br><br><?php
$sum=100;
$check=1;
echo "Report start: " . "<br />";
// echo "Stored in: " . "upload/" . $_FILES["file"]["name"]. "<br />";
///parsing start
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;
}
if ($okfile==''){
$contentT = file("upload/".$tvifile);
//echo substr('abcdef', 1, 3); // bcd
$filedb=substr($tvifile,7,60);
$dbstr=explode("_", $filedb);
echo $dbstr[0]."XX".$dbstr[1]."XX".$dbstr[2]."XX".$dbstr[3].$dbstr[4].$dbstr[5];
$stringT = implode($contentT);
//echo $contents[20];
//echo $string;
$pt = ereg_replace("\r\n?", "\n", $stringT);
$pt = str_replace("\n", ',', $pt);
$datastring=get_between($pt,"BEGIN_DATA,",",END_DATA");
$dotT = explode("\t", $datastring);
$inserted = array( '0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0' ,'0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0');
array_splice( $dotT, 0, 0, $inserted );
?>
<form action="TVI-parsingCTOKXT.php?f123=<?php echo "target.csv".'&f321='.$_FILES["file"]["name"];?>" method="post">
<table width="200" border="0" align="center">
<tr><td>
<input size="15" maxlength="50" type="hidden" name="rtarget" value=<?php echo $f321;?> /></td>
</tr>
</table>
<p><p>
<table width="200" border="1" align="center">
<tr>
<td><div align="center">SID</div></td>
<td><font color="#aaaaaa">5</td>
<td><font color="#aaaaaa">6</td>
<td><font color="#aaaaaa">7</td>
<td><font color="#aaaaaa">8</td>
<td><font color="#666666">9</td>
<td><font color="#666666">10</td>
<td><font color="#666666">11</td>
<td><font color="#666666">12</td>
<td><font color="#666666">13</td>
<td><font color="#666666">14</td>
<td><font color="#666666">15</td>
<td><font color="#666666">16</td>
<td>17</td>
<td>18</td>
<td>19</td>
<td>20</td>
<td>21</td>
<td>22</td>
<td>23</td>
<td><font color="#666666">24</td>
<td><font color="#666666">25</td>
<td><font color="#666666">26</td>
<td>27</td>
<td>28</td>
</tr>
<?php
//////////////////////////////////////////////////Fogra Media Check
$psum=20;
$pl=95; $pa=-0.01;$pb=-2;
$cl=55.10; $ca=-37.0;$cb=-50;
$ml=48; $ma=74;$mb=-3;
$yl=89; $ya=-5;$yb=93;
$kl=16; $ka=0.01;$kb=0.01;
include 'densityV.php';
$cols=40;
$k1dd=0;
$Pdot=0;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-3;
${'k'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'l'}=xyz2lab01("l",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'a'}=xyz2lab01("a",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'b'}=xyz2lab01("b",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'d'}=DensitySp("K",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
}
echo "note 2k:".$k10l."_".$k10a."_".$k10b."xx";
/////////////////////////////////c
$c1X=spXYZ("X", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
$c1Y=spXYZ("Y", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
$c1Z=spXYZ("Z", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
$c1l=xyz2lab01("l",$c1X,$c1Y,$c1Z);
$c1a=xyz2lab01("a",$c1X,$c1Y,$c1Z);
$c1b=xyz2lab01("b",$c1X,$c1Y,$c1Z);
$c1d=DensitySp("C", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[9],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
echo "note 1c:".$dotT[89].$c1l."_".$c1a."_".$c1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-6;
${'c'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'l'}=xyz2lab01("l",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'a'}=xyz2lab01("a",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'b'}=xyz2lab01("b",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'d'}=DensitySp("C",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////m
$m1X=spXYZ("X", $dotT[128],$dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
$m1Y=spXYZ("Y", $dotT[128],$dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
$m1Z=spXYZ("Z", $dotT[128], $dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
$m1l=xyz2lab01("l",$m1X,$m1Y,$m1Z);
$m1a=xyz2lab01("a",$m1X,$m1Y,$m1Z);
$m1b=xyz2lab01("b",$m1X,$m1Y,$m1Z);
$m1d=DensitySp("M", $dotT[128],$dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
echo "note 1m:".$dotT[89].$m1l."_".$m1a."_".$m1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-5;
${'m'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'l'}=xyz2lab01("l",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'a'}=xyz2lab01("a",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'b'}=xyz2lab01("b",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'d'}=DensitySp("M",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////y
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-4;
${'y'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'l'}=xyz2lab01("l",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'a'}=xyz2lab01("a",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'b'}=xyz2lab01("b",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'d'}=DensitySp("Y",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
}
echo "note 2y:".$y2l."_".$y2a."_".$y2b;
///////////////////////////////////////////s
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-2;
${'s'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'l'}=xyz2lab01("l",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'a'}=xyz2lab01("a",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'b'}=xyz2lab01("b",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'d'}=DensitySp("K",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
}
echo "note 2s:".$s2l."_".$s2a."_".$s2b."_".$s2d;
$sl=$spl; $sa=$spa;$sb=$spb;
echo "spl:".$spl."xx__";
$k8_50d=$k8d;
$k17_50d=$k17d;
$c8_50d=$c8d;
$c17_50d=$c17d;
$m8_50d=$m8d;
$m17_50d=$m17d;
$y8_50d=$y8d;
$y17_50d=$y17d;
$s8_50d=$s8d;
$s17_50d=$s17d;
$k8l=($k7l+$k9l)/2;$k8a=($k7a+$k9a)/2;$k8b=($k7b+$k9b)/2;$k8d=($k7d+$k9d)/2;
$c8l=($c7l+$c9l)/2;$c8a=($c7a+$c9a)/2;$c8b=($c7b+$c9b)/2;$c8d=($c7d+$c9d)/2;
$m8l=($m7l+$m9l)/2;$m8a=($m7a+$m9a)/2;$m8b=($m7b+$m9b)/2;$m8d=($m7d+$m9d)/2;
$y8l=($y7l+$y9l)/2;$y8a=($y7a+$y9a)/2;$y8b=($y7b+$y9b)/2;$y8d=($y7d+$y9d)/2;
$s8l=($s7l+$s9l)/2;$s8a=($s7a+$s9a)/2;$s8b=($s7b+$s9b)/2;$s8d=($s7d+$s9d)/2;
$k17l=($k18l+$k16l)/2;$k17a=($k18a+$k16a)/2;$k17b=($k18b+$k16b)/2;$k17d=($k18d+$k16d)/2;
$c17l=($c18l+$c16l)/2;$c17a=($c18a+$c16a)/2;$c17b=($c18b+$c16b)/2;$c17d=($c18d+$c16d)/2;
$m17l=($m18l+$m16l)/2;$m17a=($m18a+$m16a)/2;$m17b=($m18b+$m16b)/2;$m17d=($m18d+$m16d)/2;
$y17l=($y18l+$y16l)/2;$y17a=($y18a+$y16a)/2;$y17b=($y18b+$y16b)/2;$y17d=($y18d+$y16d)/2;
$s17l=($s18l+$s16l)/2;$s17a=($s18a+$s16a)/2;$s17b=($s18b+$s16b)/2;$s17d=($s18d+$s16d)/2;
$K50=(((1-(pow(10,(-($k8_50d-$s2d)))))/(1-(pow(10,(-($k7d-$s2d)))))))*100;
echo "K50:".$K50."x x";
$k8T=round(($K50-67),2);
$K501=(((1-(pow(10,(-($k17_50d-$s2d)))))/(1-(pow(10,(-($k18d-$s2d)))))))*100;
$k17T=round(($K501-67),2);
echo "K501:".$K501."x x";
$c50=(((1-(pow(10,(-($c8_50d-$s2d)))))/(1-(pow(10,(-($c7d-$s2d)))))))*100;
$c8T=round(($c50-64),2);
$c501=(((1-(pow(10,(-($c17_50d-$s2d)))))/(1-(pow(10,(-($c18d-$s2d)))))))*100;
$c17T=round(($c501-64),2);
echo "c501:".$c501."x x";
$m50=(((1-(pow(10,(-($m8_50d-$s2d)))))/(1-(pow(10,(-($m7d-$s2d)))))))*100;
$m8T=round(($m50-64),2);
$m501=(((1-(pow(10,(-($m17_50d-$s2d)))))/(1-(pow(10,(-($m18d-$s2d)))))))*100;
$m17T=round(($m501-64),2);
$y50=(((1-(pow(10,(-($y8_50d-$s2d)))))/(1-(pow(10,(-($y7d-$s2d)))))))*100;
$y8T=round(($y50-64),2);
$y501=(((1-(pow(10,(-($y17_50d-$s2d)))))/(1-(pow(10,(-($y18d-$s2d)))))))*100;
$y17T=round(($y501-64),2);
$s50=(((1-(pow(10,(-($s8_50d-$s2d)))))/(1-(pow(10,(-($s7d-$s2d)))))))*100;
$s8T=round(($s50-64),2);
$s501=(((1-(pow(10,(-($s17_50d-$s2d)))))/(1-(pow(10,(-($s18d-$s2d)))))))*100;
$s17T=round(($s501-64),2);
function de76($l1,$a1,$b1,$l2,$a2,$b2) {
$d76=sqrt(pow(($l1-$l2),2)+ pow(($a1-$a2),2)+pow(($b1-$b2),2));
return round($d76,2);
}
function de94($l1,$a1,$b1,$l2,$a2,$b2) {
$cp=SQRT(pow($a1,2)+pow($b1,2));
$ctp=SQRT(pow($a2,2)+pow($b2,2));
$d76=sqrt(pow(($l1-$l2),2)+ pow(($a1-$a2),2)+pow(($b1-$b2),2));
$dph=SQRT(ABS(pow($d76,2)-pow(($l1-$l2),2)-pow((SQRT(pow($a1,2)+pow($b1,2))-SQRT(pow($a2,2)+pow($b2,2))),2)));
$dcp=$ctp-$cp;
$d94=SQRT((pow((($l1-$l2)/(1*1)),2))+pow(($dcp/(1*(1+(0.045*$cp)))),2)+ pow(($dph/(1*(1+(0.015*$cp)))),2));
return round($d94,2);
}
// $dk176=de76($kl,$ka,$kb,$k1l,$k1a,$k1b);
$dk276=de76($kl,$ka,$kb,$k2l,$k2a,$k2b);
$dk376=de76($kl,$ka,$kb,$k3l,$k3a,$k3b);
$dk476=de76($kl,$ka,$kb,$k4l,$k4a,$k4b);
$dk576=de76($kl,$ka,$kb,$k5l,$k5a,$k5b);
$dk676=de76($kl,$ka,$kb,$k6l,$k6a,$k6b);
$dk776=de76($kl,$ka,$kb,$k7l,$k7a,$k7b);
$dk976=de76($kl,$ka,$kb,$k9l,$k9a,$k9b);
$dk876=($dk776+$dk976)/2;
$dk1176=de76($kl,$ka,$kb,$k11l,$k11a,$k11b);
$dk1076=de76($kl,$ka,$kb,$k11l,$k11a,$k11b);
$dk1276=de76($kl,$ka,$kb,$k12l,$k12a,$k12b);
$dk1376=de76($kl,$ka,$kb,$k13l,$k13a,$k13b);
$dk1476=de76($kl,$ka,$kb,$k14l,$k14a,$k14b);
$dk1576=de76($kl,$ka,$kb,$k15l,$k15a,$k15b);
$dk1676=de76($kl,$ka,$kb,$k16l,$k16a,$k16b);
$dk1876=de76($kl,$ka,$kb,$k18l,$k18a,$k18b);
$dk1776=($dk1676+$dk1876)/2;
$dk1976=de76($kl,$ka,$kb,$k19l,$k19a,$k19b);
$dk2076=de76($kl,$ka,$kb,$k20l,$k20a,$k20b);
$dk2176=de76($kl,$ka,$kb,$k21l,$k21a,$k21b);
$dk2276=de76($kl,$ka,$kb,$k22l,$k22a,$k22b);
$dk2376=de76($kl,$ka,$kb,$k23l,$k23a,$k23b);
// $dk2476=de76($kl,$ka,$kb,$k24l,$k24a,$k24b);
//$dk2776=de76($kl,$ka,$kb,$k27l,$k27a,$k27b);
$kmin=min($dk276,$dk376,$dk476,$dk576,$dk676,$dk776,$dk876,$dk976,$dk1076,$dk1176,$dk1276,$dk1376,$dk1476,$dk1576,$dk1676,$dk1776,$dk1876,$dk1976,$dk2076,$dk2176,$dk2276,$dk2376);
$dk194=de94($kl,$ka,$kb,$k1l,$k1a,$k1b);
?>
<tr bgcolor="#aaaaaa">
<td><div align="center">KD</div></td>
<td><div align="right"></div></td>
<td><div align="right"><?php echo round($k2d,2);?></div></td>
<td><div align="right"><?php echo round($k3d,2);?></div></td>
<td><div align="right"><?php echo round($k4d,2);?></div></td>
<td><div align="right"><?php echo round($k5d,2);?></div></td>
<td><div align="right"><?php echo round($k6d,2);?></div></td>
<td><div align="right"><?php echo round($k7d,2);?></div></td>
<td><div align="right"><?php echo round($k8d,2);?></div></td>
<td><div align="right"><?php echo round($k9d,2);?></div></td>
<td><div align="right"><?php echo round($k10d,2);?></div></td>
<td><div align="right"><?php echo round($k11d,2);?></div></td>
<td><div align="right"><?php echo round($k12d,2);?></div></td>
<td><div align="right"><?php echo round($k13d,2);?></div></td>
<td><div align="right"><?php echo round($k14d,2);?></div></td>
<td><div align="right"><?php echo round($k15d,2);?></div></td>
<td><div align="right"><?php echo round($k16d,2);?></div></td>
<td><div align="right"><?php echo round($k17d,2);?></div></td>
<td><div align="right"><?php echo round($k18d,2);?></div></td>
<td><div align="right"><?php echo round($k19d,2);?></div></td>
<td><div align="right"><?php echo round($k20d,2);?></div></td>
<td><div align="right"><?php echo round($k21d,2);?></div></td>
<td><div align="right"><?php echo round($k22d,2);?></div></td>
<td><div align="right"><?php echo round($k23d,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<tr bgcolor="#aaaaaa">
<td><div align="center">KE</div></td>
<?php // if ($dk176==$kmin){ $kopt='k5';$koptD=$k1d;if ($k1l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk276==$kmin){ $kopt='k6';$koptD=$k2d;if ($k2l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk376==$kmin){ $kopt='k7';$koptD=$k3d;if ($k3l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk476==$kmin){ $kopt='k8';$koptD=$k4d;if ($k4l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk576==$kmin){ $kopt='k9';$koptD=$k5d;if ($k5l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk676==$kmin){ $kopt='k10';$koptD=$k6d;if ($k6l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk776==$kmin){ $kopt='k11';$koptD=$k7d;if ($k7l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk876==$kmin){ $kopt='k12';$koptD=$k8d; if ($k8l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk976==$kmin){ $kopt='k13';$koptD=$k9d;if ($k9l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1076==$kmin){ $kopt='k14';$koptD=$k10d;if ($k10l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1176==$kmin){ $kopt='k15';$koptD=$k11d;if ($k11l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1276==$kmin){ $kopt='k16';$koptD=$k12d;if ($k12l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1376==$kmin){ $kopt='k17';$koptD=$k13d;if ($k13l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1476==$kmin){ $kopt='k18';$koptD=$k14d;if ($k14l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1576==$kmin){ $kopt='k19';$koptD=$k15d;if ($k15l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1676==$kmin){ $kopt='k20';$koptD=$k16d;if ($k16l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1776==$kmin){ $kopt='k21';$koptD=$k17d;if ($k17l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1876==$kmin){ $kopt='k22';$koptD=$k18d;if ($k18l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk1976==$kmin){ $kopt='k23';$koptD=$k19d;if ($k19l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2076==$kmin){ $kopt='k24';$koptD=$k20d;if ($k20l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2176==$kmin){ $kopt='k25';$koptD=$k21d;if ($k21l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2276==$kmin){ $kopt='k26';$koptD=$k22d;if ($k22l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php if ($dk2376==$kmin){ $kopt='k27';$koptD=$k23d;if ($k23l<16) {$kdi="-";} else {$kdi='+';}}?>
<?php //if ($dk2476==$kmin){ $kopt='k28';$koptD=$k24d;if ($k24l<16) {$kdi="-";} else {$kdi='+';}}?>
<td><div align="right"></td>
<td><div align="right"><?php if ($dk276>4) {?><font color="red"><?php }elseif ($dk276==$kmin){ $kopt='K6';$koptD=$k2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk276,2);?></div></td>
<td><div align="right"><?php if ($dk376>4) {?><font color="red"><?php }elseif ($dk376==$kmin){ $kopt='K7';$koptD=$k3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk376,2);?></div></td>
<td><div align="right"><?php if ($dk476>4) {?><font color="red"><?php }elseif ($dk476==$kmin){ $kopt='K8';$koptD=$k4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk476,2);?></div></td>
<td><div align="right"><?php if ($dk576>4) {?><font color="red"><?php }elseif ($dk576==$kmin){ $kopt='K9';$koptD=$k5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk576,2);?></div></td>
<td><div align="right"><?php if ($dk676>4) {?><font color="red"><?php }elseif ($dk676==$kmin){ $kopt='K10';$koptD=$k6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk676,2);?></div></td>
<td><div align="right"><?php if ($dk776>4) {?><font color="red"><?php }elseif ($dk776==$kmin){ $kopt='K11';$koptD=$k7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk776,2);?></div></td>
<td><div align="right"><?php if ($dk876>4) {?><font color="red"><?php }elseif ($dk876==$kmin){ $kopt='K12';$koptD=$k8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk876,2);?></div></td>
<td><div align="right"><?php if ($dk976>4) {?><font color="red"><?php }elseif ($dk976==$kmin){ $kopt='K13';$koptD=$k9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk976,2);?></div></td>
<td><div align="right"><?php if ($dk1076>4) {?><font color="red"><?php }elseif ($dk1076==$kmin){ $kopt='K14';$koptD=$k10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1076,2);?></div></td>
<td><div align="right"><?php if ($dk1176>4) {?><font color="red"><?php }elseif ($dk1176==$kmin){ $kopt='K15';$koptD=$k11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1176,2);?></div></td>
<td><div align="right"><?php if ($dk1276>4) {?><font color="red"><?php }elseif ($dk1276==$kmin){ $kopt='K16';$koptD=$k12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1276,2);?></div></td>
<td><div align="right"><?php if ($dk1376>4) {?><font color="red"><?php }elseif ($dk1376==$kmin){ $kopt='K17';$koptD=$k13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1376,2);?></div></td>
<td><div align="right"><?php if ($dk1476>4) {?><font color="red"><?php }elseif ($dk1476==$kmin){ $kopt='K18';$koptD=$k14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1476,2);?></div></td>
<td><div align="right"><?php if ($dk1576>4) {?><font color="red"><?php }elseif ($dk1576==$kmin){ $kopt='K19';$koptD=$k15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1576,2);?></div></td>
<td><div align="right"><?php if ($dk1676>4) {?><font color="red"><?php }elseif ($dk1676==$kmin){ $kopt='K20';$koptD=$k16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1676,2);?></div></td>
<td><div align="right"><?php if ($dk1776>4) {?><font color="red"><?php }elseif ($dk1776==$kmin){ $kopt='K21';$koptD=$k17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1776,2);?></div></td>
<td><div align="right"><?php if ($dk1876>4) {?><font color="red"><?php }elseif ($dk1876==$kmin){ $kopt='K22';$koptD=$k18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1876,2);?></div></td>
<td><div align="right"><?php if ($dk1976>4) {?><font color="red"><?php }elseif ($dk1976==$kmin){ $kopt='K23';$koptD=$k19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk1976,2);?></div></td>
<td><div align="right"><?php if ($dk2076>4) {?><font color="red"><?php }elseif ($dk2076==$kmin){ $kopt='K24'; $koptD=$k20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2076,2);?></div></td>
<td><div align="right"><?php if ($dk2176>4) {?><font color="red"><?php }elseif ($dk2176==$kmin){ $kopt='K25';$koptD=$k21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2176,2);?></div></td>
<td><div align="right"><?php if ($dk2276>4) {?><font color="red"><?php }elseif ($dk2276==$kmin){ $kopt='K26';$koptD=$k22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2276,2);?></div></td>
<td><div align="right"><?php if ($dk2376>4) {?><font color="red"><?php }elseif ($dk2376==$kmin){ $kopt='K27';$koptD=$k23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dk2376,2);?></div></td>
<td><div align="right"></td>
</tr>
<?php ////C sect
$dc176=de76($cl,$ca,$cb,$c1l,$c1a,$c1b);
$dc276=de76($cl,$ca,$cb,$c2l,$c2a,$c2b);
$dc376=de76($cl,$ca,$cb,$c3l,$c3a,$c3b);
$dc476=de76($cl,$ca,$cb,$c4l,$c4a,$c4b);
$dc576=de76($cl,$ca,$cb,$c5l,$c5a,$c5b);
$dc676=de76($cl,$ca,$cb,$c6l,$c6a,$c6b);
$dc776=de76($cl,$ca,$cb,$c7l,$c7a,$c7b);
$dc976=de76($cl,$ca,$cb,$c9l,$c9a,$c9b);
$dc876=($dc776+$dc976)/2;
$dc1176=de76($cl,$ca,$cb,$c11l,$c11a,$c11b);
$dc1076=de76($cl,$ca,$cb,$c10l,$c10a,$c10b);
$dc1276=de76($cl,$ca,$cb,$c12l,$c12a,$c12b);
$dc1376=de76($cl,$ca,$cb,$c13l,$c13a,$c13b);
$dc1476=de76($cl,$ca,$cb,$c14l,$c14a,$c14b);
$dc1576=de76($cl,$ca,$cb,$c15l,$c15a,$c15b);
$dc1676=de76($cl,$ca,$cb,$c16l,$c16a,$c16b);
$dc1876=de76($cl,$ca,$cb,$c18l,$c18a,$c18b);
$dc1776=($dc1676+$dc1876)/2;
$dc1976=de76($cl,$ca,$cb,$c19l,$c19a,$c19b);
$dc2076=de76($cl,$ca,$cb,$c20l,$c20a,$c20b);
$dc2176=de76($cl,$ca,$cb,$c21l,$c21a,$c21b);
$dc2276=de76($cl,$ca,$cb,$c22l,$c22a,$c22b);
$dc2376=de76($cl,$ca,$cb,$c23l,$c23a,$c23b);
$dc2476=de76($cl,$ca,$cb,$c24l,$c24a,$c24b);
$cmin=min($dc176,$dc276,$dc376,$dc476,$dc576,$dc676,$dc776,$dc876,$dc976,$dc1076,$dc1176,$dc1276,$dc1376,$dc1476,$dc1576,$dc1676,$dc1776,$dc1876,$dc1976,$dc2076,$dc2176,$dc2276,$dc2376,$dc2476);
$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($c1d,2);?></div></td>
<td><div align="right"><?php echo round($c2d,2);?></div></td>
<td><div align="right"><?php echo round($c3d,2);?></div></td>
<td><div align="right"><?php echo round($c4d,2);?></div></td>
<td><div align="right"><?php echo round($c5d,2);?></div></td>
<td><div align="right"><?php echo round($c6d,2);?></div></td>
<td><div align="right"><?php echo round($c7d,2);?></div></td>
<td><div align="right"><?php echo round($c8d,2);?></div></td>
<td><div align="right"><?php echo round($c9d,2);?></div></td>
<td><div align="right"><?php echo round($c10d,2);?></div></td>
<td><div align="right"><?php echo round($c11d,2);?></div></td>
<td><div align="right"><?php echo round($c12d,2);?></div></td>
<td><div align="right"><?php echo round($c13d,2);?></div></td>
<td><div align="right"><?php echo round($c14d,2);?></div></td>
<td><div align="right"><?php echo round($c15d,2);?></div></td>
<td><div align="right"><?php echo round($c16d,2);?></div></td>
<td><div align="right"><?php echo round($c17d,2);?></div></td>
<td><div align="right"><?php echo round($c18d,2);?></div></td>
<td><div align="right"><?php echo round($c19d,2);?></div></td>
<td><div align="right"><?php echo round($c20d,2);?></div></td>
<td><div align="right"><?php echo round($c21d,2);?></div></td>
<td><div align="right"><?php echo round($c22d,2);?></div></td>
<td><div align="right"><?php echo round($c23d,2);?></div></td>
<td><div align="right"><?php echo round($c24d,2);?></div></td>
</tr>
<tr bgcolor="#b1e5ff">
<td><div align="center">cE</div></td>
<?php if ($dc176==$cmin){ $copt='C5';$coptD=$c1d;if ($c1b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc276==$cmin){ $copt='C6';$coptD=$c2d;if ($c2b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc376==$cmin){ $copt='C7';$coptD=$c3d;if ($c3b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc476==$cmin){ $copt='C8';$coptD=$c4d;if ($c4b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc576==$cmin){ $copt='C9';$coptD=$c5d;if ($c5b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc676==$cmin){ $copt='C10';$coptD=$c6d;if ($c6b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc776==$cmin){ $copt='C11';$coptD=$c7d;if ($c7b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc876==$cmin){ $copt='C12';$coptD=$c8d; if ($c8b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc976==$cmin){ $copt='C13';$coptD=$c9d;if ($c9b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1076==$cmin){ $copt='C14';$coptD=$c10d;if ($c10b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1176==$cmin){ $copt='C15';$coptD=$c11d;if ($c11b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1276==$cmin){ $copt='C16';$coptD=$c12d;if ($c12b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1376==$cmin){ $copt='C17';$coptD=$c13d;if ($c13b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1476==$cmin){ $copt='C18';$coptD=$c14d;if ($c14b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1576==$cmin){ $copt='C19';$coptD=$c15d;if ($c15b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1676==$cmin){ $copt='C20';$coptD=$c16d;if ($c16b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1776==$cmin){ $copt='C21';$coptD=$c17d;if ($c17b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1876==$cmin){ $copt='C22';$coptD=$c18d;if ($c18b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc1976==$cmin){ $copt='C23';$coptD=$c19d;if ($c19b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2076==$cmin){ $copt='C24';$coptD=$c20d;if ($c20b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2176==$cmin){ $copt='C25';$coptD=$c21d;if ($c21b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2276==$cmin){ $copt='C26';$coptD=$c22d;if ($c22b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2376==$cmin){ $copt='C27';$coptD=$c23d;if ($c23b<-50) {$cdi="-";} else {$cdi='+';}}?>
<?php if ($dc2476==$cmin){ $copt='C28';$coptD=$c24d;if ($c24b<-50) {$cdi="-";} else {$cdi='+';}}?>
<td><div align="right"><?php if ($dc176>4) {?><font color="red"><?php }elseif ($dc176==$cmin){ $copt='C5';$coptD=$c1d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc176,2);?></div></td>
<td><div align="right"><?php if ($dc276>4) {?><font color="red"><?php }elseif ($dc276==$cmin){ $copt='C6';$coptD=$c2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc276,2);?></div></td>
<td><div align="right"><?php if ($dc376>4) {?><font color="red"><?php }elseif ($dc376==$cmin){ $copt='C7';$coptD=$c3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc376,2);?></div></td>
<td><div align="right"><?php if ($dc476>4) {?><font color="red"><?php }elseif ($dc476==$cmin){ $copt='C8';$coptD=$c4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc476,2);?></div></td>
<td><div align="right"><?php if ($dc576>4) {?><font color="red"><?php }elseif ($dc576==$cmin){ $copt='C9';$coptD=$c5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc576,2);?></div></td>
<td><div align="right"><?php if ($dc676>4) {?><font color="red"><?php }elseif ($dc676==$cmin){ $copt='C10';$coptD=$c6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc676,2);?></div></td>
<td><div align="right"><?php if ($dc776>4) {?><font color="red"><?php }elseif ($dc776==$cmin){ $copt='C11';$coptD=$c7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc776,2);?></div></td>
<td><div align="right"><?php if ($dc876>4) {?><font color="red"><?php }elseif ($dc876==$cmin){ $copt='C12';$coptD=$c8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc876,2);?></div></td>
<td><div align="right"><?php if ($dc976>4) {?><font color="red"><?php }elseif ($dc976==$cmin){ $copt='C13';$coptD=$c9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc976,2);?></div></td>
<td><div align="right"><?php if ($dc1076>4) {?><font color="red"><?php }elseif ($dc1076==$cmin){ $copt='C14';$coptD=$c10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1076,2);?></div></td>
<td><div align="right"><?php if ($dc1176>4) {?><font color="red"><?php }elseif ($dc1176==$cmin){ $copt='C15';$coptD=$c11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1176,2);?></div></td>
<td><div align="right"><?php if ($dc1276>4) {?><font color="red"><?php }elseif ($dc1276==$cmin){ $copt='C16';$coptD=$c12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1276,2);?></div></td>
<td><div align="right"><?php if ($dc1376>4) {?><font color="red"><?php }elseif ($dc1376==$cmin){ $copt='C17';$coptD=$c13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1376,2);?></div></td>
<td><div align="right"><?php if ($dc1476>4) {?><font color="red"><?php }elseif ($dc1476==$cmin){ $copt='C18';$coptD=$c14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1476,2);?></div></td>
<td><div align="right"><?php if ($dc1576>4) {?><font color="red"><?php }elseif ($dc1576==$cmin){ $copt='C19';$coptD=$c15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1576,2);?></div></td>
<td><div align="right"><?php if ($dc1676>4) {?><font color="red"><?php }elseif ($dc1676==$cmin){ $copt='C20';$coptD=$c16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1676,2);?></div></td>
<td><div align="right"><?php if ($dc1776>4) {?><font color="red"><?php }elseif ($dc1776==$cmin){ $copt='C21';$coptD=$c17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1776,2);?></div></td>
<td><div align="right"><?php if ($dc1876>4) {?><font color="red"><?php }elseif ($dc1876==$cmin){ $copt='C22';$coptD=$c18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1876,2);?></div></td>
<td><div align="right"><?php if ($dc1976>4) {?><font color="red"><?php }elseif ($dc1976==$cmin){ $copt='C23';$coptD=$c19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc1976,2);?></div></td>
<td><div align="right"><?php if ($dc2076>4) {?><font color="red"><?php }elseif ($dc2076==$cmin){ $copt='C24';$coptD=$c20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2076,2);?></div></td>
<td><div align="right"><?php if ($dc2176>4) {?><font color="red"><?php }elseif ($dc2176==$cmin){ $copt='C25';$coptD=$c21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2176,2);?></div></td>
<td><div align="right"><?php if ($dc2276>4) {?><font color="red"><?php }elseif ($dc2276==$cmin){ $copt='C26';$coptD=$c22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2276,2);?></div></td>
<td><div align="right"><?php if ($dc2376>4) {?><font color="red"><?php }elseif ($dc2376==$cmin){ $copt='C27';$coptD=$c23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2376,2);?></div></td>
<td><div align="right"><?php if ($dc2476>4) {?><font color="red"><?php }elseif ($dc2476==$cmin){ $copt='C28';$coptD=$c24d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dc2476,2);?></div></td>
</tr>
<?php ////m sect
$dm176=de76($ml,$ma,$mb,$m1l,$m1a,$m1b);
$dm276=de76($ml,$ma,$mb,$m2l,$m2a,$m2b);
$dm376=de76($ml,$ma,$mb,$m3l,$m3a,$m3b);
$dm476=de76($ml,$ma,$mb,$m4l,$m4a,$m4b);
$dm576=de76($ml,$ma,$mb,$m5l,$m5a,$m5b);
$dm676=de76($ml,$ma,$mb,$m6l,$m6a,$m6b);
$dm776=de76($ml,$ma,$mb,$m7l,$m7a,$m7b);
$dm976=de76($ml,$ma,$mb,$m9l,$m9a,$m9b);
$dm876=($dm776+$dm976)/2;
$dm1076=de76($ml,$ma,$mb,$m10l,$m10a,$m10b);
$dm1176=de76($ml,$ma,$mb,$m11l,$m11a,$m11b);
$dm1276=de76($ml,$ma,$mb,$m12l,$m12a,$m12b);
$dm1376=de76($ml,$ma,$mb,$m13l,$m13a,$m13b);
$dm1476=de76($ml,$ma,$mb,$m14l,$m14a,$m14b);
$dm1576=de76($ml,$ma,$mb,$m15l,$m15a,$m15b);
$dm1676=de76($ml,$ma,$mb,$m16l,$m16a,$m16b);
$dm1876=de76($ml,$ma,$mb,$m18l,$m18a,$m18b);
$dm1776=($dm1676+$dm1876)/2;
$dm1976=de76($ml,$ma,$mb,$m19l,$m19a,$m19b);
$dm2076=de76($ml,$ma,$mb,$m20l,$m20a,$m20b);
$dm2176=de76($ml,$ma,$mb,$m21l,$m21a,$m21b);
$dm2276=de76($ml,$ma,$mb,$m22l,$m22a,$m22b);
$dm2376=de76($ml,$ma,$mb,$m23l,$m23a,$m23b);
$dm2476=de76($ml,$ma,$mb,$m24l,$m24a,$m24b);
$mmin=min($dm176,$dm276,$dm376,$dm476,$dm576,$dm676,$dm776,$dm876,$dm976,$dm1076,$dm1176,$dm1276,$dm1376,$dm1476,$dm1576,$dm1676,$dm1776,$dm1876,$dm1976,$dm2076,$dm2176,$dm2276,$dm2376,$dm2476);
$dm194=de94($ml,$ma,$mb,$m1l,$m1a,$m1b);
?>
<tr bgcolor="#e9bed7">
<td><div align="menter">mD</div></td>
<td><div align="right"><?php echo round($m1d,2);?></div></td>
<td><div align="right"><?php echo round($m2d,2);?></div></td>
<td><div align="right"><?php echo round($m3d,2);?></div></td>
<td><div align="right"><?php echo round($m4d,2);?></div></td>
<td><div align="right"><?php echo round($m5d,2);?></div></td>
<td><div align="right"><?php echo round($m6d,2);?></div></td>
<td><div align="right"><?php echo round($m7d,2);?></div></td>
<td><div align="right"><?php echo round($m8d,2);?></div></td>
<td><div align="right"><?php echo round($m9d,2);?></div></td>
<td><div align="right"><?php echo round($m10d,2);?></div></td>
<td><div align="right"><?php echo round($m11d,2);?></div></td>
<td><div align="right"><?php echo round($m12d,2);?></div></td>
<td><div align="right"><?php echo round($m13d,2);?></div></td>
<td><div align="right"><?php echo round($m14d,2);?></div></td>
<td><div align="right"><?php echo round($m15d,2);?></div></td>
<td><div align="right"><?php echo round($m16d,2);?></div></td>
<td><div align="right"><?php echo round($m17d,2);?></div></td>
<td><div align="right"><?php echo round($m18d,2);?></div></td>
<td><div align="right"><?php echo round($m19d,2);?></div></td>
<td><div align="right"><?php echo round($m20d,2);?></div></td>
<td><div align="right"><?php echo round($m21d,2);?></div></td>
<td><div align="right"><?php echo round($m22d,2);?></div></td>
<td><div align="right"><?php echo round($m23d,2);?></div></td>
<td><div align="right"><?php echo round($m24d,2);?></div></td>
</tr>
<tr bgcolor="#e9bed7">
<td><div align="center">mE</div></td>
<?php if ($dm176==$mmin){ $mopt='m5';$moptD=$m1d;if ($m1a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm276==$mmin){ $mopt='m6';$moptD=$m2d;if ($m2a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm376==$mmin){ $mopt='m7';$moptD=$m3d;if ($m3a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm476==$mmin){ $mopt='m8';$moptD=$m4d;if ($m4a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm576==$mmin){ $mopt='m9';$moptD=$m5d;if ($m5a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm676==$mmin){ $mopt='m10';$moptD=$m6d;if ($m6a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm776==$mmin){ $mopt='m11';$moptD=$m7d;if ($m7a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm876==$mmin){ $mopt='m12';$moptD=$m8d; if ($m8a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm976==$mmin){ $mopt='m13';$moptD=$m9d;if ($m9a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1076==$mmin){ $mopt='m14';$moptD=$m10d;if ($m10a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1176==$mmin){ $mopt='m15';$moptD=$m11d;if ($m11a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1276==$mmin){ $mopt='m16';$moptD=$m12d;if ($m12a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1376==$mmin){ $mopt='m17';$moptD=$m13d;if ($m13a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1476==$mmin){ $mopt='m18';$moptD=$m14d;if ($m14a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1576==$mmin){ $mopt='m19';$moptD=$m15d;if ($m15a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1676==$mmin){ $mopt='m20';$moptD=$m16d;if ($m16a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1776==$mmin){ $mopt='m21';$moptD=$m17d;if ($m17a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1876==$mmin){ $mopt='m22';$moptD=$m18d;if ($m18a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm1976==$mmin){ $mopt='m23';$moptD=$m19d;if ($m19a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2076==$mmin){ $mopt='m24';$moptD=$m20d;if ($m20a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2176==$mmin){ $mopt='m25';$moptD=$m21d;if ($m21a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2276==$mmin){ $mopt='m26';$moptD=$m22d;if ($m22a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2376==$mmin){ $mopt='m27';$moptD=$m23d;if ($m23a>74) {$mdi="-";} else {$mdi='+';}}?>
<?php if ($dm2476==$mmin){ $mopt='m28';$moptD=$m24d;if ($m24a>74) {$mdi="-";} else {$mdi='+';}}?>
<td><div align="right"><?php if ($dm176>4) {?><font color="red"><?php }elseif ($dm176==$mmin){ $mopt='M5';$moptD=$m1d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm176,2);?></div></td>
<td><div align="right"><?php if ($dm276>4) {?><font color="red"><?php }elseif ($dm276==$mmin){ $mopt='M6';$moptD=$m2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm276,2);?></div></td>
<td><div align="right"><?php if ($dm376>4) {?><font color="red"><?php }elseif ($dm376==$mmin){ $mopt='M7';$moptD=$m3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm376,2);?></div></td>
<td><div align="right"><?php if ($dm476>4) {?><font color="red"><?php }elseif ($dm476==$mmin){ $mopt='M8';$moptD=$m4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm476,2);?></div></td>
<td><div align="right"><?php if ($dm576>4) {?><font color="red"><?php }elseif ($dm576==$mmin){ $mopt='M9';$moptD=$m5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm576,2);?></div></td>
<td><div align="right"><?php if ($dm676>4) {?><font color="red"><?php }elseif ($dm676==$mmin){ $mopt='M10';$moptD=$m6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm676,2);?></div></td>
<td><div align="right"><?php if ($dm776>4) {?><font color="red"><?php }elseif ($dm776==$mmin){ $mopt='M11';$moptD=$m7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm776,2);?></div></td>
<td><div align="right"><?php if ($dm876>4) {?><font color="red"><?php }elseif ($dm876==$mmin){ $mopt='M12';$moptD=$m8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm876,2);?></div></td>
<td><div align="right"><?php if ($dm976>4) {?><font color="red"><?php }elseif ($dm976==$mmin){ $mopt='M13';$moptD=$m9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm976,2);?></div></td>
<td><div align="right"><?php if ($dm1076>4) {?><font color="red"><?php }elseif ($dm1076==$mmin){ $mopt='M14';$moptD=$m10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1076,2);?></div></td>
<td><div align="right"><?php if ($dm1176>4) {?><font color="red"><?php }elseif ($dm1176==$mmin){ $mopt='M15';$moptD=$m11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1176,2);?></div></td>
<td><div align="right"><?php if ($dm1276>4) {?><font color="red"><?php }elseif ($dm1276==$mmin){ $mopt='M16';$moptD=$m12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1276,2);?></div></td>
<td><div align="right"><?php if ($dm1376>4) {?><font color="red"><?php }elseif ($dm1376==$mmin){ $mopt='M17';$moptD=$m13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1376,2);?></div></td>
<td><div align="right"><?php if ($dm1476>4) {?><font color="red"><?php }elseif ($dm1476==$mmin){ $mopt='M18';$moptD=$m14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1476,2);?></div></td>
<td><div align="right"><?php if ($dm1576>4) {?><font color="red"><?php }elseif ($dm1576==$mmin){ $mopt='M19';$moptD=$m15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1576,2);?></div></td>
<td><div align="right"><?php if ($dm1676>4) {?><font color="red"><?php }elseif ($dm1676==$mmin){ $mopt='M20';$moptD=$m16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1676,2);?></div></td>
<td><div align="right"><?php if ($dm1776>4) {?><font color="red"><?php }elseif ($dm1776==$mmin){ $mopt='M21';$moptD=$m17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1776,2);?></div></td>
<td><div align="right"><?php if ($dm1876>4) {?><font color="red"><?php }elseif ($dm1876==$mmin){ $mopt='M22';$moptD=$m18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1876,2);?></div></td>
<td><div align="right"><?php if ($dm1976>4) {?><font color="red"><?php }elseif ($dm1976==$mmin){ $mopt='M23';$moptD=$m19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm1976,2);?></div></td>
<td><div align="right"><?php if ($dm2076>4) {?><font color="red"><?php }elseif ($dm2076==$mmin){ $mopt='M24';$moptD=$m20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2076,2);?></div></td>
<td><div align="right"><?php if ($dm2176>4) {?><font color="red"><?php }elseif ($dm2176==$mmin){ $mopt='M25';$moptD=$m21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2176,2);?></div></td>
<td><div align="right"><?php if ($dm2276>4) {?><font color="red"><?php }elseif ($dm2276==$mmin){ $mopt='M26';$moptD=$m22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2276,2);?></div></td>
<td><div align="right"><?php if ($dm2376>4) {?><font color="red"><?php }elseif ($dm2376==$mmin){ $mopt='M27';$moptD=$m23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2376,2);?></div></td>
<td><div align="right"><?php if ($dm2476>4) {?><font color="red"><?php }elseif ($dm2476==$mmin){ $mopt='M28';$moptD=$m24d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dm2476,2);?></div></td>
</tr>
<?php ////y sect
//$dy176=de76($yl,$ya,$yb,$y1l,$y1a,$y1b);
$dy276=de76($yl,$ya,$yb,$y2l,$y2a,$y2b);
$dy376=de76($yl,$ya,$yb,$y3l,$y3a,$y3b);
$dy476=de76($yl,$ya,$yb,$y4l,$y4a,$y4b);
$dy576=de76($yl,$ya,$yb,$y5l,$y5a,$y5b);
$dy676=de76($yl,$ya,$yb,$y6l,$y6a,$y6b);
$dy976=de76($yl,$ya,$yb,$y9l,$y9a,$y9b);
$dy776=de76($yl,$ya,$yb,$y7l,$y7a,$y7b);
$dy876=($dy776+$dy976)/2;
$dy1076=de76($yl,$ya,$yb,$y10l,$y10a,$y10b);
$dy1176=de76($yl,$ya,$yb,$y11l,$y11a,$y11b);
$dy1276=de76($yl,$ya,$yb,$y12l,$y12a,$y12b);
$dy1376=de76($yl,$ya,$yb,$y13l,$y13a,$y13b);
$dy1476=de76($yl,$ya,$yb,$y14l,$y14a,$y14b);
$dy1576=de76($yl,$ya,$yb,$y15l,$y15a,$y15b);
$dy1676=de76($yl,$ya,$yb,$y16l,$y16a,$y16b);
$dy1876=de76($yl,$ya,$yb,$y18l,$y18a,$y18b);
$dy1776=($dy1676+$dy1876)/2;
$dy1976=de76($yl,$ya,$yb,$y19l,$y19a,$y19b);
$dy2076=de76($yl,$ya,$yb,$y20l,$y20a,$y20b);
$dy2176=de76($yl,$ya,$yb,$y21l,$y21a,$y21b);
$dy2276=de76($yl,$ya,$yb,$y22l,$y22a,$y22b);
$dy2376=de76($yl,$ya,$yb,$y23l,$y23a,$y23b);
//$dy2776=de76($yl,$ya,$yb,$y27l,$y27a,$y27b);
$ymin=min($dy276,$dy376,$dy476,$dy576,$dy676,$dy776,$dy876,$dy976,$dy1076,$dy1176,$dy1276,$dy1376,$dy1476,$dy1576,$dy1676,$dy1776,$dy1876,$dy1976,$dy2076,$dy2176,$dy2276,$dy2376);
$dy194=de94($yl,$ya,$yb,$y1l,$y1a,$y1b);
?>
<tr bgcolor="#f2ebc0">
<td><div align="menter">YD</div></td>
<td><div align="right"></div></td>
<td><div align="right"><?php echo round($y2d,2);?></div></td>
<td><div align="right"><?php echo round($y3d,2);?></div></td>
<td><div align="right"><?php echo round($y4d,2);?></div></td>
<td><div align="right"><?php echo round($y5d,2);?></div></td>
<td><div align="right"><?php echo round($y6d,2);?></div></td>
<td><div align="right"><?php echo round($y7d,2);?></div></td>
<td><div align="right"><?php echo round($y8d,2);?></div></td>
<td><div align="right"><?php echo round($y9d,2);?></div></td>
<td><div align="right"><?php echo round($y10d,2);?></div></td>
<td><div align="right"><?php echo round($y11d,2);?></div></td>
<td><div align="right"><?php echo round($y12d,2);?></div></td>
<td><div align="right"><?php echo round($y13d,2);?></div></td>
<td><div align="right"><?php echo round($y14d,2);?></div></td>
<td><div align="right"><?php echo round($y15d,2);?></div></td>
<td><div align="right"><?php echo round($y16d,2);?></div></td>
<td><div align="right"><?php echo round($y17d,2);?></div></td>
<td><div align="right"><?php echo round($y18d,2);?></div></td>
<td><div align="right"><?php echo round($y19d,2);?></div></td>
<td><div align="right"><?php echo round($y20d,2);?></div></td>
<td><div align="right"><?php echo round($y21d,2);?></div></td>
<td><div align="right"><?php echo round($y22d,2);?></div></td>
<td><div align="right"><?php echo round($y23d,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<tr bgcolor="#f2ebc0">
<td><div align="center">YE</div></td>
<?php // if ($dy176==$ymin){ $yopt='y1';$yoptD=$y1d;if ($y1b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy276==$ymin){ $yopt='y6';$yoptD=$y2d;if ($y2b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy376==$ymin){ $yopt='y7';$yoptD=$y3d;if ($y3b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy476==$ymin){ $yopt='y8';$yoptD=$y4d;if ($y4b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy576==$ymin){ $yopt='y9';$yoptD=$y5d;if ($y5b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy676==$ymin){ $yopt='y10';$yoptD=$y6d;if ($y6b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy776==$ymin){ $yopt='y11';$yoptD=$y7d;if ($y7b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy876==$ymin){ $yopt='y12';$yoptD=$y8d; if ($y8b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy976==$ymin){ $yopt='y13';$yoptD=$y9d;if ($y9b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1076==$ymin){ $yopt='y14';$yoptD=$y10d;if ($y10b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1176==$ymin){ $yopt='y15';$yoptD=$y11d;if ($y11b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1276==$ymin){ $yopt='y16';$yoptD=$y12d;if ($y12b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1376==$ymin){ $yopt='y17';$yoptD=$y13d;if ($y13b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1476==$ymin){ $yopt='y18';$yoptD=$y14d;if ($y14b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1576==$ymin){ $yopt='y19';$yoptD=$y15d;if ($y15b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1676==$ymin){ $yopt='y20';$yoptD=$y16d;if ($y16b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1776==$ymin){ $yopt='y21';$yoptD=$y17d;if ($y17b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1876==$ymin){ $yopt='y22';$yoptD=$y18d;if ($y18b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy1976==$ymin){ $yopt='y23';$yoptD=$y19d;if ($y19b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2076==$ymin){ $yopt='y24';$yoptD=$y20d;if ($y20b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2176==$ymin){ $yopt='y25';$yoptD=$y21d;if ($y21b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2276==$ymin){ $yopt='y26';$yoptD=$y22d;if ($y22b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php if ($dy2376==$ymin){ $yopt='y27';$yoptD=$y23d;if ($y23b>93) {$ydi="-";} else {$ydi='+';}}?>
<?php // if ($dy2776==$ymin){ $yopt='y27';$yoptD=$y27d;if ($y27b>93) {$ydi="-";} else {$ydi='+';}}?>
<td><div align="right"></div></td>
<td><div align="right"><?php if ($dy276>4) {?><font color="red"><?php }elseif ($dy276==$ymin) { $yopt='Y6';$yoptD=$y2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy276,2);?></div></td>
<td><div align="right"><?php if ($dy376>4) {?><font color="red"><?php }elseif ($dy376==$ymin){ $yopt='Y7';$yoptD=$y3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy376,2);?></div></td>
<td><div align="right"><?php if ($dy476>4) {?><font color="red"><?php }elseif ($dy476==$ymin){$yopt='Y8';$yoptD=$y4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy476,2);?></div></td>
<td><div align="right"><?php if ($dy576>4) {?><font color="red"><?php }elseif ($dy576==$ymin){ $yopt='Y9';$yoptD=$y5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy576,2);?></div></td>
<td><div align="right"><?php if ($dy676>4) {?><font color="red"><?php }elseif ($dy676==$ymin){ $yopt='Y10';$yoptD=$y6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy676,2);?></div></td>
<td><div align="right"><?php if ($dy776>4) {?><font color="red"><?php }elseif ($dy776==$ymin){ $yopt='Y11';$yoptD=$y7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy776,2);?></div></td>
<td><div align="right"><?php if ($dy876>4) {?><font color="red"><?php }elseif ($dy876==$ymin){ $yopt='Y12';$yoptD=$y8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy876,2);?></div></td>
<td><div align="right"><?php if ($dy976>4) {?><font color="red"><?php }elseif ($dy976==$ymin){$yopt='Y13';$yoptD=$y9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy976,2);?></div></td>
<td><div align="right"><?php if ($dy1076>4) {?><font color="red"><?php }elseif ($dy1076==$ymin){ $yopt='Y14';$yoptD=$y10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1076,2);?></div></td>
<td><div align="right"><?php if ($dy1176>4) {?><font color="red"><?php }elseif ($dy1176==$ymin){ $yopt='Y15';$yoptD=$y11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1176,2);?></div></td>
<td><div align="right"><?php if ($dy1276>4) {?><font color="red"><?php }elseif ($dy1276==$ymin){ $yopt='Y16';$yoptD=$y12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1276,2);?></div></td>
<td><div align="right"><?php if ($dy1376>4) {?><font color="red"><?php }elseif ($dy1376==$ymin){ $yopt='Y17';$yoptD=$y13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1376,2);?></div></td>
<td><div align="right"><?php if ($dy1476>4) {?><font color="red"><?php }elseif ($dy1476==$ymin){ $yopt='Y18';$yoptD=$y14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1476,2);?></div></td>
<td><div align="right"><?php if ($dy1576>4) {?><font color="red"><?php }elseif ($dy1576==$ymin){ $yopt='Y19';$yoptD=$y15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1576,2);?></div></td>
<td><div align="right"><?php if ($dy1676>4) {?><font color="red"><?php }elseif ($dy1676==$ymin){ $yopt='Y20';$yoptD=$y16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1676,2);?></div></td>
<td><div align="right"><?php if ($dy1776>4) {?><font color="red"><?php }elseif ($dy1776==$ymin){ $yopt='Y21';$yoptD=$y17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1776,2);?></div></td>
<td><div align="right"><?php if ($dy1876>4) {?><font color="red"><?php }elseif ($dy1876==$ymin){ $yopt='Y22';$yoptD=$y18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1876,2);?></div></td>
<td><div align="right"><?php if ($dy1976>4) {?><font color="red"><?php }elseif ($dy1976==$ymin){ $yopt='Y23';$yoptD=$y19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy1976,2);?></div></td>
<td><div align="right"><?php if ($dy2076>4) {?><font color="red"><?php }elseif ($dy2076==$ymin){ $yopt='Y24';$yoptD=$y20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2076,2);?></div></td>
<td><div align="right"><?php if ($dy2176>4) {?><font color="red"><?php }elseif ($dy2176==$ymin){ $yopt='Y25';$yoptD=$y21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2176,2);?></div></td>
<td><div align="right"><?php if ($dy2276>4) {?><font color="red"><?php }elseif ($dy2276==$ymin){ $yopt='Y26';$yoptD=$y22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2276,2);?></div></td>
<td><div align="right"><?php if ($dy2376>4) {?><font color="red"><?php }elseif ($dy2376==$ymin){ $yopt='Y27';$yoptD=$y23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($dy2376,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<?php ////S sect
//$dy176=de76($yl,$ya,$yb,$y1l,$y1a,$y1b);
$ds276=de76($sl,$sa,$sb,$s2l,$s2a,$s2b);
$ds376=de76($sl,$sa,$sb,$s3l,$s3a,$s3b);
$ds476=de76($sl,$sa,$sb,$s4l,$s4a,$s4b);
$ds576=de76($sl,$sa,$sb,$s5l,$s5a,$s5b);
$ds676=de76($sl,$sa,$sb,$s6l,$s6a,$s6b);
$ds976=de76($sl,$sa,$sb,$s9l,$s9a,$s9b);
$ds776=de76($sl,$sa,$sb,$s7l,$s7a,$s7b);
$ds876=($ds776+$ds976)/2;
$ds1076=de76($sl,$sa,$sb,$s10l,$s10a,$s10b);
$ds1176=de76($sl,$sa,$sb,$s11l,$s11a,$s11b);
$ds1276=de76($sl,$sa,$sb,$s12l,$s12a,$s12b);
$ds1376=de76($sl,$sa,$sb,$s13l,$s13a,$s13b);
$ds1476=de76($sl,$sa,$sb,$s14l,$s14a,$s14b);
$ds1576=de76($sl,$sa,$sb,$s15l,$s15a,$s15b);
$ds1676=de76($sl,$sa,$sb,$s16l,$s16a,$s16b);
$ds1876=de76($sl,$sa,$sb,$s18l,$s18a,$s18b);
$ds1776=($ds1676+$ds1876)/2;
$ds1976=de76($sl,$sa,$sb,$s19l,$s19a,$s19b);
$ds2076=de76($sl,$sa,$sb,$s20l,$s20a,$s20b);
$ds2176=de76($sl,$sa,$sb,$s21l,$s21a,$s21b);
$ds2276=de76($sl,$sa,$sb,$s22l,$s22a,$s22b);
$ds2376=de76($sl,$sa,$sb,$s23l,$s23a,$s23b);
//$ds2776=de76($sl,$sa,$sb,$s27l,$s27a,$s27b);
$smin=min($ds276,$ds376,$ds476,$ds576,$ds676,$ds776,$ds876,$ds976,$ds1076,$ds1176,$ds1276,$ds1376,$ds1476,$ds1576,$ds1676,$ds1776,$ds1876,$ds1976,$ds2076,$ds2176,$ds2276,$ds2376);
$ds194=de94($sl,$sa,$sb,$s1l,$s1a,$s1b);
?>
<tr bgcolor="#daffc2">
<td><div align="menter">SD</div></td>
<td><div align="right"></div></td>
<td><div align="right"><?php echo round($s2d,2);?></div></td>
<td><div align="right"><?php echo round($s3d,2);?></div></td>
<td><div align="right"><?php echo round($s4d,2);?></div></td>
<td><div align="right"><?php echo round($s5d,2);?></div></td>
<td><div align="right"><?php echo round($s6d,2);?></div></td>
<td><div align="right"><?php echo round($s7d,2);?></div></td>
<td><div align="right"><?php echo round($s8d,2);?></div></td>
<td><div align="right"><?php echo round($s9d,2);?></div></td>
<td><div align="right"><?php echo round($s10d,2);?></div></td>
<td><div align="right"><?php echo round($s11d,2);?></div></td>
<td><div align="right"><?php echo round($s12d,2);?></div></td>
<td><div align="right"><?php echo round($s13d,2);?></div></td>
<td><div align="right"><?php echo round($s14d,2);?></div></td>
<td><div align="right"><?php echo round($s15d,2);?></div></td>
<td><div align="right"><?php echo round($s16d,2);?></div></td>
<td><div align="right"><?php echo round($s17d,2);?></div></td>
<td><div align="right"><?php echo round($s18d,2);?></div></td>
<td><div align="right"><?php echo round($s19d,2);?></div></td>
<td><div align="right"><?php echo round($s20d,2);?></div></td>
<td><div align="right"><?php echo round($s21d,2);?></div></td>
<td><div align="right"><?php echo round($s22d,2);?></div></td>
<td><div align="right"><?php echo round($s23d,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<tr bgcolor="#daffc2">
<td><div align="center">YE</div></td>
<?php // if ($ds176==$smin){ $sopt='s1';$soptD=$s1d;if ($s1b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds276==$smin){ $sopt='s5';$soptD=$s2d;if ($s2b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds376==$smin){ $sopt='s7';$soptD=$s3d;if ($s3b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds476==$smin){ $sopt='s8';$soptD=$s4d;if ($s4b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds576==$smin){ $sopt='s9';$soptD=$s5d;if ($s5b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds676==$smin){ $sopt='s10';$soptD=$s6d;if ($s6b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds776==$smin){ $sopt='s11';$soptD=$s7d;if ($s7b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds876==$smin){ $sopt='s12';$soptD=$s8d; if ($s8b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds976==$smin){ $sopt='s13';$soptD=$s9d;if ($s9b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1076==$smin){ $sopt='s14';$soptD=$s10d;if ($s10b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1176==$smin){ $sopt='s15';$soptD=$s11d;if ($s11b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1276==$smin){ $sopt='s16';$soptD=$s12d;if ($s12b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1376==$smin){ $sopt='s17';$soptD=$s13d;if ($s13b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1476==$smin){ $sopt='s18';$soptD=$s14d;if ($s14b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1576==$smin){ $sopt='s19';$soptD=$s15d;if ($s15b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1676==$smin){ $sopt='s20';$soptD=$s16d;if ($s16b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1776==$smin){ $sopt='s21';$soptD=$s17d;if ($s17b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1876==$smin){ $sopt='s22';$soptD=$s18d;if ($s18b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds1976==$smin){ $sopt='s23';$soptD=$s19d;if ($s19b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds2076==$smin){ $sopt='s24';$soptD=$s20d;if ($s20b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds2176==$smin){ $sopt='s25';$soptD=$s21d;if ($s21b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds2276==$smin){ $sopt='s26';$soptD=$s22d;if ($s22b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php if ($ds2376==$smin){ $sopt='s27';$soptD=$s23d;if ($s23b>93) {$sdi="-";} else {$sdi='+';}}?>
<?php // if ($ds2776==$smin){ $sopt='s27';$soptD=$s27d;if ($s27b>93) {$sdi="-";} else {$sdi='+';}}?>
<td><div align="right"></div></td>
<td><div align="right"><?php if ($ds276>4) {?><font color="red"><?php }elseif ($ds276==$smin) { $sopt='s6';$soptD=$s2d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds276,2);?></div></td>
<td><div align="right"><?php if ($ds376>4) {?><font color="red"><?php }elseif ($ds376==$smin){ $sopt='s7';$soptD=$s3d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds376,2);?></div></td>
<td><div align="right"><?php if ($ds476>4) {?><font color="red"><?php }elseif ($ds476==$smin){$sopt='s8';$soptD=$s4d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds476,2);?></div></td>
<td><div align="right"><?php if ($ds576>4) {?><font color="red"><?php }elseif ($ds576==$smin){ $sopt='s9';$soptD=$s5d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds576,2);?></div></td>
<td><div align="right"><?php if ($ds676>4) {?><font color="red"><?php }elseif ($ds676==$smin){ $sopt='s10';$soptD=$s6d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds676,2);?></div></td>
<td><div align="right"><?php if ($ds776>4) {?><font color="red"><?php }elseif ($ds776==$smin){ $sopt='s11';$soptD=$s7d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds776,2);?></div></td>
<td><div align="right"><?php if ($ds876>4) {?><font color="red"><?php }elseif ($ds876==$smin){ $sopt='s12';$soptD=$s8d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds876,2);?></div></td>
<td><div align="right"><?php if ($ds976>4) {?><font color="red"><?php }elseif ($ds976==$smin){$sopt='s13';$soptD=$s9d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds976,2);?></div></td>
<td><div align="right"><?php if ($ds1076>4) {?><font color="red"><?php }elseif ($ds1076==$smin){ $sopt='s14';$soptD=$s10d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1076,2);?></div></td>
<td><div align="right"><?php if ($ds1176>4) {?><font color="red"><?php }elseif ($ds1176==$smin){ $sopt='s15';$soptD=$s11d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1176,2);?></div></td>
<td><div align="right"><?php if ($ds1276>4) {?><font color="red"><?php }elseif ($ds1276==$smin){ $sopt='s16';$soptD=$s12d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1276,2);?></div></td>
<td><div align="right"><?php if ($ds1376>4) {?><font color="red"><?php }elseif ($ds1376==$smin){ $sopt='s17';$soptD=$s13d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1376,2);?></div></td>
<td><div align="right"><?php if ($ds1476>4) {?><font color="red"><?php }elseif ($ds1476==$smin){ $sopt='s18';$soptD=$s14d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1476,2);?></div></td>
<td><div align="right"><?php if ($ds1576>4) {?><font color="red"><?php }elseif ($ds1576==$smin){ $sopt='s19';$soptD=$s15d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1576,2);?></div></td>
<td><div align="right"><?php if ($ds1676>4) {?><font color="red"><?php }elseif ($ds1676==$smin){ $sopt='s20';$soptD=$s16d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1676,2);?></div></td>
<td><div align="right"><?php if ($ds1776>4) {?><font color="red"><?php }elseif ($ds1776==$smin){ $sopt='s21';$soptD=$s17d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1776,2);?></div></td>
<td><div align="right"><?php if ($ds1876>4) {?><font color="red"><?php }elseif ($ds1876==$smin){ $sopt='s22';$soptD=$s18d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1876,2);?></div></td>
<td><div align="right"><?php if ($ds1976>4) {?><font color="red"><?php }elseif ($ds1976==$smin){ $sopt='s23';$soptD=$s19d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds1976,2);?></div></td>
<td><div align="right"><?php if ($ds2076>4) {?><font color="red"><?php }elseif ($ds2076==$smin){ $sopt='s24';$soptD=$s20d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds2076,2);?></div></td>
<td><div align="right"><?php if ($ds2176>4) {?><font color="red"><?php }elseif ($ds2176==$smin){ $sopt='s25';$soptD=$s21d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds2176,2);?></div></td>
<td><div align="right"><?php if ($ds2276>4) {?><font color="red"><?php }elseif ($ds2276==$smin){ $sopt='s26';$soptD=$s22d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds2276,2);?></div></td>
<td><div align="right"><?php if ($ds2376>4) {?><font color="red"><?php }elseif ($ds2376==$smin){ $sopt='s27';$soptD=$s23d;
?><font color="green"><?php }else {?><font color="black"><?php }echo round($ds2376,2);?></div></td>
<td><div align="right"></div></td>
</tr>
<tr>
<td><div align="center">最佳濃度</div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php echo $kopt;?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo $copt;?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo $mopt;?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo $yopt;?></div></td>
<td bgcolor="#daffc2"><div align="right"><?php echo $sopt;?></div></td>
</tr>
<tr>
<td><div align="center">Den</div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php echo round($koptD,2).$kdi;?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($coptD,2).$cdi;?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo round($moptD,2).$mdi;?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo round($yoptD,2).$ydi;?></div></td>
<td bgcolor="#daffc2"><div align="right"><?php echo round($soptD,2).$sdi;?></div></td>
</tr>
<tr>
<td><div align="center">DeltaE</div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php if ($kmin>5) {?><font color="red"><?php } echo $kmin;?></div></td>
<td bgcolor="#00FFFF"><div align="right"><?php if ($cmin>5) {?><font color="red"><?php } echo $cmin;?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php if ($mmin>5) {?><font color="red"><?php } echo $mmin;?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php if ($ymin>5) {?><font color="red"><?php } echo $ymin;?></div></td>
<td bgcolor="#daffc2"><div align="right"><?php if ($smin>5) {?><font color="red"><?php } echo $smin;?></div></td>
</tr>
</table>
<tr></tr>
<table>
<div>
<?php
include 'graphFix.php';
GenGraph(0.01,$k2d-$koptD,$k3d-$koptD,$k4d-$koptD,$k5d-$koptD,$k6d-$koptD,$k7d-$koptD,$k8d-$koptD,$k9d-$koptD,$k10d-$koptD,$k11d-$koptD,$k12d-$koptD,$k13d-$koptD,$k14d-$koptD,$k15d-$koptD,$k16d-$koptD,$k17d-$koptD,$k18d-$koptD,$k19d-$koptD,$k20d-$koptD,$k21d-$koptD,$k22d-$koptD,$k23d-$koptD,0.01);
GenGraphT($k8T,$k17T);
?>
<img src="graph.gif"><img src="graphT.gif">
</div>
</table>
<table>
<div>
<?php
include 'graphFix2.php';
GenGraph2($c1d-$coptD,$c2d-$coptD,$c3d-$coptD,$c4d-$coptD,$c5d-$coptD,$c6d-$coptD,$c7d-$coptD,$c8d-$coptD,$c9d-$coptD,$c10d-$coptD,$c11d-$coptD,$c12d-$coptD,$c13d-$coptD,$c14d-$coptD,$c15d-$coptD,$c16d-$coptD,$c17d-$coptD,$c18d-$coptD,$c19d-$coptD,$c20d-$coptD,$c21d-$coptD,$c22d-$coptD,$c23d-$coptD,$c24d-$coptD);
GenGraphT2($c8T,$c17T);
?>
<img src="graph2.gif"><img src="graphT2.gif">
</div>
</table>
<table>
<table>
<div>
<?php
include 'graphFix3.php';
GenGraph3($m1d-$moptD,$m2d-$moptD,$m3d-$moptD,$m4d-$moptD,$m5d-$moptD,$m6d-$moptD,$m7d-$moptD,$m8d-$moptD,$m9d-$moptD,$m10d-$moptD,$m11d-$moptD,$m12d-$moptD,$m13d-$moptD,$m14d-$moptD,$m15d-$moptD,$m16d-$moptD,$m17d-$moptD,$m18d-$moptD,$m19d-$moptD,$m20d-$moptD,$m21d-$moptD,$m22d-$moptD,$m23d-$moptD,$m24d-$moptD);
GenGraphT3($m8T,$m17T);
?>
<img src="graph3.gif"><img src="graphT3.gif">
</div>
</table>
<table>
<div>
<?php
include 'graphFix4.php';
GenGraph4(0.01,$y2d-$yoptD,$y3d-$yoptD,$y4d-$yoptD,$y5d-$yoptD,$y6d-$yoptD,$y7d-$yoptD,$y8d-$yoptD,$y9d-$yoptD,$y10d-$yoptD,$y11d-$yoptD,$y12d-$yoptD,$y13d-$yoptD,$y14d-$yoptD,$y15d-$yoptD,$y16d-$yoptD,$y17d-$yoptD,$y18d-$yoptD,$y19d-$yoptD,$y20d-$yoptD,$y21d-$yoptD,$y22d-$yoptD,$y23d-$yoptD,0.01);
GenGraphT4($y8T,$y17T);
?>
<img src="graph4.gif"><img src="graphT4.gif">
</div>
</table>
<table>
<div>
<?php
include 'graphFix5.php';
GenGraph5(0.01,$s2d-$soptD,$s3d-$soptD,$s4d-$soptD,$s5d-$soptD,$s6d-$soptD,$s7d-$soptD,$s8d-$soptD,$s9d-$soptD,$s10d-$soptD,$s11d-$soptD,$s12d-$soptD,$s13d-$soptD,$s14d-$soptD,$s15d-$soptD,$s16d-$soptD,$s17d-$soptD,$s18d-$soptD,$s19d-$soptD,$s20d-$soptD,$s21d-$soptD,$s22d-$soptD,$s23d-$soptD,0.01);
GenGraphT5($s8T,$s17T);
?>
<img src="graph5.gif"><img src="graphT5.gif">
</div>
</table>
<?php
?>
<tr>
<td align="center"><font size="-2"> © <a href="mailto:[email protected]">Fred Kuo</a>, 2010. All rights reserved.<br><a href="http://www.fredkuo.idv.tw/wordpress/?p=1025">Read more.</a><br>
</td>
</tr>
</form>
<?php
}//////////////////////////////////if okfile is null
else {
$contentT = file("upload/".$tvifile);
//echo substr('abcdef', 1, 3); // bcd
$filedb=substr($tvifile,7,60);
$dbstr=explode("_", $filedb);
echo $dbstr[0]."XX".$dbstr[1]."XX".$dbstr[2]."XX".$dbstr[3].$dbstr[4].$dbstr[5];
$stringT = implode($contentT);
//echo $contents[20];
//echo $string;
$pt = ereg_replace("\r\n?", "\n", $stringT);
$pt = str_replace("\n", ',', $pt);
$datastring=get_between($pt,"BEGIN_DATA,",",END_DATA");
$dotT = explode("\t", $datastring);
$inserted = array( '0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0' ,'0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0');
array_splice( $dotT, 0, 0, $inserted );
$contents = file("upload/".$okfile);
//echo substr('abcdef', 1, 3); // bcd
// $filedb=substr($f123,7,45);
// $dbstr=explode("_", $filedb);
echo $dbstr[0]."XX".$dbstr[1]."XX".$dbstr[2]."XX".$dbstr[3];
$string = implode($contents);
//echo $contents[20];
//echo $string;
$p = ereg_replace("\r\n?", "\n", $string);
$p = str_replace("\n", ',', $p);
$datastring=get_between($p,"BEGIN_DATA,",",END_DATA");
$dot = explode("\t", $datastring);
$inserted = array( '0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0' ,'0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0');
array_splice( $dot, 0, 0, $inserted );
?>
<table width="200" border="1" align="center">
</table>
<p><p>
<table width="200" border="1" align="center">
<tr>
<td><div align="center">SID</div></td>
<td><font color="#aaaaaa">4</td>
<td><font color="#aaaaaa">5</td>
<td><font color="#aaaaaa">6</td>
<td><font color="#aaaaaa">7</td>
<td><font color="#aaaaaa">8</td>
<td><font color="#666666">9</td>
<td><font color="#666666">10</td>
<td><font color="#666666">11</td>
<td><font color="#666666">12</td>
<td><font color="#666666">13</td>
<td><font color="#666666">14</td>
<td><font color="#666666">15</td>
<td><font color="#666666">16</td>
<td>17</td>
<td>18</td>
<td>19</td>
<td>20</td>
<td>21</td>
<td>22</td>
<td>23</td>
<td><font color="#666666">24</td>
<td><font color="#666666">25</td>
<td><font color="#666666">26</td>
<td>27</td>
<td>28</td>
<td>29</td>
<td>30</td>
</tr>
<?php
//////////////////////////////////////////////////Fogra Media Check
$psum=20;
$pl=95; $pa=-0.01;$pb=-2;
$cl=55.10; $ca=-37.0;$cb=-50;
$ml=48; $ma=74;$mb=-3;
$yl=89; $ya=-5;$yb=93;
$kl=16; $ka=0.01;$kb=0.01;
include 'densityV.php';
$cols=40;
$k1dd=0;
$Pdot=0;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-3;
${'k'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-5*($i-1)],$dot[9+$cols*$Pdot-5*($i-1)+1],$dot[9+$cols*$Pdot-5*($i-1)+2],$dot[9+$cols*$Pdot-5*($i-1)+3],$dot[9+$cols*$Pdot-5*($i-1)+4],$dot[9+$cols*$Pdot-5*($i-1)+5],$dot[9+$cols*$Pdot-5*($i-1)+6],$dot[9+$cols*$Pdot-5*($i-1)+7],$dot[9+$cols*$Pdot-5*($i-1)+8],$dot[9+$cols*$Pdot-5*($i-1)+9],$dot[9+$cols*$Pdot-5*($i-1)+10],$dot[9+$cols*$Pdot-5*($i-1)+11],$dot[9+$cols*$Pdot-5*($i-1)+12],$dot[9+$cols*$Pdot-5*($i-1)+13],$dot[9+$cols*$Pdot-5*($i-1)+14],$dot[9+$cols*$Pdot-5*($i-1)+15],$dot[9+$cols*$Pdot-5*($i-1)+16],$dot[9+$cols*$Pdot-5*($i-1)+17],$dot[9+$cols*$Pdot-5*($i-1)+18],$dot[9+$cols*$Pdot-5*($i-1)+19],$dot[9+$cols*$Pdot-5*($i-1)+20],$dot[9+$cols*$Pdot-5*($i-1)+21],$dot[9+$cols*$Pdot-5*($i-1)+22],$dot[9+$cols*$Pdot-5*($i-1)+23],$dot[9+$cols*$Pdot-5*($i-1)+24],$dot[9+$cols*$Pdot-5*($i-1)+25],$dot[9+$cols*$Pdot-5*($i-1)+26],$dot[9+$cols*$Pdot-5*($i-1)+27],$dot[9+$cols*$Pdot-5*($i-1)+28],$dot[9+$cols*$Pdot-5*($i-1)+29],$dot[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-5*($i-1)],$dot[9+$cols*$Pdot-5*($i-1)+1],$dot[9+$cols*$Pdot-5*($i-1)+2],$dot[9+$cols*$Pdot-5*($i-1)+3],$dot[9+$cols*$Pdot-5*($i-1)+4],$dot[9+$cols*$Pdot-5*($i-1)+5],$dot[9+$cols*$Pdot-5*($i-1)+6],$dot[9+$cols*$Pdot-5*($i-1)+7],$dot[9+$cols*$Pdot-5*($i-1)+8],$dot[9+$cols*$Pdot-5*($i-1)+9],$dot[9+$cols*$Pdot-5*($i-1)+10],$dot[9+$cols*$Pdot-5*($i-1)+11],$dot[9+$cols*$Pdot-5*($i-1)+12],$dot[9+$cols*$Pdot-5*($i-1)+13],$dot[9+$cols*$Pdot-5*($i-1)+14],$dot[9+$cols*$Pdot-5*($i-1)+15],$dot[9+$cols*$Pdot-5*($i-1)+16],$dot[9+$cols*$Pdot-5*($i-1)+17],$dot[9+$cols*$Pdot-5*($i-1)+18],$dot[9+$cols*$Pdot-5*($i-1)+19],$dot[9+$cols*$Pdot-5*($i-1)+20],$dot[9+$cols*$Pdot-5*($i-1)+21],$dot[9+$cols*$Pdot-5*($i-1)+22],$dot[9+$cols*$Pdot-5*($i-1)+23],$dot[9+$cols*$Pdot-5*($i-1)+24],$dot[9+$cols*$Pdot-5*($i-1)+25],$dot[9+$cols*$Pdot-5*($i-1)+26],$dot[9+$cols*$Pdot-5*($i-1)+27],$dot[9+$cols*$Pdot-5*($i-1)+28],$dot[9+$cols*$Pdot-5*($i-1)+29],$dot[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-5*($i-1)],$dot[9+$cols*$Pdot-5*($i-1)+1],$dot[9+$cols*$Pdot-5*($i-1)+2],$dot[9+$cols*$Pdot-5*($i-1)+3],$dot[9+$cols*$Pdot-5*($i-1)+4],$dot[9+$cols*$Pdot-5*($i-1)+5],$dot[9+$cols*$Pdot-5*($i-1)+6],$dot[9+$cols*$Pdot-5*($i-1)+7],$dot[9+$cols*$Pdot-5*($i-1)+8],$dot[9+$cols*$Pdot-5*($i-1)+9],$dot[9+$cols*$Pdot-5*($i-1)+10],$dot[9+$cols*$Pdot-5*($i-1)+11],$dot[9+$cols*$Pdot-5*($i-1)+12],$dot[9+$cols*$Pdot-5*($i-1)+13],$dot[9+$cols*$Pdot-5*($i-1)+14],$dot[9+$cols*$Pdot-5*($i-1)+15],$dot[9+$cols*$Pdot-5*($i-1)+16],$dot[9+$cols*$Pdot-5*($i-1)+17],$dot[9+$cols*$Pdot-5*($i-1)+18],$dot[9+$cols*$Pdot-5*($i-1)+19],$dot[9+$cols*$Pdot-5*($i-1)+20],$dot[9+$cols*$Pdot-5*($i-1)+21],$dot[9+$cols*$Pdot-5*($i-1)+22],$dot[9+$cols*$Pdot-5*($i-1)+23],$dot[9+$cols*$Pdot-5*($i-1)+24],$dot[9+$cols*$Pdot-5*($i-1)+25],$dot[9+$cols*$Pdot-5*($i-1)+26],$dot[9+$cols*$Pdot-5*($i-1)+27],$dot[9+$cols*$Pdot-5*($i-1)+28],$dot[9+$cols*$Pdot-5*($i-1)+29],$dot[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'l'}=xyz2lab01("l",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'a'}=xyz2lab01("a",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'b'}=xyz2lab01("b",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'d'}=DensitySp("K",$dot[9+$cols*$Pdot-5*($i-1)],$dot[9+$cols*$Pdot-5*($i-1)+1],$dot[9+$cols*$Pdot-5*($i-1)+2],$dot[9+$cols*$Pdot-5*($i-1)+3],$dot[9+$cols*$Pdot-5*($i-1)+4],$dot[9+$cols*$Pdot-5*($i-1)+5],$dot[9+$cols*$Pdot-5*($i-1)+6],$dot[9+$cols*$Pdot-5*($i-1)+7],$dot[9+$cols*$Pdot-5*($i-1)+8],$dot[9+$cols*$Pdot-5*($i-1)+9],$dot[9+$cols*$Pdot-5*($i-1)+10],$dot[9+$cols*$Pdot-5*($i-1)+11],$dot[9+$cols*$Pdot-5*($i-1)+12],$dot[9+$cols*$Pdot-5*($i-1)+13],$dot[9+$cols*$Pdot-5*($i-1)+14],$dot[9+$cols*$Pdot-5*($i-1)+15],$dot[9+$cols*$Pdot-5*($i-1)+16],$dot[9+$cols*$Pdot-5*($i-1)+17],$dot[9+$cols*$Pdot-5*($i-1)+18],$dot[9+$cols*$Pdot-5*($i-1)+19],$dot[9+$cols*$Pdot-5*($i-1)+20],$dot[9+$cols*$Pdot-5*($i-1)+21],$dot[9+$cols*$Pdot-5*($i-1)+22],$dot[9+$cols*$Pdot-5*($i-1)+23],$dot[9+$cols*$Pdot-5*($i-1)+24],$dot[9+$cols*$Pdot-5*($i-1)+25],$dot[9+$cols*$Pdot-5*($i-1)+26],$dot[9+$cols*$Pdot-5*($i-1)+27],$dot[9+$cols*$Pdot-5*($i-1)+28],$dot[9+$cols*$Pdot-5*($i-1)+29],$dot[9+$cols*$Pdot-5*($i-1)+30]);
}
echo "note 9d:".$k9d."__";
/////////////////////////////////c
$c1X=spXYZ("X", $dot[89],$dot[90],$dot[91],$dot[92],$dot[93],$dot[94],$dot[95],$dot[96],$dot[97],$dot[98],$dot[99],$dot[100],$dot[101],$dot[102],$dot[103],$dot[104],$dot[105],$dot[106],$dot[107],$dot[108],$dot[109],$dot[110],$dot[111],$dot[112],$dot[113],$dot[114],$dot[115],$dot[116],$dot[117],$dot[118],$dot[119]);
$c1Y=spXYZ("Y", $dot[89],$dot[90],$dot[91],$dot[92],$dot[93],$dot[94],$dot[95],$dot[96],$dot[97],$dot[98],$dot[99],$dot[100],$dot[101],$dot[102],$dot[103],$dot[104],$dot[105],$dot[106],$dot[107],$dot[108],$dot[109],$dot[110],$dot[111],$dot[112],$dot[113],$dot[114],$dot[115],$dot[116],$dot[117],$dot[118],$dot[119]);
$c1Z=spXYZ("Z", $dot[89],$dot[90],$dot[91],$dot[92],$dot[93],$dot[94],$dot[95],$dot[96],$dot[97],$dot[98],$dot[99],$dot[100],$dot[101],$dot[102],$dot[103],$dot[104],$dot[105],$dot[106],$dot[107],$dot[108],$dot[109],$dot[110],$dot[111],$dot[112],$dot[113],$dot[114],$dot[115],$dot[116],$dot[117],$dot[118],$dot[119]);
$c1l=xyz2lab01("l",$c1X,$c1Y,$c1Z);
$c1a=xyz2lab01("a",$c1X,$c1Y,$c1Z);
$c1b=xyz2lab01("b",$c1X,$c1Y,$c1Z);
$c1d=DensitySp("C", $dot[89],$dot[90],$dot[91],$dot[92],$dot[93],$dot[94],$dot[95],$dot[96],$dot[97],$dot[98],$dot[99],$dot[100],$dot[101],$dot[102],$dot[103],$dot[9],$dot[104],$dot[105],$dot[106],$dot[107],$dot[108],$dot[109],$dot[110],$dot[111],$dot[112],$dot[113],$dot[114],$dot[115],$dot[116],$dot[117],$dot[118],$dot[119]);
echo "note 1c:".$dot[89].$c1l."_".$c1a."_".$c1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-6;
${'c'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-(2+(5*($i-2)))],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-(2+(5*($i-2)))],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-(2+(5*($i-2)))],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'l'}=xyz2lab01("l",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'a'}=xyz2lab01("a",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'b'}=xyz2lab01("b",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'d'}=DensitySp("C",$dot[9+$cols*$Pdot-(2+(5*($i-2)))],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////m
$m1X=spXYZ("X", $dot[128],$dot[129],$dot[130],$dot[131],$dot[132],$dot[133],$dot[134],$dot[135],$dot[136],$dot[137],$dot[138],$dot[139],$dot[140],$dot[141],$dot[142],$dot[143],$dot[144],$dot[145],$dot[146],$dot[147],$dot[148],$dot[149],$dot[150],$dot[151],$dot[152],$dot[153],$dot[154],$dot[155],$dot[156],$dot[157],$dot[158]);
$m1Y=spXYZ("Y", $dot[128],$dot[129],$dot[130],$dot[131],$dot[132],$dot[133],$dot[134],$dot[135],$dot[136],$dot[137],$dot[138],$dot[139],$dot[140],$dot[141],$dot[142],$dot[143],$dot[144],$dot[145],$dot[146],$dot[147],$dot[148],$dot[149],$dot[150],$dot[151],$dot[152],$dot[153],$dot[154],$dot[155],$dot[156],$dot[157],$dot[158]);
$m1Z=spXYZ("Z", $dot[128], $dot[129],$dot[130],$dot[131],$dot[132],$dot[133],$dot[134],$dot[135],$dot[136],$dot[137],$dot[138],$dot[139],$dot[140],$dot[141],$dot[142],$dot[143],$dot[144],$dot[145],$dot[146],$dot[147],$dot[148],$dot[149],$dot[150],$dot[151],$dot[152],$dot[153],$dot[154],$dot[155],$dot[156],$dot[157],$dot[158]);
$m1l=xyz2lab01("l",$m1X,$m1Y,$m1Z);
$m1a=xyz2lab01("a",$m1X,$m1Y,$m1Z);
$m1b=xyz2lab01("b",$m1X,$m1Y,$m1Z);
$m1d=DensitySp("M", $dot[128],$dot[129],$dot[130],$dot[131],$dot[132],$dot[133],$dot[134],$dot[135],$dot[136],$dot[137],$dot[138],$dot[139],$dot[140],$dot[141],$dot[142],$dot[143],$dot[144],$dot[145],$dot[146],$dot[147],$dot[148],$dot[149],$dot[150],$dot[151],$dot[152],$dot[153],$dot[154],$dot[155],$dot[156],$dot[157],$dot[158]);
echo "note 1m:".$dot[89].$m1l."_".$m1a."_".$m1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-5;
${'m'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-(3+(5*($i-2)))],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-(3+(5*($i-2)))],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-(3+(5*($i-2)))],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'l'}=xyz2lab01("l",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'a'}=xyz2lab01("a",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'b'}=xyz2lab01("b",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'d'}=DensitySp("M",$dot[9+$cols*$Pdot-(3+(5*($i-2)))],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////y
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-4;
${'y'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-(4+(5*($i-2)))],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-(4+(5*($i-2)))],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-(4+(5*($i-2)))],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'l'}=xyz2lab01("l",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'a'}=xyz2lab01("a",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'b'}=xyz2lab01("b",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'d'}=DensitySp("Y",$dot[9+$cols*$Pdot-(4+(5*($i-2)))],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
}
echo "note 2y:".$y2l."_".$y2a."_".$y2b;
///////////////////////////////////////////s
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-2;
${'s'.$i.'X'}=spXYZ("X",$dot[9+$cols*$Pdot-(5+(5*($i-2)))],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Y'}=spXYZ("Y",$dot[9+$cols*$Pdot-(5+(5*($i-2)))],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Z'}=spXYZ("Z",$dot[9+$cols*$Pdot-(5+(5*($i-2)))],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'l'}=xyz2lab01("l",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'a'}=xyz2lab01("a",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'b'}=xyz2lab01("b",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'d'}=DensitySp("K",$dot[9+$cols*$Pdot-(5+(5*($i-2)))],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dot[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
}
echo "note 2s:".$s2l."_".$s2a."_".$s2b."_".$s2d;
$sl=$s2l; $sa=$s2a;$sb=$s2b;
$k8_50d=$k8d;
echo "k8::".$k8_50d."__xx_";
$k17_50d=$k17d;
$c8_50d=$c8d;
$c17_50d=$c17d;
$m8_50d=$m8d;
$m17_50d=$m17d;
$y8_50d=$y8d;
$y17_50d=$y17d;
$s8_50d=$s8d;
$s17_50d=$s17d;
$k8l=($k7l+$k9l)/2;$k8a=($k7a+$k9a)/2;$k8b=($k7b+$k9b)/2;$k8d=($k7d+$k9d)/2;
$c8l=($c7l+$c9l)/2;$c8a=($c7a+$c9a)/2;$c8b=($c7b+$c9b)/2;$c8d=($c7d+$c9d)/2;
$m8l=($m7l+$m9l)/2;$m8a=($m7a+$m9a)/2;$m8b=($m7b+$m9b)/2;$m8d=($m7d+$m9d)/2;
$y8l=($y7l+$y9l)/2;$y8a=($y7a+$y9a)/2;$y8b=($y7b+$y9b)/2;$y8d=($y7d+$y9d)/2;
$s8l=($s7l+$s9l)/2;$s8a=($s7a+$s9a)/2;$s8b=($s7b+$s9b)/2;$s8d=($s7d+$s9d)/2;
$k17l=($k18l+$k16l)/2;$k17a=($k18a+$k16a)/2;$k17b=($k18b+$k16b)/2;$k17d=($k18d+$k16d)/2;
$c17l=($c18l+$c16l)/2;$c17a=($c18a+$c16a)/2;$c17b=($c18b+$c16b)/2;$c17d=($c18d+$c16d)/2;
$m17l=($m18l+$m16l)/2;$m17a=($m18a+$m16a)/2;$m17b=($m18b+$m16b)/2;$m17d=($m18d+$m16d)/2;
$y17l=($y18l+$y16l)/2;$y17a=($y18a+$y16a)/2;$y17b=($y18b+$y16b)/2;$y17d=($y18d+$y16d)/2;
$s17l=($s18l+$s16l)/2;$s17a=($s18a+$s16a)/2;$s17b=($s18b+$s16b)/2;$s17d=($s18d+$s16d)/2;
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$pl=95; $pa=-0.01;$pb=-2;
$cl=55.10; $ca=-37.0;$cb=-50;
$ml=48; $ma=74;$mb=-3;
$yl=89; $ya=-5;$yb=93;
$kl=16; $ka=0.01;$kb=0.01;
// include 'densityV.php';
$cols=40;
$k1dd=0;
$Pdot=0;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-3;
${'k'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
${'k'.$i.'lT'}=xyz2lab01("l",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'aT'}=xyz2lab01("a",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'bT'}=xyz2lab01("b",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
${'k'.$i.'dT'}=DensitySp("K",$dotT[9+$cols*$Pdot-5*($i-1)],$dotT[9+$cols*$Pdot-5*($i-1)+1],$dotT[9+$cols*$Pdot-5*($i-1)+2],$dotT[9+$cols*$Pdot-5*($i-1)+3],$dotT[9+$cols*$Pdot-5*($i-1)+4],$dotT[9+$cols*$Pdot-5*($i-1)+5],$dotT[9+$cols*$Pdot-5*($i-1)+6],$dotT[9+$cols*$Pdot-5*($i-1)+7],$dotT[9+$cols*$Pdot-5*($i-1)+8],$dotT[9+$cols*$Pdot-5*($i-1)+9],$dotT[9+$cols*$Pdot-5*($i-1)+10],$dotT[9+$cols*$Pdot-5*($i-1)+11],$dotT[9+$cols*$Pdot-5*($i-1)+12],$dotT[9+$cols*$Pdot-5*($i-1)+13],$dotT[9+$cols*$Pdot-5*($i-1)+14],$dotT[9+$cols*$Pdot-5*($i-1)+15],$dotT[9+$cols*$Pdot-5*($i-1)+16],$dotT[9+$cols*$Pdot-5*($i-1)+17],$dotT[9+$cols*$Pdot-5*($i-1)+18],$dotT[9+$cols*$Pdot-5*($i-1)+19],$dotT[9+$cols*$Pdot-5*($i-1)+20],$dotT[9+$cols*$Pdot-5*($i-1)+21],$dotT[9+$cols*$Pdot-5*($i-1)+22],$dotT[9+$cols*$Pdot-5*($i-1)+23],$dotT[9+$cols*$Pdot-5*($i-1)+24],$dotT[9+$cols*$Pdot-5*($i-1)+25],$dotT[9+$cols*$Pdot-5*($i-1)+26],$dotT[9+$cols*$Pdot-5*($i-1)+27],$dotT[9+$cols*$Pdot-5*($i-1)+28],$dotT[9+$cols*$Pdot-5*($i-1)+29],$dotT[9+$cols*$Pdot-5*($i-1)+30]);
}
echo "note 9dT:".$k9dT."__";
/////////////////////////////////c
$c1X=spXYZ("X", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
$c1Y=spXYZ("Y", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
$c1Z=spXYZ("Z", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
$c1lT=xyz2lab01("l",$c1X,$c1Y,$c1Z);
$c1aT=xyz2lab01("a",$c1X,$c1Y,$c1Z);
$c1bT=xyz2lab01("b",$c1X,$c1Y,$c1Z);
$c1dT=DensitySp("C", $dotT[89],$dotT[90],$dotT[91],$dotT[92],$dotT[93],$dotT[94],$dotT[95],$dotT[96],$dotT[97],$dotT[98],$dotT[99],$dotT[100],$dotT[101],$dotT[102],$dotT[103],$dotT[9],$dotT[104],$dotT[105],$dotT[106],$dotT[107],$dotT[108],$dotT[109],$dotT[110],$dotT[111],$dotT[112],$dotT[113],$dotT[114],$dotT[115],$dotT[116],$dotT[117],$dotT[118],$dotT[119]);
echo "note 1c:".$dotT[89].$c1l."_".$c1a."_".$c1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-6;
${'c'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
${'c'.$i.'lT'}=xyz2lab01("l",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'aT'}=xyz2lab01("a",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'bT'}=xyz2lab01("b",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'dT'}=DensitySp("C",$dotT[9+$cols*$Pdot-(2+(5*($i-2)))],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(2+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////m
$m1X=spXYZ("X", $dotT[128],$dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
$m1Y=spXYZ("Y", $dotT[128],$dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
$m1Z=spXYZ("Z", $dotT[128], $dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
$m1lT=xyz2lab01("l",$m1X,$m1Y,$m1Z);
$m1aT=xyz2lab01("a",$m1X,$m1Y,$m1Z);
$m1bT=xyz2lab01("b",$m1X,$m1Y,$m1Z);
$m1dT=DensitySp("M", $dotT[128],$dotT[129],$dotT[130],$dotT[131],$dotT[132],$dotT[133],$dotT[134],$dotT[135],$dotT[136],$dotT[137],$dotT[138],$dotT[139],$dotT[140],$dotT[141],$dotT[142],$dotT[143],$dotT[144],$dotT[145],$dotT[146],$dotT[147],$dotT[148],$dotT[149],$dotT[150],$dotT[151],$dotT[152],$dotT[153],$dotT[154],$dotT[155],$dotT[156],$dotT[157],$dotT[158]);
echo "note 1m:".$dotT[89].$m1l."_".$m1a."_".$m1b;
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-5;
${'m'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
${'m'.$i.'lT'}=xyz2lab01("l",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'aT'}=xyz2lab01("a",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'bT'}=xyz2lab01("b",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
${'m'.$i.'dT'}=DensitySp("M",$dotT[9+$cols*$Pdot-(3+(5*($i-2)))],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(3+(5*($i-2)))+30]);
}
echo "note 2k:".$c2l."_".$c2a."_".$c2b;
///////////////////////////////////////////y
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-4;
${'y'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
${'y'.$i.'lT'}=xyz2lab01("l",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'aT'}=xyz2lab01("a",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'bT'}=xyz2lab01("b",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
${'y'.$i.'dT'}=DensitySp("Y",$dotT[9+$cols*$Pdot-(4+(5*($i-2)))],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(4+(5*($i-2)))+30]);
}
echo "note 2y:".$y2l."_".$y2a."_".$y2b;
///////////////////////////////////////////s
for ( $i = 2; $i <= 28; $i+= 1) {
$Pdot=5*$i-2;
${'s'.$i.'X'}=spXYZ("X",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Y'}=spXYZ("Y",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'Z'}=spXYZ("Z",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
${'s'.$i.'lT'}=xyz2lab01("l",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'aT'}=xyz2lab01("a",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'bT'}=xyz2lab01("b",${'s'.$i.'X'},${'s'.$i.'Y'},${'s'.$i.'Z'});
${'s'.$i.'dT'}=DensitySp("K",$dotT[9+$cols*$Pdot-(5+(5*($i-2)))],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+1],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+2],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+3],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+4],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+5],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+6],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+7],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+8],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+9],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+10],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+11],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+12],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+13],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+14],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+15],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+16],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+17],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+18],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+19],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+20],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+21],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+22],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+23],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+24],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+25],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+26],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+27],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+28],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+29],$dotT[9+$cols*$Pdot-(5+(5*($i-2)))+30]);
}
echo "note 2s:".$s2l."_".$s2a."_".$s2b."_".$s2d;
$sl=$s2l; $sa=$s2a;$sb=$s2b;
$k8_50dT=$k8dT;
echo "k8T::".$k8_50dT."__xx_";
$k17_50dT=$k17dT;
$c8_50dT=$c8dT;
$c17_50dT=$c17dT;
$m8_50dT=$m8dT;
$m17_50dT=$m17dT;
$y8_50dT=$y8dT;
$y17_50dT=$y17dT;
$s8_50dT=$s8dT;
$s17_50dT=$s17dT;
$k8lT=($k7lT+$k9lT)/2;$k8aT=($k7aT+$k9aT)/2;$k8bT=($k7bT+$k9bT)/2;$k8dT=($k7dT+$k9dT)/2;
$c8lT=($c7lT+$c9lT)/2;$c8aT=($c7aT+$c9aT)/2;$c8bT=($c7bT+$c9bT)/2;$c8dT=($c7dT+$c9dT)/2;
$m8lT=($m7lT+$m9lT)/2;$m8aT=($m7aT+$m9aT)/2;$m8bT=($m7bT+$m9bT)/2;$m8dT=($m7dT+$m9dT)/2;
$y8lT=($y7lT+$y9lT)/2;$y8aT=($y7aT+$y9aT)/2;$y8bT=($y7bT+$y9bT)/2;$y8dT=($y7dT+$y9dT)/2;
$s8lT=($s7lT+$s9lT)/2;$s8aT=($s7aT+$s9aT)/2;$s8bT=($s7bT+$s9bT)/2;$s8dT=($s7dT+$s9dT)/2;
$k17lT=($k18lT+$k16lT)/2;$k17aT=($k18aT+$k16aT)/2;$k17bT=($k18bT+$k16bT)/2;$k17dT=($k18dT+$k16dT)/2;
$c17lT=($c18lT+$c16lT)/2;$c17aT=($c18aT+$c16aT)/2;$c17bT=($c18bT+$c16bT)/2;$c17dT=($c18dT+$c16dT)/2;
$m17lT=($m18lT+$m16lT)/2;$m17aT=($m18aT+$m16aT)/2;$m17bT=($m18bT+$m16bT)/2;$m17dT=($m18dT+$m16dT)/2;
$y17lT=($y18lT+$y16lT)/2;$y17aT=($y18aT+$y16aT)/2;$y17bT=($y18bT+$y16bT)/2;$y17dT=($y18dT+$y16dT)/2;
$s17lT=($s18lT+$s16lT)/2;$s17aT=($s18aT+$s16aT)/2;$s17bT=($s18bT+$s16bT)/2;$s17dT=($s18dT+$s16dT)/2;
// $c30l=$dotT[862]; $c30a=$dotT[863];$c30b=$dotT[864];$c30d=$dotT[866];
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
function de76($l1,$a1,$b1,$l2,$a2,$b2) {
$d76=sqrt(pow(($l1-$l2),2)+ pow(($a1-$a2),2)+pow(($b1-$b2),2));
return round($d76,2);
}
//$dk276=de76($kl,$ka,$kb,$k2l,$k2a,$k2b);
//$dk376=de76($kl,$ka,$kb,$k3l,$k3a,$k3b);
$dk476=de76($k4lT,$k4aT,$k4bT,$k4l,$k4a,$k4b);
// echo $k4lT."x".$k4aT."x".$k4bT."x".$k4l."x".$k4a."x".$k4b."x".$k4dT."xd".$k4d;
//$dk576=de76($kl,$ka,$kb,$k5l,$k5a,$k5b);
//$dk676=de76($kl,$ka,$kb,$k6l,$k6a,$k6b);
//$dk776=de76($kl,$ka,$kb,$k7l,$k7a,$k7b);
//$dk876=de76($kl,$ka,$kb,$k8l,$k8a,$k8b);
$dk976=de76($k9lT,$k9aT,$k9bT,$k9l,$k9a,$k9b);
//$dk1076=de76($kl,$ka,$kb,$k10l,$k10a,$k10b);
//$dk1176=de76($kl,$ka,$kb,$k11l,$k11a,$k11b);
//$dk1276=de76($kl,$ka,$kb,$k12l,$k12a,$k12b);
// $dk1376=de76($kl,$ka,$kb,$k13l,$k13a,$k13b);
$dk1476=de76($k14lT,$k14aT,$k14bT,$k14l,$k14a,$k14b);
$dk1976=de76($k19lT,$k19aT,$k19bT,$k19l,$k19a,$k19b);
// $dk1576=de76($kl,$ka,$kb,$k15l,$k15a,$k15b);
// $c30l=$dotT[862]; $c30a=$dotT[863];$c30b=$dotT[864];$c30d=$dotT[866];
?>
<tr bgcolor="#aaaaaa">
<td><div align="center">KE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td>
<td></td>
<td></td>
<td bgcolor="#777777"><div align="right"><?php echo round(($k8_50dT-$k8_50d),2);?></div></td>
<td><div align="right"><?php if ($dk976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dk976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dk1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dk1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="#777777"><div align="right"><?php echo round($k17_50dT-$k17_50d,2);?></div></td>
<td></td>
<td><div align="right"><?php if ($dk1976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dk1976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php
//$dk276=de76($kl,$ka,$kb,$k2l,$k2a,$k2b);
//$dk376=de76($kl,$ka,$kb,$k3l,$k3a,$k3b);
$dc1976=de76($c19lT,$c19aT,$c19bT,$c19l,$c19a,$c19b);
// echo $c14lT."x".$c14aT."x".$c14bT."x".$c14l."x".$c14a."x".$c14b."x".$c14dT."xd".$c14d;
//$dc576=de76($cl,$ca,$cb,$c5l,$c5a,$c5b);
//$dc676=de76($cl,$ca,$cb,$c6l,$c6a,$c6b);
//$dc776=de76($cl,$ca,$cb,$c7l,$c7a,$c7b);
//$dc876=de76($cl,$ca,$cb,$c8l,$c8a,$c8b);
$dc976=de76($c9lT,$c9aT,$c9bT,$c9l,$c9a,$c9b);
//$dc1076=de76($cl,$ca,$cb,$c10l,$c10a,$c10b);
//$dc1176=de76($cl,$ca,$cb,$c11l,$c11a,$c11b);
//$dc1276=de76($cl,$ca,$cb,$c12l,$c12a,$c12b);
// $dc1376=de76($cl,$ca,$cb,$c13l,$c13a,$c13b);
$dc1476=de76($c14lT,$c14aT,$c14bT,$c14l,$c14a,$c14b);
// $dc1576=de76($cl,$ca,$cb,$c15l,$c15a,$c15b);
// $c30l=$dotT[862]; $c30a=$dotT[863];$c30b=$dotT[864];$c30d=$dotT[866];
?>
<tr bgcolor="#b1e5ff">
<td><div align="center">cE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($c8_50dT-$c8_50d,2);?></div></td>
<td><div align="right"><?php if ($dc976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dc976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dc1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dc1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="#00FFFF"><div align="right"><?php echo round($c17_50dT-$c17_50d,2);?></div></td>
<td></td>
<td><div align="right"><?php if ($dc1976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dc1976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php
$dm1976=de76($m19lT,$m19aT,$m19bT,$m19l,$m19a,$m19b);
//echo $m14lT."x".$m14aT."x".$m14bT."x".$m14l."x".$m14a."x".$m14b."x".$m14dT."xd".$m14d;
$dm976=de76($m9lT,$m9aT,$m9bT,$m9l,$m9a,$m9b);
$dm1476=de76($m14lT,$m14aT,$m14bT,$m14l,$m14a,$m14b);
?>
<tr bgcolor="#e9bed7">
<td><div align="center">mE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td bgcolor="#FF00FF"><div align="right"><?php echo round($m8_50dT-$m8_50d,2);?></div></td>
<td><div align="right"><?php if ($dm976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dm976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dm1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dm1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="#FF00FF"><div align="right"><?php echo round($m17_50dT-$m17_50d,2);?></div></td>
<td></td>
<td><div align="right"><?php if ($dm1976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dm1976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php
$dy1976=de76($y19lT,$y19aT,$y19bT,$y19l,$y19a,$y19b);
// echo $y14lT."x".$y14aT."x".$y14bT."x".$y14l."x".$y14a."x".$y14b."x".$y14dT."xd".$y14d;
$dy976=de76($y9lT,$y9aT,$y9bT,$y9l,$y9a,$y9b);
$dy1476=de76($y14lT,$y14aT,$y14bT,$y14l,$y14a,$y14b);
?>
<tr bgcolor="#f2ebc0">
<td><div align="center">yE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td bgcolor="yellow"><div align="right"><?php echo round($y8_50dT-$y8_50d,2);?></div></td>
<td><div align="right"><?php if ($dy976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dy976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($dy1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dy1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="yellow"><div align="right"><?php echo round($y17_50dT-$y17_50d,2);?></div></td>
<td></td>
<td><div align="right"><?php if ($dy1976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($dy1976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
</tr>
<?php /////////////////////////////////////////////////////////////////////////////////////////////////s1
$ds1976=de76($s19lT,$s19aT,$s19bT,$s19l,$s19a,$s19b);
// echo $s14lT."x".$s14aT."x".$s14bT."x".$s14l."x".$s14a."x".$s14b."x".$s14dT."xd".$s14d;
$ds976=de76($s9lT,$s9aT,$s9bT,$s9l,$s9a,$s9b);
$ds1476=de76($s14lT,$s14aT,$s14bT,$s14l,$s14a,$s14b);
?>
<tr bgcolor="#daffc2">
<td><div align="center">sE</div></td>
<td><div align="right"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td bgcolor="green"><div align="right"><?php echo round(($s8_50dT-$s8_50d),2);?></div></td>
<td><div align="right"><?php if ($ds976>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($ds976,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"><?php if ($ds1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($ds1476,2);?></div></td>
<td></td>
<td></td>
<td bgcolor="green"><div align="right"><?php echo round(($s17_50dT-$s17_50d),2);?></div></td>
<td></td>
<td><div align="right"><?php if ($ds1476>3) {?><font color="red"><?php }else {?><font color="black"><?php }echo round($ds1476,2);?></div></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td><div align="right"></td>
</tr>
<table>
<div>
<?php
include 'graphFix.php';
GenGraph(0.01,$k2dT-$k2d,$k3dT-$k3d,$k4dT-$k4d,$k5dT-$k5d,$k6dT-$k6d,$k7dT-$k7d,$k8dT-$k8d,$k9dT-$k9d,$k10dT-$k10d,$k11dT-$k11d,$k12dT-$k12d,$k13dT-$k13d,$k14dT-$k14d,$k15dT-$k15d,$k16dT-$k16d,$k17dT-$k17d,$k18dT-$k18d,$k19dT-$k19d,$k20dT-$k20d,$k21dT-$k21d,$k22dT-$k22d,$k23dT-$k23d,0.01);
GenGraphT($k8_50dT-$k8_50d,$k17_50dT-$k17_50d);
?>
<img src="graph.gif"><img src="graphT.gif">
</div>
</table>
<table>
<div>
<?php
include 'graphFix2.php';
GenGraph2($c1dT-$c1d,$c2dT-$c2d,$c3dT-$c3d,$c4dT-$c4d,$c5dT-$c5d,$c6dT-$c6d,$c7dT-$c7d,$c8dT-$c8d,$c9dT-$c9d,$c10dT-$c10d,$c11dT-$c11d,$c12dT-$c12d,$c13dT-$c13d,$c14dT-$c14d,$c15dT-$c15d,$c16dT-$c16d,$c17dT-$c17d,$c18dT-$c18d,$c19dT-$c19d,$c20dT-$c20d,$c21dT-$c21d,$c22dT-$c22d,$c23dT-$c23d,$c24dT-$c24dT);
GenGraphT2($c8_50dT-$c8_50d,$c17_50dT-$c17_50d);
?>
<img src="graph2.gif"><img src="graphT2.gif">
</div>
</table>
<table>
<div>
<?php
include 'graphFix3.php';
GenGraph3($m1dT-$m1d,$m2dT-$m2d,$m3dT-$m3d,$m4dT-$m4d,$m5dT-$m5d,$m6dT-$m6d,$m7dT-$m7d,$m8dT-$m8d,$m9dT-$m9d,$m10dT-$m10d,$m11dT-$m11d,$m12dT-$m12d,$m13dT-$m13d,$m14dT-$m14d,$m15dT-$m15d,$m16dT-$m16d,$m17dT-$m17d,$m18dT-$m18d,$m19dT-$m19d,$m20dT-$m20d,$m21dT-$m21d,$m22dT-$m22d,$m23dT-$m23d,$m24dT-$m24dT);
GenGraphT3($m8_50dT-$m8_50d,$m17_50dT-$m17_50d);
?>
<img src="graph3.gif"><img src="graphT3.gif">
</div>
</table>
<table>
<div>
<?php
include 'graphFix4.php';
GenGraph4(0.01,$y2dT-$y2d,$y3dT-$y3d,$y4dT-$y4d,$y5dT-$y5d,$y6dT-$y6d,$y7dT-$y7d,$y8dT-$y8d,$y9dT-$y9d,$y10dT-$y10d,$y11dT-$y11d,$y12dT-$y12d,$y13dT-$y13d,$y14dT-$y14d,$y15dT-$y15d,$y16dT-$y16d,$y17dT-$y17d,$y18dT-$y18d,$y19dT-$y19d,$y20dT-$y20d,$y21dT-$y21d,$y22dT-$y22d,$y23dT-$y23d,0.01);
GenGraphT4($y8_50dT-$y8_50d,$y17_50dT-$y17_50d);
?>
<img src="graph4.gif"><img src="graphT4.gif">
</div>
</table>
<table>
<div>
<?php
include 'graphFix5.php';
GenGraph5(0.01,$s2dT-$s2d,$s3dT-$s3d,$s4dT-$s4d,$s5dT-$s5d,$s6dT-$s6d,$s7dT-$s7d,$s8dT-$s8d,$s9dT-$s9d,$s10dT-$s10d,$s11dT-$s11d,$s12dT-$s12d,$s13dT-$s13d,$s14dT-$s14d,$s15dT-$s15d,$s16dT-$s16d,$s17dT-$s17d,$s18dT-$s18d,$s19dT-$s19d,$s20dT-$s20d,$s21dT-$s21d,$s22dT-$s22d,$s23dT-$s23d,0.01);
GenGraphT5($s8_50dT-$s8_50d,$s17_50dT-$s17_50d);
?>
<img src="graph5.gif"><img src="graphT5.gif">
</div>
</table>
<?php
}
?>
<tr>
<td align="center"><font size="-2"> © <a href="mailto:[email protected]">Fred Kuo</a>, 2010. All rights reserved.<br><a href="http://www.fredkuo.idv.tw/wordpress/?p=1025">Read more.</a><br>
</td>
</tr>
</body>
</html>