HEX
Server: Apache/2.4.46 (Win64) OpenSSL/1.1.1j PHP/8.4.25
System: Windows NT DESKTOP-4TAV2RJ 10.0 build 19045 (Windows 10) AMD64
User: fred (0)
PHP: 8.4.25
Disabled: NONE
Upload Files
File: C:/xampp/htdocs/FograCT1/6pmmTVI-parsingCTOKXct25ipGL.php
<?php 

$company=$_GET['company'];


 $servername = "127.0.0.1";
$username = "root";
$password = "fredsql";
$DBNAME = "tvicheck-st";

// Create connection
$conn = new mysqli($servername, $username, $password);

// Check connection
if ($conn->connect_error) {
  die("Connection failed: " . $conn->connect_error);
}
//echo "Connected successfully";


if( !mysqli_select_db($conn, $DBNAME)) {
  die ("無法選擇資料庫");
}
mysqli_query( $conn, "SET NAMES 'utf8'");


	
?>

<!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>
<script type='text/javascript' src='https://www.google.com/jsapi'></script>

<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />

<title>CT25 Check</title>
<style type="text/css">
#brand_div{ 
     background: url(lab2.png) no-repeat;
}
#brand_c{ 
     background: url(labC3.png) no-repeat;
}
#brand_m{ 
     background: url(labM3.png) no-repeat;
}
#brand_y{ 
     background: url(labY3.png) no-repeat;
}
#brand_g{ 
     background: url(LabG4.png) no-repeat;
}
<!--
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 方塊外部的空間 */
}
.oneColElsCtr form table tr td {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 10pt;
}
-->
</style>
</head>

<body class="oneColElsCtr">

<table align='center'><tr><td>
<div id='brand_div' >
<div> Report Start</div>
</td></tr></table> 

<?php

error_reporting(0);
$f123= $_GET['f123'];
$f321= $_GET['f321'];
$rule= $_GET['rule'];

$aim=$_GET['target'];
$target=$aim;
//$aim='Fogra39';
//include 'de2000.php';
include 'spXYZ.php';
include 'sp38XYZ.php';
include 'lab2xyz.php';
include 'SCCA06.php';
include 'xyz2lab01.php';
include 'xyz2lab.php';
include 'de00.php';
//include 'DensityV38.php';


$sum=110;
$check=1;
$dtime=time();
$dStr=substr($dtime,7,9)."-";


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;
}

echo "last changed: " . date("F d Y H:i:s.", filectime($f321));
$tStamp=strtotime(date("F d Y H:i:s.", filectime($f321)));
//echo "<br>x".$tStamp."x<br>";

	  $contentT = file($f321);
	  

	  //echo substr('abcdef', 1, 3);  // bcd
	  $filedb=substr($f321,7,60);
	  $dbstr=explode("_", $filedb);
	//  echo $dbstr[0]."XX".$dbstr[1]."XX".$dbstr[2]."XX".$dbstr[3].$dbstr[4].$dbstr[5];
	  $filename=$filedb;
	  //echo "file:".$filename;
	  $po=$dbstr[1];
		$stringC = implode($contentT);

		$stringT = implode($contentT);

$snstring=get_between($stringT,"Serial number ","_\"");


$dotS = explode(",", $snstring);////Measure upload




//print_r ($dotS);

$snstring=$dotS[0];
echo "sn:".$snstring;



$pt=get_between($stringT,"BEGIN_DATA\r","END_DATA");
$pt = str_replace("	\r", "\r", $pt);
$pt = str_replace("\r", "	", $pt);
//$pt = ereg_replace("\t\n", "	", $pt);
//$pt = ereg_replace("    ", "", $pt);



$dotT = explode("	", $pt);////Measure upload

//print_r ($dotT);

/*
if ($aim=='Fogra39' or $aim=='gmi'){
$base='Fogra39';}
elseif ($aim=='CRPC6' ){
$base='CRPC6';}
else {$base='Fogra51';}

*/


if ($dotT[6] <= '25')	{
?>		
<SCRIPT LANGUAGE="JavaScript">
window.location="6pmmTVI-parsingCTOKXct25ipGLT.php?f123=target.txt&f321=<?php echo $f321;?>&company=<?php echo $company;?>&rule=c9&target=<?php echo $target;?>";
</script> 
<?php
exit;
}

 echo "<br><br>評分規則: <font color='blue'>".$rule."</font>  	評分資料集:<font color='red'>".$aim."<font color='black'>";
?>
<form action="TVI-parsingCTOKXT.php?f123=<?php echo "target.txt".'&f321='.$_FILES["file"]["name"];?>" method="post">
<table width="400" border="0" align="center">
	    <tr><td>

 <input size="15" maxlength="50" type="hidden" name="rtarget" value=<?php echo $f321;?> /></td>
  <tr><td >規則切換:</td>
  <td><a href="6pmmTVI-parsingCTOKXct25ipGL.php?f123=target.txt&f321=<?php echo $f321;?>&rule=gmi&target=<?php echo $target;?>">gmi</a></td>
 <td ><a href="6pmmTVI-parsingCTOKXct25ipGL.php?f123=target.txt&f321=<?php echo $f321;?>&rule=c9&target=<?php echo $target;?>">c9</a></td>
 <td ><a href="6pmmTVI-parsingCTOKXct25ipGL.php?f123=target.txt&f321=<?php echo $f321;?>&rule=pbn&target=<?php echo $target;?>">pbn</a></td>
 </tr>
 <tr>
  <td >資料集切換:</td>
  <td><a href="6pmmTVI-parsingCTOKXct25ipGL.php?f123=target.txt&f321=<?php echo $f321;?>&target=Fogra39&more=0&rule=<?php echo $rule;?>">Fogra39</a></td>
  <td><a href="6pmmTVI-parsingCTOKXct25ipGL.php?f123=target.txt&f321=<?php echo $f321;?>&target=Fogra51&more=0&rule=<?php echo $rule;?>">Fogra51</a></td>
  <td><a href="6pmmTVI-parsingCTOKXct25ipGL.php?f123=target.txt&f321=<?php echo $f321;?>&target=CRPC6&more=0&rule=<?php echo $rule;?>">CRPC6</a></td><br>
  </tr>
  
  
<!--  <td ><a href="6pmmTVI-parsingCTOKXct25ip.php?f123=target.txt&f321=<?php echo $f321;?>&target=CRPC6">CRPC6</a></td><br>
 -->    
    </tr>

  </table>
  

  
	<p><p>
	

  


  <?php
  //////////////////////////////////////////////////Fogra Media Check
  $psum=20;
  if ($aim=='Fogra39' || $aim=='') {
  $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;
  
  $rl=47;$ra=68;$rb=48;
  $grl=50;$gra=-65;$grb=27;
  $bl=24;$ba=22;$bb=-46;



  $c50TVT=64;$c25TVT=34.3;$c75TVT=87.3;
   $m50TVT=64;$m25TVT=34.3;$m75TVT=87.3;
    $y50TVT=64;$y25TVT=34.3;$y75TVT=87.3;
	 $k50TVT=67;$k25TVT=37.1;$k75TVT=88.4;
	 
	 $gLT=58; $g25LT=77; $g75LT=39;
	 

	 
	 
 }
 elseif ($aim=='Fogra51') {
  $pl=95; $pa=1;$pb=-4;
  $cl=56; $ca=-36.0;$cb=-51;
  $ml=48; $ma=75;$mb=-4;
  $yl=89; $ya=-4;$yb=93;
  $kl=16; $ka=0.01;$kb=0.01;
  
  $rl=48;$ra=68;$rb=47;
  $grl=50;$gra=-65;$grb=26;
  $bl=25;$ba=20;$bb=-46;
  
  $c50TVT=66;$c25TVT=37.2;$c75TVT=87.7;
  $m50TVT=66;$m25TVT=37.2;$m75TVT=87.7;
  $y50TVT=66;$y25TVT=37.2;$y75TVT=87.7;
  $k50TVT=66;$k25TVT=37.2;$k75TVT=87.7;
  
  $gLT=56; $g25LT=76; $g75LT=38;
 }
elseif ($aim=='gmi' ) {
  $pl=95; $pa=-0.01;$pb=-2;
  $cl=55; $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;
  
  $rl=47;$ra=68;$rb=48;
  $grl=50;$gra=-65;$grb=27;
  $bl=24;$ba=22;$bb=-46;
  
  $c50TVT=67;$c25TVT=37.1;$c75TVT=88.4;
   $m50TVT=67;$m25TVT=37.1;$m75TVT=88.4;
    $y50TVT=67;$y25TVT=37.1;$y75TVT=88.4;
	 $k50TVT=67;$k25TVT=37.1;$k75TVT=88.4;
	 
	 $gLT=58; $g25LT=77; $g75LT=39;
 }
 
 elseif ($aim=='CRPC6' ) {
  $pl=95; $pa=1;$pb=-4;
  $cl=56; $ca=-37;$cb=-50;
  $ml=48; $ma=75;$mb=-4;
  $yl=89; $ya=-4;$yb=93;
  $kl=16; $ka=0.1;$kb=0.1; 
  
  $rl=47; $ra=68; $rb=48;
  $grl=50; $gra=-66; $grb=26;
  $bl=25; $ba=20; $bb=-46;
  
  $c50TVT=66;$c25TVT=37.1;$c75TVT=88;
   $m50TVT=66;$m25TVT=37.1;$m75TVT=88;
    $y50TVT=66;$y25TVT=37.1;$y75TVT=88;
	 $k50TVT=69;$k25TVT=41.1;$k75TVT=89;
	 
	 $gLT=58; $g25LT=77; $g75LT=39;
 }
 
 //echo "aim:".$aim."cl:".$cl;
 
 
 $chromeCT=pow((pow($ca,2)+pow($cb,2)),0.5);
$hueCT=atan2($cb,$ca);
$degCT = ($hueCT/M_PI*180) + ($hueCT > 0 ? 0 : 360);
//echo "<br>chrome:".$chromeCT;
//echo "<br>hue:".$degCT; 
 
  $chromeMT=pow((pow($ma,2)+pow($mb,2)),0.5);
$hueMT=atan2($mb,$ma);
$degMT = ($hueMT/M_PI*180) + ($hueMT > 0 ? 0 : 360);
//echo "<br>Mhrome:".$chromeMT;
//echo "<br>hue:".$degMT; 
 
  $chromeYT=pow((pow($ya,2)+pow($yb,2)),0.5);
$hueYT=atan2($yb,$ya);
$degYT = ($hueYT/M_PI*180) + ($hueYT > 0 ? 0 : 360);
//echo "<br>Yhrome:".$chromeYT;
//echo "<br>hue:".$degYT; 
 
  function getLg($tv,$kDyf,$PYf,$PL) {
 
 $tvik=1.31587*$tv-(2.21633*pow(10,-2)*pow($tv,2))+(1.32926*pow(10,-4)*pow($tv,3))-(4.288*pow(10,-7)*pow($tv,4));
 $Rr= 0.956649;
$YrTVk=1-($Rr*(($tv+$tvik)/100));

$Yck=pow((0.7+0.3*pow(($kDyf/$PYf),(1/3))),3);
$Rak=1-($kDyf/$PYf);

$Yck2=pow((0.7+0.3*pow((3.8/$PYf),(1/3))),3);
$Rak2=1-(3.8/$PYf);

if ($YrTVk>$Yck) { 
$npd= -log10($YrTVk);
$npd2= -log10($YrTVk);
${'npd'.$tv}=-log10($YrTVk);
}
else{
$npd=-log10($YrTVk-($Rak-$Rr)* pow((($Yck-$YrTVk)/($Yck-1+$Rr)),(($Rak/2)+1)));
$npd2=-log10($YrTVk-($Rak2-$Rr)* pow((($Yck2-$YrTVk)/($Yck2-1+$Rr)),(($Rak2/2)+1)));
} 

$NPSabs=$npd+log10(1/($PYf));
$Yabs= pow(10,$NPSabs);
//$ft=pow($Yabs,-1/3);
if ($Yabs>pow((6/29),3)) {
 $Lg=116*pow($Yabs,-1/3)-16;}
 else {
$Lg=(841/108)*$Yabs;
 }


 $GrayL=round(pow(10,(-$npd/3))*($PL+16)-16,3) ;
 $GrayL2=round(pow(10,(-$npd2/3))*($PL+16)-16,4) ;
// echo $tv."<br> GrayL2 :".$GrayL2."+GrayL:".$GrayL;
return $GrayL;
}


?>


<?php


 
  include 'DensityV38.php';
   include 'DensityV.php';
  




 $idx=8;
$cols=45; 

  //$cols=40;
  $k1dd=0;
  $Pdot=0;	
// echo "Paper X".$dotT[$idx+$cols*$Pdot+1]."<br>";

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

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

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

	$PLm=xyz2lab01("l",$PXm,$PYm,$PZm);
	$Pam=xyz2lab01("a",$PXm,$PYm,$PZm);
	$Pbm=xyz2lab01("b",$PXm,$PYm,$PZm);
	
	$Pdm=DensitySp38("K",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);




// echo "xyz x:".$PXm."_y:".$PYm."_z:".$PZm;	
// echo "dot-10:".$dotT[$idx+$cols*$Pdot+1]."_dot-40:".$dotT[$idx+$cols*$Pdot+31];
echo "<br>Paper: PL:".$PLm."_Pa:".$Pam."_Pb:".$Pbm."__Pdm:".$Pdm."__<br>";


  /////////////////////////////////c
  
	  $Pdot=1;	
	  
	
	   // echo "C X".$dotT[$idx+$cols*$Pdot+1]."<br>";
	$cXm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$clm=xyz2lab01("l",$cXm,$cYm,$cZm);
	$cam=xyz2lab01("a",$cXm,$cYm,$cZm);
	$cbm=xyz2lab01("b",$cXm,$cYm,$cZm);
	
	$cdm=DensitySp38("C",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

 
 
 
 
 //echo "note 2k: CL:".$clm."_Ca:".$cam."_Cb:".$cbm."__Pdm:".$cdm."__<br>";
  
 ///////////////////////////////////////////m
 
  $Pdot=2;	
  	    
		//	 echo "M X".$dotT[$idx+$cols*$Pdot+1]."<br>";
	$mXm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$mlm=xyz2lab01("l",$mXm,$mYm,$mZm);
	$mam=xyz2lab01("a",$mXm,$mYm,$mZm);
	$mbm=xyz2lab01("b",$mXm,$mYm,$mZm);
	
	$mdm=DensitySp38("M",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

	
 // echo "note 2k: ML:".$mLm."_Ma:".$mam."_Mb:".$mbm."__Mdm:".$mdm."__<br>";
   
    ///////////////////////////////////////////y
  $Pdot=3;	

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

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

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

	$ylm=xyz2lab01("l",$yXm,$yYm,$yZm);
	$yam=xyz2lab01("a",$yXm,$yYm,$yZm);
	$ybm=xyz2lab01("b",$yXm,$yYm,$yZm);
	
	$ydm=DensitySp38("Y",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
	
	
//  echo "note 2k: YL:".$yLm."_Ya:".$yam."_Yb:".$ybm."__Ydm:".$ydm."__<br>";
   
       ///////////////////////////////////////////k 
  $Pdot=4;	

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

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

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

	$klm=xyz2lab01("l",$kXm,$kYm,$kZm);
	$kam=xyz2lab01("a",$kXm,$kYm,$kZm);
	$kbm=xyz2lab01("b",$kXm,$kYm,$kZm);
	
	$kdm=DensitySp38("K",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

	
 // echo "note 2k: KL:".$kLm."_Ka:".$kam."_Kb:".$kbm."__Kdm:".$kdm."__<br>";
   
   
   ///////////////////////////////////////////R
  $Pdot=12;	
	$rXm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$rlm=xyz2lab01("l",$rXm,$rYm,$rZm);
	$ram=xyz2lab01("a",$rXm,$rYm,$rZm);
	$rbm=xyz2lab01("b",$rXm,$rYm,$rZm);
	
	$rdm=DensitySp38("Y",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

	
 // echo "note 2k: KL:".$kLm."_Ka:".$kam."_Kb:".$kbm."__Kdm:".$kdm."__<br>";
   
   
      ///////////////////////////////////////////G
  $Pdot=13;	

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

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

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

	$grlm=xyz2lab01("l",$grXm,$grYm,$grZm);
	$gram=xyz2lab01("a",$grXm,$grYm,$grZm);
	$grbm=xyz2lab01("b",$grXm,$grYm,$grZm);
	
	$grdm=DensitySp38("Y",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
	
	
 // echo "note 2k: KL:".$kLm."_Ka:".$kam."_Kb:".$kbm."__Kdm:".$kdm."__<br>";

 
   ///////////////////////////////////////////B
  $Pdot=14;	

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

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

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

	$blm=xyz2lab01("l",$bXm,$bYm,$bZm);
	$bam=xyz2lab01("a",$bXm,$bYm,$bZm);
	$bbm=xyz2lab01("b",$bXm,$bYm,$bZm);
	
	$bdm=DensitySp38("M",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);


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

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

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

	$gy100lm=xyz2lab01("l",$gy100Xm,$gy100Ym,$gy100Zm);
	$gy100am=xyz2lab01("a",$gy100Xm,$gy100Ym,$gy100Zm);
	$gy100bm=xyz2lab01("b",$gy100Xm,$gy100Ym,$gy100Zm);
	
	//echo "gy100lm:".$gy100lm.":".$dotT[$idx+$cols*$Pdot+1];
	
	$gy100dm=DensitySp38("K",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
//////TR15 L
/*
 $g25LT=round(getLg(25,$gy100Ym,$PYm,$PLm),2);
 $gLT=round(getLg(50,$gy100Ym,$PYm,$PLm),2);
 $g75LT=round(getLg(75,$gy100Ym,$PYm,$PLm),2);
 */
 
 
//$gLT=58.5; $g25LT=77; $g75LT=39;


	
 // echo "note 2k: KL:".$kLm."_Ka:".$kam."_Kb:".$kbm."__Kdm:".$kdm."__<br>"; 
 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////
//   //////////////////////////////////Beer's Law section///////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
   ////////////////sec K
	$ki=0.820;
	
	for ( $i = 1; $i <= 30; $i+= 1) {
	$Pdot=4;////K line
	//$dotT[$idx+$cols*$Pdot+1]
	$si=0;

	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dotT[$idx+$si+1];
	${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
	${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
	$si=$si+1;
	}
	
	$ki=$ki+0.015;

	${'k'.$i.'X'}=sp38XYZ("X",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	${'k'.$i.'Y'}=sp38XYZ("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);

	${'k'.$i.'Z'}=sp38XYZ("Z",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);	

	//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($k1Z,3)."<br>";
	
	${'k'.$i.'l'}=xyz2lab01("l",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
	${'k'.$i.'a'}=xyz2lab01("a",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
	${'k'.$i.'b'}=xyz2lab01("b",${'k'.$i.'X'},${'k'.$i.'Y'},${'k'.$i.'Z'});
	
	//echo "K1L=".round($k1l,3).",".round($k1a,3).",".round($k1b,3);
	${'k'.$i.'dd'}=DensitySp38("K",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	
	if ($i%5==0) {
	${'hexKa'.$i}=${'k'.$i.'a'};
	${'hexKb'.$i}=${'k'.$i.'b'};
	//echo "hex Ka=".${'hexKa'.$i};
	}
	
	//echo "K1D=".round(${'k'.$i.'dd'},3);


	
	if ($i%3==0) {
	${'hexKL'.$i}=${'k'.$i.'l'};	
	${'hexKa'.$i}=${'k'.$i.'a'};
	${'hexKb'.$i}=${'k'.$i.'b'};
	//echo "hex Ka=".${'hexKa'.$i};
	}
	////echo "<br>";

	//echo "K1D=".round(${'k'.$i.'dd'},3);
	}
	////echo "<br>";
//////////////////////sec C
$xhcmin=100;
$Huecmin=100;
$cmin=100;
$xhcmin0='';
$Huecmin0='';
$xhromeCT=$chromeCT;
$Huemmin0='';
$Huemmin0='';
$xhromeMT=$chromeMT;
$Hueymin0='';
$Hueymin0='';
$xhromeYT=$chromeYT;
$xhmmin0='';
$xhymin0='';

	$ki=0.820;
	for ( $i = 1; $i <= 30; $i+= 1) {
	$Pdot=1;////C line
	$si=0;
 
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dotT[$idx+$si+1];
	${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
	${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
	$si=$si+1;
	//echo "paper Sp:".${'p'.$s};
	}

	$ki=$ki+0.015;
	
	${'c'.$i.'X'}=sp38XYZ("X",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	${'c'.$i.'Y'}=sp38XYZ("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);

	${'c'.$i.'Z'}=sp38XYZ("Z",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);	

	//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($c1Z,3)."<br>";
	
	${'c'.$i.'l'}=xyz2lab01("l",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
	${'c'.$i.'a'}=xyz2lab01("a",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
	${'c'.$i.'b'}=xyz2lab01("b",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
	
	//echo "K1L=".round($c1l,3).",".round($c1a,3).",".round($c1b,3);
	${'c'.$i.'dd'}=DensitySp38("C",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	//echo "K1D=".round($k1dd,3);
		
	//echo "c1D=".round($c1dd,3);
	if ($i%3==0) {
	${'hexCL'.$i}=${'c'.$i.'l'};		
	${'hexCa'.$i}=${'c'.$i.'a'};
	${'hexCb'.$i}=${'c'.$i.'b'};
	
	${'xhromec'.$i}=pow((pow(${'c'.$i.'a'},2)+pow(${'c'.$i.'b'},2)),0.5);
	${'hue'.$i}=atan2(${'c'.$i.'b'},${'c'.$i.'a'});
	${'degc'.$i} = (${'hue'.$i}/M_PI*180) + (${'hue'.$i} > 0 ? 0 : 360);
	//echo "<br>xhromec:".${'xhromec'.$i}."_huec:".${'degc'.$i} ;
	//echo "<br>hex Ca Cb=".${'hexCa'.$i}."_".${'hexCb'.$i};
	 $xhcmin0=abs(${'xhromec'.$i}-$xhromeCT);
	 $xhcmin=min($xhcmin0,$xhcmin); 
	//echo "<br>xhcmin0:".$xhcmin0."xhcmin:".$xhcmin;
		 $Huecmin0=abs(${'degc'.$i}-$degCT);
	 $Huecmin=min($Huecmin0,$Huecmin); 
	//echo "<br>Huecmin:".$Huecmin;
	}

	$dc76=de00($cl,$ca,$cb,${"c".$i."l"},${"c".$i."a"},${"c".$i."b"});
	${"dc".$i."76"}=$dc76;
	$cmin=min($dc76,$cmin);
	
	//echo "<br>cmin:",$cmin;
	if ($dc76==$cmin){ 
	$copt=$i;$coptD=${"c".$i."dd"};$coptL=${"c".$i."l"};$copta=${"c".$i."a"};$coptb=${"c".$i."b"};
	//echo "<br>copt:",$copt;
	}
	
	if ($Huecmin0==$Huecmin){ 
	$coptH=$i;$coptHD=${"c".$i."dd"};$coptHL=${"c".$i."l"};$coptHa=${"c".$i."a"};$coptHb=${"c".$i."b"};
	//echo "<br>coptH:",$coptH."coptHL:",$coptHL;
	}
		if ($xhcmin0==$xhcmin){ 
	$coptX=$i;$coptXD=${"c".$i."dd"};$coptXL=${"c".$i."l"};$coptXa=${"c".$i."a"};$coptXb=${"c".$i."b"};
	//echo "<br>coptX:",$coptX;
	}
	
	}

//////////////////////////sec M
$xhmmin=100;
$Huemmin=100;
$mmin=100;
	$ki=0.820;
	
	for ( $i = 1; $i <= 30; $i+= 1) {
	$Pdot=2;////M line
	$si=0;

	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dotT[$idx+$si+1];
	${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
	${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
	$si=$si+1;
	}
	$ki=$ki+0.015;
	
	${'m'.$i.'X'}=sp38XYZ("X",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	${'m'.$i.'Y'}=sp38XYZ("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);

	${'m'.$i.'Z'}=sp38XYZ("Z",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);	

	//echo "KX1=".round($m1X,3).",".round($m1Y,3).",".round($m1Z,3)."<br>";
	
	${'m'.$i.'l'}=xyz2lab01("l",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
	${'m'.$i.'a'}=xyz2lab01("a",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
	${'m'.$i.'b'}=xyz2lab01("b",${'m'.$i.'X'},${'m'.$i.'Y'},${'m'.$i.'Z'});
	
	//echo "K1L=".round($m1l,3).",".round($m1a,3).",".round($m1b,3);
	${'m'.$i.'dd'}=DensitySp38("M",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	

	if ($i%3==0) {
	${'hexML'.$i}=${'m'.$i.'l'};		
	${'hexMa'.$i}=${'m'.$i.'a'};
	${'hexMb'.$i}=${'m'.$i.'b'};
	
	${'xhromem'.$i}=pow((pow(${'m'.$i.'a'},2)+pow(${'m'.$i.'b'},2)),0.5);
	${'hue'.$i}=atan2(${'m'.$i.'b'},${'m'.$i.'a'});
	${'degm'.$i} = (${'hue'.$i}/M_PI*180) + (${'hue'.$i} > 0 ? 0 : 360);
	//echo "<br>xhromem:".${'xhromem'.$i}."_huem:".${'degm'.$i} ;
	//emho "<br>hex Ma Mb=".${'hexMa'.$i}."_".${'hexMb'.$i};
	 $xhmmin0=abs(${'xhromem'.$i}-$xhromeMT);
	 $xhmmin=min($xhmmin0,$xhmmin); 
	//echo "<br>xhmmin:".$xhmmin;
		 $Huemmin0=abs(${'degm'.$i}-$degMT);
	 $Huemmin=min($Huemmin0,$Huemmin); 
	//echo "<br>Huemmin:".$Huemmin;
	}

	$dm76=de00($ml,$ma,$mb,${"m".$i."l"},${"m".$i."a"},${"m".$i."b"});
	${"dm".$i."76"}=$dm76;
	$mmin=min($dm76,$mmin);
	//echo "<br>mmin:",$mmin;
	if ($dm76==$mmin){ 
	$mopt=$i;$moptD=${"m".$i."dd"};$moptL=${"m".$i."l"};$mopta=${"m".$i."a"};$moptb=${"m".$i."b"};
	//echo "<br>mopt:",$mopt;
	}
		if ($Huemmin0==$Huemmin){ 
	$moptH=$i;$moptHD=${"m".$i."dd"};$moptHL=${"m".$i."l"};$moptHa=${"m".$i."a"};$moptHb=${"m".$i."b"};
	//echo "<br>moptH:",$moptH;
	}
	
		if ($xhmmin0==$xhmmin){ 
	$moptX=$i;$moptXD=${"m".$i."dd"};$moptXL=${"m".$i."l"};$moptXa=${"m".$i."a"};$moptXb=${"m".$i."b"};
	//echo "<br>moptX:",$moptX;
	}
	
	}
 ////echo "<br>";
///////////////////sec Y
$xhymin=100;
$Hueymin=100;
$ymin=100;
	$ki=0.880;
	for ( $i = 1; $i <= 30; $i+= 1) {
	$Pdot=3;////Y line
	$si=0;
 
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dotT[$idx+$si+1];//paper
	${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
	${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
	$si=$si+1;
	}

	$ki=$ki+0.015;
	
	${'y'.$i.'X'}=sp38XYZ("X",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	${'y'.$i.'Y'}=sp38XYZ("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);

	${'y'.$i.'Z'}=sp38XYZ("Z",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);	

	//echo "KX1=".round($y1X,3).",".round($y1Y,3).",".round($y1Z,3)."<br>";
	
	${'y'.$i.'l'}=xyz2lab01("l",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
	${'y'.$i.'a'}=xyz2lab01("a",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
	${'y'.$i.'b'}=xyz2lab01("b",${'y'.$i.'X'},${'y'.$i.'Y'},${'y'.$i.'Z'});
	
	//echo "K1L=".round($y1l,3).",".round($y1a,3).",".round($y1b,3);
	${'y'.$i.'dd'}=DensitySp38("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	//echo "K1D=".round($k1dd,3);

	if ($i%3==0) {
	${'hexYL'.$i}=${'y'.$i.'l'};		
	${'hexYa'.$i}=${'y'.$i.'a'};
	${'hexYb'.$i}=${'y'.$i.'b'};
	
	${'xhromey'.$i}=pow((pow(${'y'.$i.'a'},2)+pow(${'y'.$i.'b'},2)),0.5);
	${'hue'.$i}=atan2(${'y'.$i.'b'},${'y'.$i.'a'});
	${'degy'.$i} = (${'hue'.$i}/M_PI*180) + (${'hue'.$i} > 0 ? 0 : 360);
	//eyho "<br>xhromey:".${'xhromey'.$i}."_huey:".${'degy'.$i} ;
	//eyho "<br>hex Ya Yb=".${'hexYa'.$i}."_".${'hexYb'.$i};
	 $xhymin0=abs(${'xhromey'.$i}-$xhromeYT);
	 $xhymin=min($xhymin0,$xhymin); 
	//echo "<br>xhymin:".$xhymin;
		 $Hueymin0=abs(${'degy'.$i}-$degYT);
	 $Hueymin=min($Hueymin0,$Hueymin); 
	//echo "<br>Hueymin:".$Hueymin;
	}

	$dy76=de00($yl,$ya,$yb,${"y".$i."l"},${"y".$i."a"},${"y".$i."b"});
	${"dy".$i."76"}=$dy76;
	$ymin=min($dy76,$ymin);
	//echo "<br>ymin:",$ymin;
	if ($dy76==$ymin){ 
	$yopt=$i;$yoptD=${"y".$i."dd"};$yoptL=${"y".$i."l"};$yopta=${"y".$i."a"};$yoptb=${"y".$i."b"};
	//echo "<br>yopt:",$yopt;
	}
	
	if ($Hueymin0==$Hueymin){ 
	$yoptH=$i;$yoptHD=${"y".$i."dd"};$yoptHL=${"y".$i."l"};$yoptHa=${"y".$i."a"};$yoptHb=${"y".$i."b"};
	//echo "<br>yoptH:",$yoptH;
	}
	
	if ($xhymin0==$xhymin){ 
	$yoptX=$i;$yoptXD=${"y".$i."dd"};$yoptXL=${"y".$i."l"};$yoptXa=${"y".$i."a"};$yoptXb=${"y".$i."b"};
	//echo "<br>yoptX:",$yoptX;
	}
	
  // echo "y1D=".round(${'y'.$i.'dd'},3);
   }
   
   
   ////////////////sec R

	$ki=0.880;
	
	for ( $i = 1; $i <= 30; $i+= 1) {
	$Pdot=12;////R line
	$si=0;
	 
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dotT[$idx+$si+1];
	${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
	${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
	$si=$si+1;
	//echo "paper Sp380:".${'p'.$s};
	}

	
	$ki=$ki+0.015;
	  
	${'r'.$i.'X'}=sp38XYZ("X",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	${'r'.$i.'Y'}=sp38XYZ("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);

	${'r'.$i.'Z'}=sp38XYZ("Z",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);	

	//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($k1Z,3)."<br>";
	
	${'r'.$i.'l'}=xyz2lab01("l",${'r'.$i.'X'},${'r'.$i.'Y'},${'r'.$i.'Z'});
	${'r'.$i.'a'}=xyz2lab01("a",${'r'.$i.'X'},${'r'.$i.'Y'},${'r'.$i.'Z'});
	${'r'.$i.'b'}=xyz2lab01("b",${'r'.$i.'X'},${'r'.$i.'Y'},${'r'.$i.'Z'});
	
	//echo "K1L=".round($k1l,3).",".round($k1a,3).",".round($k1b,3);
	${'r'.$i.'dd'}=DensitySp38("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	//echo "K1D=".round(${'k'.$i.'dd'},3);
	

			if ($i%5==0) {
	${'hexRa'.$i}=${'r'.$i.'a'};
	${'hexRb'.$i}=${'r'.$i.'b'};
	//echo "hex Ra Rb=".${'hexRa'.$i}."_".${'hexRb'.$i};
	}
	//echo "r1D=".round(${'r'.$i.'dd'},3);
	//echo "r1L=".round(${'r'.$i.'l'},3);
	}
	////echo "<br>";
	
	
/////////////////////Sec G	
  ////////////////sec G

	$ki=0.880;
	
	for ( $i = 1; $i <= 30; $i+= 1) {
	$Pdot=13;////G line
	$si=0;
	 
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dotT[$idx+$si+1];
	${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
	${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
	$si=$si+1;
	//echo "paper Sp380:".${'p'.$s};
	}

	
	$ki=$ki+0.015;
	  
	${'gr'.$i.'X'}=sp38XYZ("X",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	${'gr'.$i.'Y'}=sp38XYZ("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);

	${'gr'.$i.'Z'}=sp38XYZ("Z",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);	

	//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($k1Z,3)."<br>";
	
	${'gr'.$i.'l'}=xyz2lab01("l",${'gr'.$i.'X'},${'gr'.$i.'Y'},${'gr'.$i.'Z'});
	${'gr'.$i.'a'}=xyz2lab01("a",${'gr'.$i.'X'},${'gr'.$i.'Y'},${'gr'.$i.'Z'});
	${'gr'.$i.'b'}=xyz2lab01("b",${'gr'.$i.'X'},${'gr'.$i.'Y'},${'gr'.$i.'Z'});
	
	//echo "K1L=".round($k1l,3).",".round($k1a,3).",".round($k1b,3);
	${'gr'.$i.'dd'}=DensitySp38("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	//echo "K1D=".round(${'k'.$i.'dd'},3);
	
			if ($i%5==0) {
	${'hexGRa'.$i}=${'gr'.$i.'a'};
	${'hexGRb'.$i}=${'gr'.$i.'b'};
	//echo "hex GRa GRb=".${'hexGRa'.$i}."_".${'hexGRb'.$i};
	}
	//echo "Gr1D=".round(${'gr'.$i.'dd'},3);
	//echo "r1L=".round(${'r'.$i.'l'},3);
	}
	////echo "<br>";
	
	  ////////////////sec B

	$ki=0.820;
	
	for ( $i = 1; $i <= 30; $i+= 1) {
	$Pdot=14;////G line
	$si=0;
	 
	for ($s=380; $s<=730; $s+=10) {
	${'p'.$s}=$dotT[$idx+$si+1];
	${'m'.$s}=$dotT[$idx+$cols*$Pdot+$si+1];
	${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
	$si=$si+1;
	
	//echo "paper Sp380:".${'p'.$s};
	}

	
	$ki=$ki+0.015;
	  
	${'b'.$i.'X'}=sp38XYZ("X",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	${'b'.$i.'Y'}=sp38XYZ("Y",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);

	${'b'.$i.'Z'}=sp38XYZ("Z",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);	

	//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($k1Z,3)."<br>";
	
	${'b'.$i.'l'}=xyz2lab01("l",${'b'.$i.'X'},${'b'.$i.'Y'},${'b'.$i.'Z'});
	${'b'.$i.'a'}=xyz2lab01("a",${'b'.$i.'X'},${'b'.$i.'Y'},${'b'.$i.'Z'});
	${'b'.$i.'b'}=xyz2lab01("b",${'b'.$i.'X'},${'b'.$i.'Y'},${'b'.$i.'Z'});
	
	//echo "K1L=".round($k1l,3).",".round($k1a,3).",".round($k1b,3);
	${'b'.$i.'dd'}=DensitySp38("M",$r380,	$r390,	$r400,	$r410,	$r420,	$r430,	$r440,	$r450,	$r460,	$r470,	$r480,	$r490,	$r500,	$r510,	$r520,	$r530,	$r540,	$r550,	$r560,	$r570,	$r580,	$r590,	$r600,	$r610,	$r620,	$r630,	$r640,	$r650,	$r660,	$r670,	$r680,	$r690,	$r700,	$r710,	$r720,	$r730);
	//echo "K1D=".round(${'k'.$i.'dd'},3);
	
			if ($i%5==0) {
	${'hexBa'.$i}=${'b'.$i.'a'};
	${'hexBb'.$i}=${'b'.$i.'b'};
	//echo "hex Ba Bb=".${'hexBa'.$i}."_".${'hexBb'.$i};
	}
	//echo "Gr1D=".round(${'gr'.$i.'dd'},3);
	//echo "r1L=".round(${'r'.$i.'l'},3);
	}
	////echo "<br>";
	
	
	
   //////////////////////////////////Beer's Law section
   //////////////////////////////////////////////////////
 











/*function de00($l1,$a1,$b1,$l2,$a2,$b2) {
  $d76=sqrt(pow(($l1-$l2),2)+ pow(($a1-$a2),2)+pow(($b1-$b2),2));
  return round($d76,2);
}
*/
////////////////////////////de00////////////////////

	# ------- The graph values in the form of associative array
	

///////////////////////////////de00////////////////////// 
 $tt00=de00(55,-37,-50,54.3,-34.47,-52.63);
 $dek00=de00($kl,$ka,$kb,$klm,$kam,$kbm);
 $dec00=de00($cl,$ca,$cb,$clm,$cam,$cbm);
 $dem00=de00($ml,$ma,$mb,$mlm,$mam,$mbm);
 $dey00=de00($yl,$ya,$yb,$ylm,$yam,$ybm);
 
 $der00=de00($rl,$ra,$rb,$rlm,$ram,$rbm);
 $degr00=de00($grl,$gra,$grb,$grlm,$gram,$grbm);
 $deb00=de00($bl,$ba,$bb,$blm,$bam,$bbm);
 
 
 

  $dk176=de00($kl,$ka,$kb,$k1l,$k1a,$k1b);
  $dk276=de00($kl,$ka,$kb,$k2l,$k2a,$k2b);
  $dk376=de00($kl,$ka,$kb,$k3l,$k3a,$k3b);
  $dk476=de00($kl,$ka,$kb,$k4l,$k4a,$k4b);
  $dk576=de00($kl,$ka,$kb,$k5l,$k5a,$k5b);
  $dk676=de00($kl,$ka,$kb,$k6l,$k6a,$k6b);
  $dk776=de00($kl,$ka,$kb,$k7l,$k7a,$k7b);
  $dk876=de00($kl,$ka,$kb,$k8l,$k8a,$k8b);
  $dk976=de00($kl,$ka,$kb,$k9l,$k9a,$k9b);
  $dk1076=de00($kl,$ka,$kb,$k10l,$k10a,$k10b);
  $dk1176=de00($kl,$ka,$kb,$k11l,$k11a,$k11b);
  $dk1276=de00($kl,$ka,$kb,$k12l,$k12a,$k12b);
  $dk1376=de00($kl,$ka,$kb,$k13l,$k13a,$k13b);
  $dk1476=de00($kl,$ka,$kb,$k14l,$k14a,$k14b);
  $dk1576=de00($kl,$ka,$kb,$k15l,$k15a,$k15b);
  $dk1676=de00($kl,$ka,$kb,$k16l,$k16a,$k16b);
  $dk1776=de00($kl,$ka,$kb,$k17l,$k17a,$k17b);
  $dk1876=de00($kl,$ka,$kb,$k18l,$k18a,$k18b);
  $dk1976=de00($kl,$ka,$kb,$k19l,$k19a,$k19b);
  $dk2076=de00($kl,$ka,$kb,$k20l,$k20a,$k20b);
  $dk2176=de00($kl,$ka,$kb,$k21l,$k21a,$k21b);
  $dk2276=de00($kl,$ka,$kb,$k22l,$k22a,$k22b);
  $dk2376=de00($kl,$ka,$kb,$k23l,$k23a,$k23b);
  $dk2476=de00($kl,$ka,$kb,$k24l,$k24a,$k24b);
  $dk2576=de00($kl,$ka,$kb,$k25l,$k25a,$k25b);
  $dk2676=de00($kl,$ka,$kb,$k26l,$k26a,$k26b);
  $dk2776=de00($kl,$ka,$kb,$k27l,$k27a,$k27b);
  $dk2876=de00($kl,$ka,$kb,$k28l,$k28a,$k28b);
  $dk2976=de00($kl,$ka,$kb,$k29l,$k29a,$k29b);
  $dk3076=de00($kl,$ka,$kb,$k30l,$k30a,$k30b);
  $kmin=min($dk176,$dk276,$dk376,$dk476,$dk576,$dk676,$dk776,$dk876,$dk976,$dk1076,$dk1176,$dk1276,$dk1376,$dk1476,$dk1576,$dk1676,$dk1776,$dk1876,$dk1976,$dk2076,$dk2176,$dk2276,$dk2376,$dk2476,$dk2576,$dk2676,$dk2776,$dk2876,$dk2976,$dk3076);
  
  
 // $dk194=de94($kl,$ka,$kb,$k1l,$k1a,$k1b);
  
//echo "<br>Line 1020";
  ?>





<?php if ($dk176==$kmin){ $kopt='1';$koptD=$k1dd;$koptL=$k1l;$kopta=$k1a;$koptb=$k1b;}?>
<?php if ($dk276==$kmin){ $kopt='2';$koptD=$k2dd;$koptL=$k2l;$kopta=$k2a;$koptb=$k2b;}?>
<?php if ($dk376==$kmin){ $kopt='3';$koptD=$k3dd;$koptL=$k3l;$kopta=$k3a;$koptb=$k3b;}?>
<?php if ($dk476==$kmin){ $kopt='4';$koptD=$k4dd;$koptL=$k4l;$kopta=$k4a;$koptb=$k4b;}?>
<?php if ($dk576==$kmin){ $kopt='5';$koptD=$k5dd;$koptL=$k5l;$kopta=$k5a;$koptb=$k5b;}?>
<?php if ($dk676==$kmin){ $kopt='6';$koptD=$k6dd;$koptL=$k6l;$kopta=$k6a;$koptb=$k6b;}?>
<?php  if ($dk776==$kmin){ $kopt='7';$koptD=$k7dd;$koptL=$k7l;$kopta=$k7a;$koptb=$k7b;}?>
<?php if ($dk876==$kmin){ $kopt='8';$koptD=$k8dd;$koptL=$k8l;$kopta=$k8a;$koptb=$k8b; }?>
<?php if ($dk976==$kmin){ $kopt='9';$koptD=$k9dd;$koptL=$k9l;$kopta=$k9a;$koptb=$k9b;}?>
<?php if ($dk1076==$kmin){ $kopt='10';$koptD=$k10dd;$koptL=$k10l;$kopta=$k10a;$koptb=$k10b;}?>
<?php if ($dk1176==$kmin){ $kopt='11';$koptD=$k11dd;$koptL=$k11l;$kopta=$k11a;$koptb=$k11b;}?>
<?php if ($dk1276==$kmin){ $kopt='12';$koptD=$k12dd;$koptL=$k12l;$kopta=$k12a;$koptb=$k12b;}?>
<?php if ($dk1376==$kmin){ $kopt='13';$koptD=$k13dd;$koptL=$k13l;$kopta=$k13a;$koptb=$k13b;}?>
<?php if ($dk1476==$kmin){ $kopt='14';$koptD=$k14dd;$koptL=$k14l;$kopta=$k14a;$koptb=$k14b;}?>
<?php  if ($dk1576==$kmin){ $kopt='15';$koptD=$k15dd;$koptL=$k15l;$kopta=$k15a;$koptb=$k15b;}?>
<?php if ($dk1676==$kmin){ $kopt='16';$koptD=$k16dd;$koptL=$k16l;$kopta=$k16a;$koptb=$k16b;}?>
<?php if ($dk1776==$kmin){ $kopt='17';$koptD=$k17dd;$koptL=$k17l;$kopta=$k17a;$koptb=$k17b;}?>
<?php if ($dk1876==$kmin){ $kopt='18';$koptD=$k18dd;$koptL=$k18l;$kopta=$k18a;$koptb=$k18b;}?>
<?php if ($dk1976==$kmin){ $kopt='19';$koptD=$k19dd;$koptL=$k19l;$kopta=$k19a;$koptb=$k19b;}?>
<?php if ($dk2076==$kmin){ $kopt='20';$koptD=$k20dd;$koptL=$k20l;$kopta=$k20a;$koptb=$k20b;}?>
<?php if ($dk2176==$kmin){ $kopt='21';$koptD=$k21dd;$koptL=$k21l;$kopta=$k21a;$koptb=$k21b;}?>
<?php if ($dk2276==$kmin){ $kopt='22';$koptD=$k22dd;$koptL=$k22l;$kopta=$k22a;$koptb=$k22b;}?>
<?php if ($dk2376==$kmin){ $kopt='23';$koptD=$k23dd;$koptL=$k23l;$kopta=$k23a;$koptb=$k23b;}?>
<?php if ($dk2476==$kmin){ $kopt='24';$koptD=$k24dd;$koptL=$k24l;$kopta=$k24a;$koptb=$k24b;}?>
<?php if ($dk2576==$kmin){ $kopt='25';$koptD=$k25dd;$koptL=$k25l;$kopta=$k25a;$koptb=$k25b;}?>
<?php if ($dk2676==$kmin){ $kopt='26';$koptD=$k26dd;$koptL=$k26l;$kopta=$k26a;$koptb=$k26b;}?>
<?php if ($dk2776==$kmin){ $kopt='27';$koptD=$k27dd;$koptL=$k27l;$kopta=$k27a;$koptb=$k27b;}?>
<?php if ($dk2876==$kmin){ $kopt='28';$koptD=$k28dd;$koptL=$k28l;$kopta=$k28a;$koptb=$k28b;}?>
<?php if ($dk2976==$kmin){ $kopt='29';$koptD=$k29dd;$koptL=$k29l;$kopta=$k29a;$koptb=$k29b;}?>
<?php  if ($dk3076==$kmin){ $kopt='30';$koptD=$k30dd;$koptL=$k30l;$kopta=$k30a;$koptb=$k30b;} 








///////////////////////////////sec R
//echo "<br>Line 1266";
$dr176=de00($rl,$ra,$rb,$r1l,$r1a,$r1b);
  $dr276=de00($rl,$ra,$rb,$r2l,$r2a,$r2b);
  $dr376=de00($rl,$ra,$rb,$r3l,$r3a,$r3b);
  $dr476=de00($rl,$ra,$rb,$r4l,$r4a,$r4b);
  $dr576=de00($rl,$ra,$rb,$r5l,$r5a,$r5b);
  $dr676=de00($rl,$ra,$rb,$r6l,$r6a,$r6b);
  $dr776=de00($rl,$ra,$rb,$r7l,$r7a,$r7b);
  $dr876=de00($rl,$ra,$rb,$r8l,$r8a,$r8b);
  $dr976=de00($rl,$ra,$rb,$r9l,$r9a,$r9b);
  $dr1076=de00($rl,$ra,$rb,$r10l,$r10a,$r10b);
  $dr1176=de00($rl,$ra,$rb,$r11l,$r11a,$r11b);
  $dr1276=de00($rl,$ra,$rb,$r12l,$r12a,$r12b);
  $dr1376=de00($rl,$ra,$rb,$r13l,$r13a,$r13b);
  $dr1476=de00($rl,$ra,$rb,$r14l,$r14a,$r14b);
  $dr1576=de00($rl,$ra,$rb,$r15l,$r15a,$r15b);
  $dr1676=de00($rl,$ra,$rb,$r16l,$r16a,$r16b);
  $dr1776=de00($rl,$ra,$rb,$r17l,$r17a,$r17b);
  $dr1876=de00($rl,$ra,$rb,$r18l,$r18a,$r18b);
  $dr1976=de00($rl,$ra,$rb,$r19l,$r19a,$r19b);
  $dr2076=de00($rl,$ra,$rb,$r20l,$r20a,$r20b);
  $dr2176=de00($rl,$ra,$rb,$r21l,$r21a,$r21b);
  $dr2276=de00($rl,$ra,$rb,$r22l,$r22a,$r22b);
  $dr2376=de00($rl,$ra,$rb,$r23l,$r23a,$r23b);
  $dr2476=de00($rl,$ra,$rb,$r24l,$r24a,$r24b);
  $dr2576=de00($rl,$ra,$rb,$r25l,$r25a,$r25b);
  $dr2676=de00($rl,$ra,$rb,$r26l,$r26a,$r26b);
  $dr2776=de00($rl,$ra,$rb,$r27l,$r27a,$r27b);
  $dr2876=de00($rl,$ra,$rb,$r28l,$r28a,$r28b);
  $dr2976=de00($rl,$ra,$rb,$r29l,$r29a,$r29b);
  $dr3076=de00($rl,$ra,$rb,$r30l,$r30a,$r30b);
  $rmin=min($dr176,$dr276,$dr376,$dr476,$dr576,$dr676,$dr776,$dr876,$dr976,$dr1076,$dr1176,$dr1276,$dr1376,$dr1476,$dr1576,$dr1676,$dr1776,$dr1876,$dr1976,$dr2076,$dr2176,$dr2276,$dr2376,$dr2476,$dr2576,$dr2676,$dr2776,$dr2876,$dr2976,$dr3076);
  
  
  //$dm194=de94($ml,$ma,$mb,$m1l,$m1a,$m1b);
  

  ?>


<?php if ($dr176==$rmin){ $ropt='1';$roptD=$r1dd;if ($r1a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr276==$rmin){ $ropt='2';$roptD=$r2dd;if ($r2a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr376==$rmin){ $ropt='3';$roptD=$r3dd;if ($r3a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr476==$rmin){ $ropt='4';$roptD=$r4dd;if ($r4a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr576==$rmin){ $ropt='5';$roptD=$r5dd;if ($r5a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr676==$rmin){ $ropt='6';$roptD=$r6dd;if ($r6a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr776==$rmin){ $ropt='7';$roptD=$r7dd;if ($r7a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr876==$rmin){ $ropt='8';$roptD=$r8dd; if ($r8a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr976==$rmin){ $ropt='9';$roptD=$r9dd;if ($r9a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr1076==$rmin){ $ropt='10';$roptD=$r10dd;if ($r10a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr1176==$rmin){ $ropt='11';$roptD=$r11dd;if ($r11a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr1276==$rmin){ $ropt='12';$roptD=$r12dd;if ($r12a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr1376==$rmin){ $ropt='13';$roptD=$r13dd;if ($r13a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr1476==$rmin){ $ropt='14';$roptD=$r14dd;if ($r14a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php  if ($dr1576==$rmin){ $ropt='15';$roptD=$r15dd;if ($r15a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr1676==$rmin){ $ropt='16';$roptD=$r16dd;if ($r16a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr1776==$rmin){ $ropt='17';$roptD=$r17dd;if ($r17a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr1876==$rmin){ $ropt='18';$roptD=$r18dd;if ($r18a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr1976==$rmin){ $ropt='19';$roptD=$r19dd;if ($r19a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr2076==$rmin){ $ropt='20';$roptD=$r20dd;if ($r20a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr2176==$rmin){ $ropt='21';$roptD=$r21dd;if ($r21a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr2276==$rmin){ $ropt='22';$roptD=$r22dd;if ($r22a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php  if ($dr2376==$rmin){ $ropt='23';$roptD=$r23dd;if ($r23a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr2476==$rmin){ $ropt='24';$roptD=$r24dd;if ($r24a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr2576==$rmin){ $ropt='25';$roptD=$r25dd;if ($r25a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr2676==$rmin){ $ropt='26';$roptD=$r26dd;if ($r26a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr2776==$rmin){ $ropt='27';$roptD=$r27dd;if ($r27a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr2876==$rmin){ $ropt='28';$roptD=$r28dd;if ($r28a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php if ($dr2976==$rmin){ $ropt='29';$roptD=$r29dd;if ($r29a>74) {$rdi="-";} else {$rdi='+';}}?>
<?php  if ($dr3076==$rmin){ $ropt='30';$roptD=$r30dd;if ($r30a>74) {$rdi="-";} else {$rdi='+';}}?>


<?php ///////////////////////////////sec G
$dgr176=de00($grl,$gra,$grb,$gr1l,$gr1a,$gr1b);
  $dgr276=de00($grl,$gra,$grb,$gr2l,$gr2a,$gr2b);
  $dgr376=de00($grl,$gra,$grb,$gr3l,$gr3a,$gr3b);
  $dgr476=de00($grl,$gra,$grb,$gr4l,$gr4a,$gr4b);
  $dgr576=de00($grl,$gra,$grb,$gr5l,$gr5a,$gr5b);
  $dgr676=de00($grl,$gra,$grb,$gr6l,$gr6a,$gr6b);
  $dgr776=de00($grl,$gra,$grb,$gr7l,$gr7a,$gr7b);
  $dgr876=de00($grl,$gra,$grb,$gr8l,$gr8a,$gr8b);
  $dgr976=de00($grl,$gra,$grb,$gr9l,$gr9a,$gr9b);
  $dgr1076=de00($grl,$gra,$grb,$gr10l,$gr10a,$gr10b);
  $dgr1176=de00($grl,$gra,$grb,$gr11l,$gr11a,$gr11b);
  $dgr1276=de00($grl,$gra,$grb,$gr12l,$gr12a,$gr12b);
  $dgr1376=de00($grl,$gra,$grb,$gr13l,$gr13a,$gr13b);
  $dgr1476=de00($grl,$gra,$grb,$gr14l,$gr14a,$gr14b);
  $dgr1576=de00($grl,$gra,$grb,$gr15l,$gr15a,$gr15b);
  $dgr1676=de00($grl,$gra,$grb,$gr16l,$gr16a,$gr16b);
  $dgr1776=de00($grl,$gra,$grb,$gr17l,$gr17a,$gr17b);
  $dgr1876=de00($grl,$gra,$grb,$gr18l,$gr18a,$gr18b);
  $dgr1976=de00($grl,$gra,$grb,$gr19l,$gr19a,$gr19b);
  $dgr2076=de00($grl,$gra,$grb,$gr20l,$gr20a,$gr20b);
  $dgr2176=de00($grl,$gra,$grb,$gr21l,$gr21a,$gr21b);
  $dgr2276=de00($grl,$gra,$grb,$gr22l,$gr22a,$gr22b);
  $dgr2376=de00($grl,$gra,$grb,$gr23l,$gr23a,$gr23b);
  $dgr2476=de00($grl,$gra,$grb,$gr24l,$gr24a,$gr24b);
  $dgr2576=de00($grl,$gra,$grb,$gr25l,$gr25a,$gr25b);
  $dgr2676=de00($grl,$gra,$grb,$gr26l,$gr26a,$gr26b);
  $dgr2776=de00($grl,$gra,$grb,$gr27l,$gr27a,$gr27b);
  $dgr2876=de00($grl,$gra,$grb,$gr28l,$gr28a,$gr28b);
  $dgr2976=de00($grl,$gra,$grb,$gr29l,$gr29a,$gr29b);
  $dgr3076=de00($grl,$gra,$grb,$gr30l,$gr30a,$gr30b);
  $grmin=min($dgr176,$dgr276,$dgr376,$dgr476,$dgr576,$dgr676,$dgr776,$dgr876,$dgr976,$dgr1076,$dgr1176,$dgr1276,$dgr1376,$dgr1476,$dgr1576,$dgr1676,$dgr1776,$dgr1876,$dgr1976,$dgr2076,$dgr2176,$dgr2276,$dgr2376,$dgr2476,$dgr2576,$dgr2676,$dgr2776,$dgr2876,$dgr2976,$dgr3076);
  
  
  //$dm194=de94($ml,$ma,$mb,$m1l,$m1a,$m1b);
  

  ?>


<?php if ($dgr176==$grmin){ $gropt='1';$groptD=$gr1dd;if ($gr1a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr276==$grmin){ $gropt='2';$groptD=$gr2dd;if ($gr2a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr376==$grmin){ $gropt='3';$groptD=$gr3dd;if ($gr3a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr476==$grmin){ $gropt='4';$groptD=$gr4dd;if ($gr4a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr576==$grmin){ $gropt='5';$groptD=$gr5dd;if ($gr5a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr676==$grmin){ $gropt='6';$groptD=$gr6dd;if ($gr6a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr776==$grmin){ $gropt='7';$groptD=$gr7dd;if ($gr7a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr876==$grmin){ $gropt='8';$groptD=$gr8dd; if ($gr8a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr976==$grmin){ $gropt='9';$groptD=$gr9dd;if ($gr9a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr1076==$grmin){ $gropt='10';$groptD=$gr10dd;if ($gr10a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr1176==$grmin){ $gropt='11';$groptD=$gr11dd;if ($gr11a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr1276==$grmin){ $gropt='12';$groptD=$gr12dd;if ($gr12a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr1376==$grmin){ $gropt='13';$groptD=$gr13dd;if ($gr13a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr1476==$grmin){ $gropt='14';$groptD=$gr14dd;if ($gr14a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php  if ($dgr1576==$grmin){ $gropt='15';$groptD=$gr15dd;if ($gr15a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr1676==$grmin){ $gropt='16';$groptD=$gr16dd;if ($gr16a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr1776==$grmin){ $gropt='17';$groptD=$gr17dd;if ($gr17a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr1876==$grmin){ $gropt='18';$groptD=$gr18dd;if ($gr18a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr1976==$grmin){ $gropt='19';$groptD=$gr19dd;if ($gr19a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr2076==$grmin){ $gropt='20';$groptD=$gr20dd;if ($gr20a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr2176==$grmin){ $gropt='21';$groptD=$gr21dd;if ($gr21a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr2276==$grmin){ $gropt='22';$groptD=$gr22dd;if ($gr22a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php  if ($dgr2376==$grmin){ $gropt='23';$groptD=$gr23dd;if ($gr23a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr2476==$grmin){ $gropt='24';$groptD=$gr24dd;if ($gr24a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr2576==$grmin){ $gropt='25';$groptD=$gr25dd;if ($gr25a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr2676==$grmin){ $gropt='26';$groptD=$gr26dd;if ($gr26a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr2776==$grmin){ $gropt='27';$groptD=$gr27dd;if ($gr27a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr2876==$grmin){ $gropt='28';$groptD=$gr28dd;if ($gr28a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php if ($dgr2976==$grmin){ $gropt='29';$groptD=$gr29dd;if ($gr29a>74) {$grdi="-";} else {$grdi='+';}}?>
<?php  if ($dgr3076==$grmin){ $gropt='30';$groptD=$gr30dd;if ($gr30a>74) {$grdi="-";} else {$grdi='+';}}?>

<?php ///////////////////////////////sec B
//echo "<br>Line 1410";
$db176=de00($bl,$ba,$bb,$b1l,$b1a,$b1b);
  $db276=de00($bl,$ba,$bb,$b2l,$b2a,$b2b);
  $db376=de00($bl,$ba,$bb,$b3l,$b3a,$b3b);
  $db476=de00($bl,$ba,$bb,$b4l,$b4a,$b4b);
  $db576=de00($bl,$ba,$bb,$b5l,$b5a,$b5b);
  $db676=de00($bl,$ba,$bb,$b6l,$b6a,$b6b);
  $db776=de00($bl,$ba,$bb,$b7l,$b7a,$b7b);
  $db876=de00($bl,$ba,$bb,$b8l,$b8a,$b8b);
  $db976=de00($bl,$ba,$bb,$b9l,$b9a,$b9b);
  $db1076=de00($bl,$ba,$bb,$b10l,$b10a,$b10b);
  $db1176=de00($bl,$ba,$bb,$b11l,$b11a,$b11b);
  $db1276=de00($bl,$ba,$bb,$b12l,$b12a,$b12b);
  $db1376=de00($bl,$ba,$bb,$b13l,$b13a,$b13b);
  $db1476=de00($bl,$ba,$bb,$b14l,$b14a,$b14b);
  $db1576=de00($bl,$ba,$bb,$b15l,$b15a,$b15b);
  $db1676=de00($bl,$ba,$bb,$b16l,$b16a,$b16b);
  $db1776=de00($bl,$ba,$bb,$b17l,$b17a,$b17b);
  $db1876=de00($bl,$ba,$bb,$b18l,$b18a,$b18b);
  $db1976=de00($bl,$ba,$bb,$b19l,$b19a,$b19b);
  $db2076=de00($bl,$ba,$bb,$b20l,$b20a,$b20b);
  $db2176=de00($bl,$ba,$bb,$b21l,$b21a,$b21b);
  $db2276=de00($bl,$ba,$bb,$b22l,$b22a,$b22b);
  $db2376=de00($bl,$ba,$bb,$b23l,$b23a,$b23b);
  $db2476=de00($bl,$ba,$bb,$b24l,$b24a,$b24b);
  $db2576=de00($bl,$ba,$bb,$b25l,$b25a,$b25b);
  $db2676=de00($bl,$ba,$bb,$b26l,$b26a,$b26b);
  $db2776=de00($bl,$ba,$bb,$b27l,$b27a,$b27b);
  $db2876=de00($bl,$ba,$bb,$b28l,$b28a,$b28b);
  $db2976=de00($bl,$ba,$bb,$b29l,$b29a,$b29b);
  $db3076=de00($bl,$ba,$bb,$b30l,$b30a,$b30b);
  $bmin=min($db176,$db276,$db376,$db476,$db576,$db676,$db776,$db876,$db976,$db1076,$db1176,$db1276,$db1376,$db1476,$db1576,$db1676,$db1776,$db1876,$db1976,$db2076,$db2176,$db2276,$db2376,$db2476,$db2576,$db2676,$db2776,$db2876,$db2976,$db3076);
  
  
  //$dm194=de94($ml,$ma,$mb,$m1l,$m1a,$m1b);
  

  ?>


<?php if ($db176==$bmin){ $bopt='1';$boptD=$b1dd;if ($b1a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db276==$bmin){ $bopt='2';$boptD=$b2dd;if ($b2a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db376==$bmin){ $bopt='3';$boptD=$b3dd;if ($b3a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db476==$bmin){ $bopt='4';$boptD=$b4dd;if ($b4a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db576==$bmin){ $bopt='5';$boptD=$b5dd;if ($b5a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db676==$bmin){ $bopt='6';$boptD=$b6dd;if ($b6a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db776==$bmin){ $bopt='7';$boptD=$b7dd;if ($b7a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db876==$bmin){ $bopt='8';$boptD=$b8dd; if ($b8a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db976==$bmin){ $bopt='9';$boptD=$b9dd;if ($b9a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db1076==$bmin){ $bopt='10';$boptD=$b10dd;if ($b10a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db1176==$bmin){ $bopt='11';$boptD=$b11dd;if ($b11a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db1276==$bmin){ $bopt='12';$boptD=$b12dd;if ($b12a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db1376==$bmin){ $bopt='13';$boptD=$b13dd;if ($b13a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db1476==$bmin){ $bopt='14';$boptD=$b14dd;if ($b14a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php  if ($db1576==$bmin){ $bopt='15';$boptD=$b15dd;if ($b15a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db1676==$bmin){ $bopt='16';$boptD=$b16dd;if ($b16a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db1776==$bmin){ $bopt='17';$boptD=$b17dd;if ($b17a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db1876==$bmin){ $bopt='18';$boptD=$b18dd;if ($b18a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db1976==$bmin){ $bopt='19';$boptD=$b19dd;if ($b19a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db2076==$bmin){ $bopt='20';$boptD=$b20dd;if ($b20a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db2176==$bmin){ $bopt='21';$boptD=$b21dd;if ($b21a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db2276==$bmin){ $bopt='22';$boptD=$b22dd;if ($b22a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php  if ($db2376==$bmin){ $bopt='23';$boptD=$b23dd;if ($b23a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db2476==$bmin){ $bopt='24';$boptD=$b24dd;if ($b24a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db2576==$bmin){ $bopt='25';$boptD=$b25dd;if ($b25a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db2676==$bmin){ $bopt='26';$boptD=$b26dd;if ($b26a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db2776==$bmin){ $bopt='27';$boptD=$b27dd;if ($b27a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db2876==$bmin){ $bopt='28';$boptD=$b28dd;if ($b28a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php if ($db2976==$bmin){ $bopt='29';$boptD=$b29dd;if ($b29a>74) {$bdi="-";} else {$bdi='+';}}?>
<?php  if ($db3076==$bmin){ $bopt='30';$boptD=$b30dd;if ($b30a>74) {$bdi="-";} else {$bdi='+';}}

?>


 <?php


		// generate and execute query
		$querys = "select po, sNo from productionc9 where po='$po' ORDER BY id DESC LIMIT 1 ";
		
	$results =  mysqli_query($conn, $querys);
		$num = mysqli_num_rows( $results);
		//$obj = mysqli_fetch_object($results);
		
	if ($num > 0)
	{
		
$row = mysqli_fetch_object($results);	
		$sNo=$row->sNo+1;}
	else {	$sNo=1;}
  
		//mysql_close($link);
?>		

   <?php
   
  ////////////////////////c50
  
  //echo "<br> Line 1987";
   $Pdot=5;
    
	$c50Xm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$c50Lm=xyz2lab01("l",$c50Xm,$c50Ym,$c50Zm);
	$c50am=xyz2lab01("a",$c50Xm,$c50Ym,$c50Zm);
	$c50bm=xyz2lab01("b",$c50Xm,$c50Ym,$c50Zm);
	
   	$c50dm=DensitySp38("C",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
  //$c50TV=(((1-(pow(10,(-($c50dm-$Pdm)))))/(1-(pow(10,(-($cdm-$Pdm)))))))*100;
   $c50TV=((($PXm-0.55*$PZm)-($c50Xm-0.55*$c50Zm))/(($PXm-0.55*$PZm)-($cXm-0.55*$cZm)))*100;
  
 $c50TVI=round(($c50TV-$c50TVT),2);

 //echo "c50dm:".$c50dm."TV=".$c50TVI."__<br>";
   
    ////////////////////////m50
   $Pdot=6;
       
	$m50Xm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$m50Lm=xyz2lab01("l",$m50Xm,$m50Ym,$m50Zm);
	$m50am=xyz2lab01("a",$m50Xm,$m50Ym,$m50Zm);
	$m50bm=xyz2lab01("b",$m50Xm,$m50Ym,$m50Zm);
	
   	$m50dm=DensitySp38("M",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

 
  //$m50TV=(((1-(pow(10,(-($m50dm-$Pdm)))))/(1-(pow(10,(-($mdm-$Pdm)))))))*100;
 // ${'RTVIm'.($i*5)}= ((($PY-${'RTVIm'.($i*5).'y'})/($PY- $RM100Y))*100);  
  
 $m50TV=(($PYm-$m50Ym)/($PYm- $mYm))*100;  //ctv
 //$y25TV=(($PZm-$y25Zm)/($PZm- $yZm))*100;  //ctv
 
 $m50TVI=round(($m50TV-$m50TVT),2);

 //echo "m50dm:".$m50dm."TV=".$m50TVI."__<br>";

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

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

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

	$y50Lm=xyz2lab01("l",$y50Xm,$y50Ym,$y50Zm);
	$y50am=xyz2lab01("a",$y50Xm,$y50Ym,$y50Zm);
	$y50bm=xyz2lab01("b",$y50Xm,$y50Ym,$y50Zm);
	
		
   	$y50dm=DensitySp38("Y",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
  //$y50TV=(((1-(pow(10,(-($y50dm-$Pdm)))))/(1-(pow(10,(-($ydm-$Pdm)))))))*100;
  //$y25TV=(($PZm-$y25Zm)/($PZm- $yZm))*100;  //ctv
  $y50TV=(($PZm-$y50Zm)/($PZm- $yZm))*100;  //ctv
 $y50TVI=round(($y50TV-$y50TVT),2);
echo "<br>y50TV:".$y50TV."_".$y50TVI; 
//echo "y50dm:".$y50dm."TV=".$y50TVI."__<br>";
 
     ////////////////////////k50
   $Pdot=8;
        
   	$k50Xm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$k50Lm=xyz2lab01("l",$k50Xm,$k50Ym,$k50Zm);
	$k50am=xyz2lab01("a",$k50Xm,$k50Ym,$k50Zm);
	$k50bm=xyz2lab01("b",$k50Xm,$k50Ym,$k50Zm);
   	$k50dm=DensitySp38("K",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

 
 // $k50TV=(((1-(pow(10,(-($k50dm-$Pdm)))))/(1-(pow(10,(-($kdm-$Pdm)))))))*100;
  //$y50TV=(($PZm-$y50Zm)/($PZm- $yZm))*100;  //ctv
  //$k50TV= ((($PY-${'RTVIk'.($i*5).'y'})/($PY- $RK100Z))*100);   
  $k50TV=(($PYm-$k50Ym)/($PYm- $kZm))*100;  //ctv
 $k50TVI=round(($k50TV-$k50TVT),2);

 //echo "k50dm:".$k50dm."TV=".$k50TVI."__<br>";
 //  echo "note 2k: k50L:".$k50Lm."_k50a:".$k50am."_k50b:".$k50bm."__<br>";
 ////////////////////////////gray
 $Pdot=9;	
  
	$gXm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$gLm=xyz2lab01("l",$gXm,$gYm,$gZm);
	$gam=xyz2lab01("a",$gXm,$gYm,$gZm);
	$gbm=xyz2lab01("b",$gXm,$gYm,$gZm);
	
	$gdm=DensitySp38("K",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
	

 // echo "note 2k: gL:".$gLm."_ga:".$gam."_gb:".$gbm."__gdm:".$gdm."__<br>";

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

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

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

	$c25Lm=xyz2lab01("l",$c25Xm,$c25Ym,$c25Zm);
	$c25am=xyz2lab01("a",$c25Xm,$c25Ym,$c25Zm);
	$c25bm=xyz2lab01("b",$c25Xm,$c25Ym,$c25Zm);   
	   
	   
   	$c25dm=DensitySp38("C",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
 // $c25TV=(((1-(pow(10,(-($c25dm-$Pdm)))))/(1-(pow(10,(-($cdm-$Pdm)))))))*100;
 //$c25TVI=round(($c25TV-$c25TVT),2);
 
 
 //${'TVIc'.$t}=((($Xp-0.55*$Zp)-(${'TVIc'.$t.'x'}-0.55*${'TVIc'.$t.'z'}))/(($Xp-0.55*$Zp)-($C100X*100-0.55*$C100Z*100)))*100;
 $c25TV=((($PXm-0.55*$PZm)-($c25Xm-0.55*$c25Zm))/(($PXm-0.55*$PZm)-($cXm-0.55*$cZm)))*100;
 //$c25TV=(($PZm-$c25Zm)/($PZm- $cZm))*100;  
$c25TVI=round(($c25TV-$c25TVT),2);
 
echo "<br>c25TV:".$c25TV."_".$c25TVI."_".$c25dm."_".$cdm;
 //echo "c50dm:".$c50dm."TV=".$c50TVI."__<br>";
////////////////////////m25
   $Pdot=16;
    
	$m25Xm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$m25Lm=xyz2lab01("l",$m25Xm,$m25Ym,$m25Zm);
	$m25am=xyz2lab01("a",$m25Xm,$m25Ym,$m25Zm);
	$m25bm=xyz2lab01("b",$m25Xm,$m25Ym,$m25Zm);   
	   
   	$m25dm=DensitySp38("M",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
  //$m25TV=(((1-(pow(10,(-($m25dm-$Pdm)))))/(1-(pow(10,(-($mdm-$Pdm)))))))*100;
  $m25TV=(($PYm-$m25Ym)/($PYm- $mYm))*100;  //ctv
 $m25TVI=round(($m25TV-$m25TVT),2);
////////////////////////y25
   $Pdot=17;
    
	 $y25Xm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$y25Lm=xyz2lab01("l",$y25Xm,$y25Ym,$y25Zm);
	$y25am=xyz2lab01("a",$y25Xm,$y25Ym,$y25Zm);
	$y25bm=xyz2lab01("b",$y25Xm,$y25Ym,$y25Zm);  
	   
   	$y25dm=DensitySp38("Y",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
 //$m25TV=(((1-(pow(10,(-($m25dm-$Pdm)))))/(1-(pow(10,(-($mdm-$Pdm)))))))*100;
 
  //$y25TV=(((1-(pow(10,(-($y25dm-$Pdm)))))/(1-(pow(10,(-($ydm-$Pdm)))))))*100;
// $y25TVI=round(($y25TV-$y25TVT),2);
//echo "<br>y25TV:".$y25TV."_".$y25TVI."_".$y25dm."_".$ydm."_".$Pdm."_".$y25Lm."_".$y25am."_".$y25bm; 

//${'TVIy'.$t}=((($Zp-${'TVIy'.($t).'z'})/($Zp- $Y100Z*100))*100);   


$y25TV=(($PZm-$y25Zm)/($PZm- $yZm))*100;  //ctv
$y25TVI=round(($y25TV-$y25TVT),2);
//echo "<br>TVIy25:".$TVIy25;
 ////////////////////////k25
   $Pdot=18;
       	$k25Xm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

	$k25Zm=sp38XYZ("Z",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
   	
	$k25dm=DensitySp38("K",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
  //$k25TV=(((1-(pow(10,(-($k25dm-$Pdm)))))/(1-(pow(10,(-($kdm-$Pdm)))))))*100;
 // $k50TV=(($PYm-$k50Ym)/($PYm- $kZm))*100;  //ctv
   $k25TV=(($PYm-$k25Ym)/($PYm- $kZm))*100;  //ctv
 $k25TVI=round(($k25TV-$k25TVT),2);
  




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

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

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

	$c75Lm=xyz2lab01("l",$c75Xm,$c75Ym,$c75Zm);
	$c75am=xyz2lab01("a",$c75Xm,$c75Ym,$c75Zm);
	$c75bm=xyz2lab01("b",$c75Xm,$c75Ym,$c75Zm);  	   
	   
	   
	   
	   
   	$c75dm=DensitySp38("C",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
  //$c75TV=(((1-(pow(10,(-($c75dm-$Pdm)))))/(1-(pow(10,(-($cdm-$Pdm)))))))*100;
   $c75TV=((($PXm-0.55*$PZm)-($c75Xm-0.55*$c75Zm))/(($PXm-0.55*$PZm)-($cXm-0.55*$cZm)))*100;
 $c75TVI=round(($c75TV-$c75TVT),2);

 //echo "c75TV:".$c75TV."c75TVI=".$c75TVI."__<br>";
////////////////////////m75
   $Pdot=21;
    
	 $m75Xm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$m75Lm=xyz2lab01("l",$m75Xm,$m75Ym,$m75Zm);
	$m75am=xyz2lab01("a",$m75Xm,$m75Ym,$m75Zm);
	$m75bm=xyz2lab01("b",$m75Xm,$m75Ym,$m75Zm); 
	
   	$m75dm=DensitySp38("M",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
  //$m75TV=(((1-(pow(10,(-($m75dm-$Pdm)))))/(1-(pow(10,(-($mdm-$Pdm)))))))*100;
  $m75TV=(($PYm-$m75Ym)/($PYm- $mYm))*100;  //ctv
 $m75TVI=round(($m75TV-$c75TVT),2);
////////////////////////y75
   $Pdot=22;
    
	 $y75Xm=sp38XYZ("X",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

	$y75Lm=xyz2lab01("l",$y75Xm,$y75Ym,$y75Zm);
	$y75am=xyz2lab01("a",$y75Xm,$y75Ym,$y75Zm);
	$y75bm=xyz2lab01("b",$y75Xm,$y75Ym,$y75Zm);     
	   
	   
   	$y75dm=DensitySp38("Y",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
 // $y75TV=(((1-(pow(10,(-($y75dm-$Pdm)))))/(1-(pow(10,(-($ydm-$Pdm)))))))*100;
  $y75TV=(($PZm-$y75Zm)/($PZm- $yZm))*100;  //ctv
 $y75TVI=round(($y75TV-$y75TVT),2);

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

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

	$k75Zm=sp38XYZ("Z",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
	
   	$k75dm=DensitySp38("K",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
 
  //$k75TV=(((1-(pow(10,(-($k75dm-$Pdm)))))/(1-(pow(10,(-($kdm-$Pdm)))))))*100;
     $k75TV=(($PYm-$k75Ym)/($PYm- $kZm))*100;  //ctv
 $k75TVI=round(($k75TV-$k75TVT),2); 

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

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

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

	$g25Lm=xyz2lab01("l",$g25Xm,$g25Ym,$g25Zm);
	$g25am=xyz2lab01("a",$g25Xm,$g25Ym,$g25Zm);
	$g25bm=xyz2lab01("b",$g25Xm,$g25Ym,$g25Zm);
	
	$g25dm=DensitySp38("K",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);

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

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

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

	$g75Lm=xyz2lab01("l",$g75Xm,$g75Ym,$g75Zm);
	$g75am=xyz2lab01("a",$g75Xm,$g75Ym,$g75Zm);
	$g75bm=xyz2lab01("b",$g75Xm,$g75Ym,$g75Zm);
	
	$gdm=DensitySp38("K",$dotT[$idx+$cols*$Pdot+1],$dotT[$idx+$cols*$Pdot+2],$dotT[$idx+$cols*$Pdot+3],$dotT[$idx+$cols*$Pdot+4],$dotT[$idx+$cols*$Pdot+5],$dotT[$idx+$cols*$Pdot+6],$dotT[$idx+$cols*$Pdot+7],$dotT[$idx+$cols*$Pdot+8],$dotT[$idx+$cols*$Pdot+9],$dotT[$idx+$cols*$Pdot+10],$dotT[$idx+$cols*$Pdot+11],$dotT[$idx+$cols*$Pdot+12],$dotT[$idx+$cols*$Pdot+13],$dotT[$idx+$cols*$Pdot+14],$dotT[$idx+$cols*$Pdot+15],$dotT[$idx+$cols*$Pdot+16],$dotT[$idx+$cols*$Pdot+17],$dotT[$idx+$cols*$Pdot+18],$dotT[$idx+$cols*$Pdot+19],$dotT[$idx+$cols*$Pdot+20],$dotT[$idx+$cols*$Pdot+21],$dotT[$idx+$cols*$Pdot+22],$dotT[$idx+$cols*$Pdot+23],$dotT[$idx+$cols*$Pdot+24],$dotT[$idx+$cols*$Pdot+25],$dotT[$idx+$cols*$Pdot+26],$dotT[$idx+$cols*$Pdot+27],$dotT[$idx+$cols*$Pdot+28],$dotT[$idx+$cols*$Pdot+29],$dotT[$idx+$cols*$Pdot+30],$dotT[$idx+$cols*$Pdot+31],$dotT[$idx+$cols*$Pdot+32],$dotT[$idx+$cols*$Pdot+33],$dotT[$idx+$cols*$Pdot+34],$dotT[$idx+$cols*$Pdot+35],$dotT[$idx+$cols*$Pdot+36]);
	
///////////////////////////////////////////////////////////	

 $dep00=de00($pl,$pa,$pb,$PLm,$Pam,$Pbm);
 $dek00=de00($kl,$ka,$kb,$klm,$kam,$kbm);
 $dec00=de00($cl,$ca,$cb,$clm,$cam,$cbm);
 $dem00=de00($ml,$ma,$mb,$mlm,$mam,$mbm);
 $dey00=de00($yl,$ya,$yb,$ylm,$yam,$ybm);
 
 $der00=de00($rl,$ra,$rb,$rlm,$ram,$rbm);
 $degr00=de00($grl,$gra,$grb,$grlm,$gram,$grbm);
 $deb00=de00($bl,$ba,$bb,$blm,$bam,$bbm);
 

 
if ($dec00<3.5) {$cscore=3;$cscoreg=5;$cscoref=3;} elseif ($dec00<4 and $dec00>3.5) {$cscore=0;$cscoreg=3;$cscoref=2;} elseif ($dec00<4.5 and $dec00>4.0) {$cscore=0;$cscoreg=1;$cscoref=1;} else {$cscore=0;$cscoreg=0;$cscoref=0;}	
if ($dem00<3.5) {$mscore=3;$mscoreg=5;$mscoref=3;} elseif ($dem00<4 and $dem00>3.5) {$mscore=0;$mscoreg=3;$mscoref=2;} elseif ($dem00<4.5 and $dem00>4.0) {$mscore=0;$mscoreg=1;$mscoref=1;} else {$mscore=0;$mscoreg=0;$mscoref=0;}
if ($dey00<3.5) {$yscore=3;$yscoreg=5;$yscoref=3;} elseif ($dey00<4 and $dey00>3.5) {$yscore=0;$yscoreg=3;$yscoref=2;} elseif ($dey00<4.5 and $dey00>4.0) {$yscore=0;$yscoreg=1;$yscoref=1;} else {$yscore=0;$yscoreg=0;$yscoref=0;}
if ($dek00<3.5) {$kscore=3;$kscoreg=5;$kscoref=3;} elseif ($dek00<4 and $dek00>3.5) {$kscore=0;$kscoreg=3;$kscoref=2;} elseif ($dek00<4.5 and $dek00>4.0) {$kscore=0;$kscoreg=1;$yscoref=1;} else {$kscore=0;$kscoreg=0;$kscoref=0;}	
if ($der00<3.5) {$rscore=2;$rscoreg=4;$rscoref=2;} elseif ($der00<4 and $der00>3.5) {$rscore=0;$rscoreg=2;$rscoref=1;} elseif ($der00<4.5 and $der00>4.0) {$rscore=0;$rscoreg=1;$rscoref=0;} else {$rscore=0;$rscoreg=0;$rscoref=0;}
if ($degr00<3.5) {$grscore=2;$grscoreg=4;$grscoref=2;} elseif ($degr00<4 and $degr00>3.5) {$grscore=0;$grscoreg=2;$grscoref=1;} elseif ($degr00<4.5 and $degr00>4.0) {$grscore=0;$grscoreg=1;$grscoref=0;} else {$grscore=0;$grscoreg=0;$grscoref=0;}
if ($deb00<3.5) {$bscore=2;$bscoreg=4;$bscoref=2;}  elseif ($deb00<4 and $deb00>3.5) {$bscore=0;$bscoreg=2;$bscoref=1;} elseif ($deb00<4.5 and $deb00>4.0) {$bscore=0;$bscoreg=1;$bscoref=0;} else {$bscore=0;$bscoreg=0;$bscoref=0;}
  
  
  $dgl=$gLT-$gLm;
  $dga=($Pam/2)-$gam;
  $dgb=($Pbm/2)-$gbm;
  $df=sqrt(pow($dga,2)+pow($dgb,2));
  
  $dgl25=$g25LT-$g25Lm;
  $dg25a=($Pam*0.75)-$g25am;
  $dg25b=($Pbm*0.75)-$g25bm;
  $d25f=sqrt(pow($dg25a,2)+pow($dg25b,2));
  
  $dgl75=$g75LT-$g75Lm;
  $dg75a=($Pam*0.25)-$g75am;
  $dg75b=($Pbm*0.25)-$g75bm;
  $d75f=sqrt(pow($dg75a,2)+pow($dg75b,2));
  


  	$dt=50;
	$wa=$Pam*(100-$dt)/100;
	$wb=$Pbm*(100-$dt)/100;
	//$df= pow((pow(($gam-$wa),2))+(pow(($gbm-$wb),2)),0.5)*(1-max(0,($dt-50)/50*0.75));
	//$df50=$df;
 // echo "df".$df."<br>";
 
if ($d25f<2) {$d25fP=4;$d25fPg=6;$d25fPf=6;} 
elseif ($d25f<3) {$d25fP=4;$d25fPg=4;$d25fPf=5;} 
elseif ($d25f<3.5) {$d25fP=0;$d25fPg=3;$d25fPf=2;} 
else {$d25fP=0;$d25fPg=0;$d25fPf=0;}	

if ($df<2) {$d50fP=4;$d50fPg=5;$d50fPf=7;} 
elseif ($df<3) {$d50fP=4;$d50fPg=3;$d50fPf=5;} 
elseif ($df<3.5) {$d50fP=4;$d50fPg=2;$d50fPf=2;} 
elseif ($df<3.8) {$d50fP=4;$d50fPg=0;$d50fPf=0;} 
else {$d50fP=0;$d50fPg=0;$d50fPf=0;}

if ($d75f<2) {$d75fP=2;$d75fPg=4;$d75fPf=5;} 
elseif ($d75f<3) {$d75fP=2;$d75fPg=2;$d75fPf=4;} 
elseif ($d75f<3.5) {$d75fP=2;$d75fPg=1;$d75fPf=1;} 
elseif ($d75f<3.4) {$d75fP=2;$d75fPg=0;$d75fPf=0;} 
else {$d75fP=0;$d75fPg=0;$d75fPf=0;}

if (abs($g25Lm-$g25LT)<2) {$d25L=3;} 
elseif (abs($g25Lm-$g25LT)<3) {$d25L=2;} 
elseif (abs($g25Lm-$g25LT)<3.5) {$d25L=1;} 
else {$d25L=0;} 

if (abs($gLm-$gLT)<2) {$dL=4;} 
elseif (abs($gLm-$gLT)<3) {$dL=2;} 
elseif (abs($gLm-$gLT)<3.5) {$dL=1;} 
else {$dL=0;} 

if (abs($g75Lm-$g75LT)<2) {$d75L=3;} 
elseif (abs($g75Lm-$g75LT)<3) {$d75L=2;} 
elseif (abs($g75Lm-$g75LT)<3.5) {$d75L=1;} 
else {$d75L=0;} 

if (abs($c25TVI)<3) {
	if ($rule=='c9'){
	$c25TVP=1;} 
	elseif ($rule=='gmi'){
	$c25TVP=2;} 
	elseif ($rule=='pbn'){
	$c25TVP=0.5;} 
}
	elseif (abs($c25TVI)<4) {
	if ($rule=='c9'){
	$c25TVP=0;} 
	elseif ($rule=='gmi'){
	$c25TVP=1;} 
	elseif ($rule=='pbn'){
	$c25TVP=0.25;} 
}
else {
	$c25TVP=0;}	
	
if (abs($m25TVI)<3) {
	if ($rule=='c9'){
	$m25TVP=1;} 
	elseif ($rule=='gmi'){
	$m25TVP=2;} 
	elseif ($rule=='pbn'){
	$m25TVP=0.5;} 
}
	elseif (abs($m25TVI)<4) {
	if ($rule=='c9'){
	$m25TVP=0;} 
	elseif ($rule=='gmi'){
	$m25TVP=1;} 
	elseif ($rule=='pbn'){
	$m25TVP=0.25;} 
}
else {
	$m25TVP=0;}	
	
if (abs($y25TVI)<3) {
	if ($rule=='c9'){
	$y25TVP=1;} 
	elseif ($rule=='gmi'){
	$y25TVP=2;} 
	elseif ($rule=='pbn'){
	$y25TVP=0.5;} 
}
	elseif (abs($y25TVI)<4) {
	if ($rule=='c9'){
	$y25TVP=0;} 
	elseif ($rule=='gmi'){
	$y25TVP=1;} 
	elseif ($rule=='pbn'){
	$y25TVP=0.25;} 
}
else {
	$y25TVP=0;}	
	
if (abs($k25TVI)<3) {
	if ($rule=='c9'){
	$k25TVP=1;} 
	elseif ($rule=='gmi'){
	$k25TVP=2;} 
	elseif ($rule=='pbn'){
	$k25TVP=0.5;} 
}
	elseif (abs($k25TVI)<4) {
	if ($rule=='c9'){
	$k25TVP=0;} 
	elseif ($rule=='gmi'){
	$k25TVP=1;} 
	elseif ($rule=='pbn'){
	$k25TVP=0.25;} 
}
else {
	$k25TVP=0;}	




if (abs($c50TVI)<3) {
	if ($rule=='c9'){
	$c50TVP=1;} 
	elseif ($rule=='gmi'){
	$c50TVP=3;} 
	elseif ($rule=='pbn'){
	$c50TVP=1;} 
}
	elseif (abs($c50TVI)<4) {
	if ($rule=='c9'){
	$c50TVP=0;} 
	elseif ($rule=='gmi'){
	$c50TVP=1;} 
	elseif ($rule=='pbn'){
	$c50TVP=0.25;} 
}
else {
	$c50TVP=0;}	
	
if (abs($m50TVI)<3) {
	if ($rule=='c9'){
	$m50TVP=1;} 
	elseif ($rule=='gmi'){
	$m50TVP=3;} 
	elseif ($rule=='pbn'){
	$m50TVP=1;} 
}
	elseif (abs($m50TVI)<4) {
	if ($rule=='c9'){
	$m50TVP=0;} 
	elseif ($rule=='gmi'){
	$m50TVP=1;} 
	elseif ($rule=='pbn'){
	$m50TVP=0.25;} 
}
else {
	$m50TVP=0;}	
	
if (abs($y50TVI)<3) {
	if ($rule=='c9'){
	$y50TVP=1;} 
	elseif ($rule=='gmi'){
	$y50TVP=3;} 
	elseif ($rule=='pbn'){
	$y50TVP=1;} 
}
	elseif (abs($y50TVI)<4) {
	if ($rule=='c9'){
	$y50TVP=0;} 
	elseif ($rule=='gmi'){
	$y50TVP=1;} 
	elseif ($rule=='pbn'){
	$y50TVP=0.25;} 
}
else {
	$y50TVP=0;}	
	
if (abs($k50TVI)<3) {
	if ($rule=='c9'){
	$k50TVP=1;} 
	elseif ($rule=='gmi'){
	$k50TVP=3;} 
	elseif ($rule=='pbn'){
	$k50TVP=1;} 
}
	elseif (abs($k50TVI)<4) {
	if ($rule=='c9'){
	$k50TVP=0;} 
	elseif ($rule=='gmi'){
	$k50TVP=1;} 
	elseif ($rule=='pbn'){
	$k50TVP=0.25;} 
}
else {
	$k50TVP=0;}	

if (abs($c75TVI)<3) {
	if ($rule=='c9'){
	$c75TVP=1;} 
	elseif ($rule=='gmi'){
	$c75TVP=2;} 
	elseif ($rule=='pbn'){
	$c75TVP=0.5;} 
}
	elseif (abs($c75TVI)<4) {
	if ($rule=='c9'){
	$c75TVP=0;} 
	elseif ($rule=='gmi'){
	$c75TVP=1;} 
	elseif ($rule=='pbn'){
	$c75TVP=0.25;} 
}
else {
	$c75TVP=0;}	
	
//echo "c75tvp:".$c75TVP;
	
if (abs($m75TVI)<3) {
	if ($rule=='c9'){
	$m75TVP=1;} 
	elseif ($rule=='gmi'){
	$m75TVP=2;} 
	elseif ($rule=='pbn'){
	$m75TVP=0.5;} 
}
	elseif (abs($m75TVI)<4) {
	if ($rule=='c9'){
	$m75TVP=0;} 
	elseif ($rule=='gmi'){
	$m75TVP=1;} 
	elseif ($rule=='pbn'){
	$m75TVP=0.25;} 
}
else {
	$m75TVP=0;}	
	
if (abs($y75TVI)<3) {
	if ($rule=='c9'){
	$y75TVP=1;} 
	elseif ($rule=='gmi'){
	$y75TVP=2;} 
	elseif ($rule=='pbn'){
	$y75TVP=0.5;} 
}
	elseif (abs($y75TVI)<4) {
	if ($rule=='c9'){
	$y75TVP=0;} 
	elseif ($rule=='gmi'){
	$y75TVP=1;} 
	elseif ($rule=='pbn'){
	$y75TVP=0.25;} 
}
else {
	$y75TVP=0;}	
	
if (abs($k75TVI)<3) {
	if ($rule=='c9'){
	$k75TVP=1;} 
	elseif ($rule=='gmi'){
	$k75TVP=2;} 
	elseif ($rule=='pbn'){
	$k75TVP=0.5;} 
}
	elseif (abs($k75TVI)<4) {
	if ($rule=='c9'){
	$k75TVP=0;} 
	elseif ($rule=='gmi'){
	$k75TVP=1;} 
	elseif ($rule=='pbn'){
	$k75TVP=0.25;} 
}
else {
	$k75TVP=0;}	

if (abs($c25TVI)<3 and abs($m25TVI)<3 and abs($y25TVI)<3 and abs($k25TVI)<3) {$tv25=4;$tv25g=2;;$tv25f=1.5;} 
elseif (abs($c25TVI)<4 and abs($m25TVI)<4 and abs($y25TVI)<4 and abs($k25TVI)<4) {$tv25=0;$tv25g=1;;$tv25f=1;}
else {$tv25=0;$tv25g=0;;$tv25f=0;} 

if (abs($c50TVI)<4 and abs($m50TVI)<4 and abs($y50TVI)<4 and abs($k50TVI)<4) {$tv50=4;$tv50g=3;;$tv50f=3;}
elseif (abs($c50TVI)<4 and abs($m50TVI)<4 and abs($y50TVI)<4 and abs($k50TVI)<4) {$tv50=0;$tv50g=1;$tv50f=1;}
else {$tv50=0;$tv50g=0;$tv50f=0;} 

if (abs($c75TVI)<3 and abs($m75TVI)<3 and abs($y75TVI)<3 and abs($k75TVI)<3) {$tv75=4;$tv75g=2;$tv75f=1.5;} 
elseif (abs($c75TVI)<4 and abs($m75TVI)<4 and abs($y75TVI)<4 and abs($k75TVI)<4) {$tv75=0;$tv75g=1;$tv75f=1;}
else {$tv75=0;$tv75g=0;$tv75f=0;} 





?>


 
 
 
 
 <table width="400" border="1" align="center" 
  <tr>
	<td>
	<td colspan = "3">Target data</td>

	<td colspan = "3">measured data</td>
	<td> ΔE00</td>
	<td> Score</td>
	<td> </td>

	</tr>
	<tr>
	<td bgcolor="#FFFFFF">Paper</td>
	<td align='right' bgcolor="#FFFFFF"><?php echo  round($pl,1);?></td>
	<td align='right' bgcolor="#FFFFFF"><?php echo  round($pa,1);?></td>
	<td align='right' bgcolor="#FFFFFF"><?php echo  round($pb,1);?></td>
	<td align='right' bgcolor="#FFFFFF"><?php echo  round($PLm,1);?></td>
	<td align='right' bgcolor="#FFFFFF"><?php echo  round($Pam,1);?></td>
	<td align='right' bgcolor="#FFFFFF"><?php echo  round($Pbm,1);?></td>
	<td align='right' bgcolor="#FFFFFF"><?php echo  round($dep00,1);?></td>
	
	</tr>
	<tr>
	<td bgcolor="#00FFFF">100C</td>
	<td align='right' bgcolor="#00FFFF"><?php echo  round($cl,1);?></td>
	<td align='right' bgcolor="#00FFFF"><?php echo  round($ca,1);?></td>
	<td align='right' bgcolor="#00FFFF"><?php echo  round($cb,1);?></td>
	<td align='right' bgcolor="#00FFFF"><?php echo  round($clm,1);?></td>
	<td align='right' bgcolor="#00FFFF"><?php echo  round($cam,1);?></td>
	<td align='right' bgcolor="#00FFFF"><?php echo  round($cbm,1);?></td>
	<td align='right' bgcolor="#00FFFF"><a href="../deltaE/indexE.php?mL=<?php echo $clm.'&ma='.$cam.'&mb='.$cbm;?>"><?php  if (abs($dec00)>3.5) {echo "<font color='red'>";}echo  round($dec00,1);?></a></td>
	<td align='right' bgcolor="#00FFFF"><?php if ($rule=='c9')  {echo  $cscore;} elseif ($rule=='gmi') {echo  $cscoreg;} else {echo  $cscoref;}?></td>
	<td align='right' bgcolor="#00FFFF"><?php echo  round($cdm,1);?></td>
	</tr>
		<tr>
	<td bgcolor="#FFCCFF">100M</td>
	<td align='right' bgcolor="#FFCCFF"><?php echo  round($ml,1);?></td>
	<td align='right' bgcolor="#FFCCFF"><?php echo  round($ma,1);?></td>
	<td align='right' bgcolor="#FFCCFF"><?php echo  round($mb,1);?></td>
	<td align='right' bgcolor="#FFCCFF"><?php echo  round($mlm,1);?></td>
	<td align='right' bgcolor="#FFCCFF"><?php echo  round($mam,1);?></td>
	<td align='right' bgcolor="#FFCCFF"><?php echo  round($mbm,1);?></td>
	<td align='right' bgcolor="#FFCCFF"><a href="../deltaE/indexE.php?mL=<?php echo $mlm.'&ma='.$mam.'&mb='.$mbm;?>"><?php  if (abs($dem00)>3.5) {echo "<font color='red'>";}echo  round($dem00,1);?></a></td>
	<td align='right' bgcolor="#FFCCFF"><?php if ($rule=='c9')  {echo  $mscore;} elseif ($rule=='gmi') {echo  $mscoreg;} else {echo  $mscoref;}?></td>
	<td align='right' bgcolor="#FFCCFF"><?php echo  round($mdm,1);?></td>
	</tr>
	<td bgcolor="#FFFF66">100Y</td>
	<td align='right' bgcolor="#FFFF66"><?php echo  round($yl,1);?></td>
	<td align='right' bgcolor="#FFFF66"><?php echo  round($ya,1);?></td>
	<td align='right' bgcolor="#FFFF66"><?php echo  round($yb,1);?></td>
	<td align='right' bgcolor="#FFFF66"><?php echo  round($ylm,1);?></td>
	<td align='right' bgcolor="#FFFF66"><?php echo  round($yam,1);?></td>
	<td align='right' bgcolor="#FFFF66"><?php echo  round($ybm,1);?></td>
	<td align='right' bgcolor="#FFFF66"><a href="../deltaE/indexE.php?mL=<?php echo $ylm.'&ma='.$yam.'&mb='.$ybm;?>"><?php  if (abs($dey00)>3.5) {echo "<font color='red'>";}echo  round($dey00,1);?></a></td>
	<td align='right' bgcolor="#FFFF66"><?php if ($rule=='c9')  {echo  $yscore;} elseif ($rule=='gmi') {echo  $yscoreg;} else {echo  $yscoref;}?></td>
	<td align='right' bgcolor="#FFFF66"><?php echo  round($ydm,1);?></td>
	</tr>
	<td bgcolor="#BBBBBB">100K</td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($kl,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($ka,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($kb,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($klm,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($kam,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($kbm,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php  if (abs($dek00)>3.5) {echo "<font color='red'>";}echo  round($dek00,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php if ($rule=='c9')  {echo  $kscore;}  elseif ($rule=='gmi') {echo  $kscoreg;} else {echo  $kscoref;}?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($kdm,1);?></td>
	</tr>
<tr>
	<td bgcolor="#DD7777">R</td>
	<td align='right' bgcolor="#DD7777"><?php echo  round($rl,1);?></td>
	<td align='right' bgcolor="#DD7777"><?php echo  round($ra,1);?></td>
	<td align='right' bgcolor="#DD7777"><?php echo  round($rb,1);?></td>
	<td align='right' bgcolor="#DD7777"><?php echo  round($rlm,1);?></td>
	<td align='right' bgcolor="#DD7777"><?php echo  round($ram,1);?></td>
	<td align='right' bgcolor="#DD7777"><?php echo  round($rbm,1);?></td>
	<td align='right' bgcolor="#DD7777"><?php  if (abs($der00)>3.5) {echo "<font color='red'>";}echo  round($der00,1);?></td>
	<td align='right' bgcolor="#DD7777"><?php if ($rule=='c9') {echo  $rscore;}  elseif ($rule=='gmi') {echo  $rscoreg;} else {echo  $rscoref;}?></td>
	</tr>
	<?php 
 if ($rule=='c9') {
 $sScoreT=($cscore+$mscore+$yscore+$kscore+$rscore+$grscore+$bscore)/40*100;
 $sScore=($cscore+$mscore+$yscore+$kscore+$rscore+$grscore+$bscore);
 $TSs='/18';}
elseif ($rule=='gmi') {
 $sScoreT=($cscoreg+$mscoreg+$yscoreg+$kscoreg+$rscoreg+$grscoreg+$bscoreg)/75*100;
 $sScore=$cscoreg+$mscoreg+$yscoreg+$kscoreg+$rscoreg+$grscoreg+$bscoreg;
  $TSs='/32';}
elseif ($rule=='pbn') {
 $sScoreT=($cscoref+$mscoreg+$yscoref+$kscoref+$rscoref+$grscoref+$bscoref)/54*100;
 $sScore=$cscoref+$mscoreg+$yscoref+$kscoref+$rscoref+$grscoref+$bscoref;
  $TSs='/18';}
?>
	
	<tr>
	<td bgcolor="#55BB55">G</td>
	<td align='right' bgcolor="#55BB55"><?php echo  round($grl,1);?></td>
	<td align='right' bgcolor="#55BB55"><?php echo  round($gra,1);?></td>
	<td align='right' bgcolor="#55BB55"><?php echo  round($grb,1);?></td>
	<td align='right' bgcolor="#55BB55"><?php echo  round($grlm,1);?></td>
	<td align='right' bgcolor="#55BB55"><?php echo  round($gram,1)?></td>
	<td align='right' bgcolor="#55BB55"><?php echo  round($grbm,1);?></td>
	<td align='right' bgcolor="#55BB55"><?php  if (abs($degr00)>3.5) {echo "<font color='red'>";}echo  round($degr00,1);?></td>
	<td align='right' bgcolor="#55BB55"><?php if ($rule=='c9')  {echo  $grscore;}  elseif ($rule=='gmi') {echo  $grscoreg;} else {echo  $grscoref;}?></td>
	<td align='right' bgcolor="#cccccc"><?php echo $sScore.$TSs;?></td>
	</tr>

	<tr>
	<td bgcolor="#7777DD">B</td>
	<td align='right' bgcolor="#7777DD"><?php echo  round($bl,1);?></td>
	<td align='right' bgcolor="#7777DD"><?php echo  round($ba,1);?></td>
	<td align='right' bgcolor="#7777DD"><?php echo  round($bb,1);?></td>
	<td align='right' bgcolor="#7777DD"><?php echo  round($blm,1);?></td>
	<td align='right' bgcolor="#7777DD"><?php echo  round($bam,1);?></td>
	<td align='right' bgcolor="#7777DD"><?php echo  round($bbm,1);?></td>
	<td align='right' bgcolor="#7777DD"><?php if (abs($deb00)>3.5) {echo "<font color='red'>";}  echo  round($deb00,1);?></td>
	<td align='right' bgcolor="#7777DD"><?php if ($rule=='c9') {echo  $bscore;}  elseif ($rule=='gmi') {echo  $bscoreg;} else {echo  $bscoref;}?></td>
	<td align='right' bgcolor="#cccccc"><?php echo round($sScoreT,2)."%";?></td>
	</tr>
	
	
</table>

 <br>
<table width="400" border="1" align="center">
  <tr>
	<td>
	<td colspan = "1">目標 TV</td>

	<td colspan = "1">量測TV</td>
	<td> ΔTV</td>
	<td> Score</td>
	<td>
	<td colspan = "1">目標 TV</td>
	<td colspan = "1">量測TV</td>
	<td> ΔTV</td>
	<td> Score</td>
	<td>
	<td colspan = "1">目標 TV</td>
	<td colspan = "1">量測TV</td>
	<td> ΔTV</td>
	<td> Score</td>
	</tr>

	<tr>
	<td bgcolor="#ccFFFF">C25</td>
	<td align='right' bgcolor="#ccFFFF"><?php echo  round($c25TVT,1);?></td>
	<td align='right' bgcolor="#ccFFFF"><?php echo  round($c25TV,1);?></td>
	<td align='right' bgcolor="#ccFFFF"><?php if (abs($c25TVI)>3) {echo "<font color='red'>";} echo  round($c25TVI,1);?></td>
	<td align='right' bgcolor="#ccFFFF"><?php echo $c25TVP;?></td>
		<td bgcolor="#aaFFFF">C50</td>
	<td align='right' bgcolor="#aaFFFF"><?php echo  round($c50TVT,1);?></td>
	<td align='right' bgcolor="#aaFFFF"><?php echo  round($c50TV,1);?></td>
	<td align='right' bgcolor="#aaFFFF"><?php if (abs($c50TVI)>4) {echo "<font color='red'>";} echo  round($c50TVI,1);?></td>
	<td align='right' bgcolor="#aaFFFF"><?php echo  $c50TVP;?></td>
			<td bgcolor="#aaFFFF">C75</td>
	<td align='right' bgcolor="#00FFFF"><?php echo  round($c75TVT,1);?></td>
	<td align='right' bgcolor="#00FFFF"><?php echo  round($c75TV,1);?></td>
	<td align='right' bgcolor="#00FFFF"><?php if (abs($c75TVI)>3) {echo "<font color='red'>";} echo round($c75TVI,1);?></td>
	<td align='right' bgcolor="#00FFFF"><?php echo  $c75TVP;?></td>
	</tr>
		<tr>
	<td bgcolor="#FFddFF">M25</td>
	<td align='right' bgcolor="#FFddFF"><?php echo  round($m25TVT,1);?></td>
	<td align='right' bgcolor="#FFddFF"><?php echo  round($m25TV,1);?></td>
	<td align='right' bgcolor="#FFddFF"><?php if (abs($m25TVI)>3) {echo "<font color='red'>";} echo  round($m25TVI,1);?></td>
	<td align='right' bgcolor="#FFddFF"><?php echo  $m25TVP;?></td>
		<td bgcolor="#FFbbFF">M50</td>
	<td align='right' bgcolor="#FFbbFF"><?php echo  round($m50TVT,1);?></td>
	<td align='right' bgcolor="#FFbbFF"><?php echo  round($m50TV,1);?></td>
	<td align='right' bgcolor="#FFbbFF"><?php if (abs($m50TVI)>4) {echo "<font color='red'>";} echo  round($m50TVI,1);?></td>
	<td align='right' bgcolor="#FFbbFF"><?php echo  $m50TVP;?></td>
	<td bgcolor="#FF77FF">M75</td>
	<td align='right' bgcolor="#FF77FF"><?php echo  round($m75TVT,1);?></td>
	<td align='right' bgcolor="#FF77FF"><?php echo  round($m75TV,1);?></td>
	<td align='right' bgcolor="#FF77FF"><?php if (abs($m75TVI)>3) {echo "<font color='red'>";} echo  round($m75TVI,1);?></td>
	<td align='right' bgcolor="#FF77FF"><?php echo  $m75TVP;?></td>
	</tr>
	<tr>
	<td bgcolor="#FFFFdd">Y25</td>
	<td align='right' bgcolor="#FFFFdd"><?php echo  round($y25TVT,1);?></td>
	<td align='right' bgcolor="#FFFFdd"><?php echo  round($y25TV,1);?></td>
	<td align='right' bgcolor="#FFFFdd"><?php if (abs($y25TVI)>3) {echo "<font color='red'>";} echo  round($y25TVI,1);?></td>
	<td align='right' bgcolor="#FFFFdd"><?php echo  $y25TVP;?></td>
	<td bgcolor="#FFFFbb">Y50</td>
	<td align='right' bgcolor="#FFFFbb"><?php echo  round($y50TVT,1);?></td>
	<td align='right' bgcolor="#FFFFbb"><?php echo  round($y50TV,1);?></td>
	<td align='right' bgcolor="#FFFFbb"><?php if (abs($y50TVI)>4) {echo "<font color='red'>";} echo  round($y50TVI,1);?></td>
	<td align='right' bgcolor="#FFFFbb"><?php echo  $y50TVP;?></td>
	<td bgcolor="#FFFF66">Y75</td>
	<td align='right' bgcolor="#FFFF66"><?php echo  round($y75TVT,1);?></td>
	<td align='right' bgcolor="#FFFF66"><?php echo  round($y75TV,1);?></td>
	<td align='right' bgcolor="#FFFF66"><?php if (abs($y75TVI)>3) {echo "<font color='red'>";} echo  round($y75TVI,1);?></td>
	<td align='right' bgcolor="#FFFF66"><?php echo  $y75TVP;?></td>
	</tr>
	<tr>
	<td bgcolor="#dddddd">K25</td>
	<td align='right' bgcolor="#dddddd"><?php echo  round($k25TVT,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php echo  round($k25TV,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php if (abs($k25TVI)>3) {echo "<font color='red'>";} echo  round($k25TVI,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php echo  $k25TVP;?></td>
	<td bgcolor="#cccccc">K50</td>
	<td align='right' bgcolor="#cccccc"><?php echo  round($k50TVT,1);?></td>
	<td align='right' bgcolor="#cccccc"><?php echo  round($k50TV,1);?></td>
	<td align='right' bgcolor="#cccccc"><?php if (abs($k50TVI)>4) {echo "<font color='red'>";} echo  round($k50TVI,1);?></td>
	<td align='right' bgcolor="#cccccc"><?php echo  $k50TVP;?></td>
	
		<?php 


 $tScore=($c25TVP+$m25TVP+$y25TVP+$k25TVP+$c50TVP+$m50TVP+$y50TVP+$k50TVP+$c75TVP+$m75TVP+$y75TVP+$k75TVP);
if ($rule=='c9') {
  $tScoreT=($c25TVP+$m25TVP+$y25TVP+$k25TVP+$c50TVP+$m50TVP+$y50TVP+$k50TVP+$c75TVP+$m75TVP+$y75TVP+$k75TVP)/40*100;
  $TTs='/12';}
elseif ($rule=='gmi') {
$tScoreT=($c25TVP+$m25TVP+$y25TVP+$k25TVP+$c50TVP+$m50TVP+$y50TVP+$k50TVP+$c75TVP+$m75TVP+$y75TVP+$k75TVP)/75*100;
$TTs='/28';}
 elseif ($rule=='pbn') {
 $tScoreT=($c25TVP+$m25TVP+$y25TVP+$k25TVP+$c50TVP+$m50TVP+$y50TVP+$k50TVP+$c75TVP+$m75TVP+$y75TVP+$k75TVP)/54*100;
 $TTs='/8';}

?>
	
	
	
	<td bgcolor="#BBBBBB">K75</td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($k75TVT,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($k75TV,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php if (abs($k75TVI)>3) {echo "<font color='red'>";} echo  round($k75TVI,1);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  $k75TVP;?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  $tScore.$TTs;?></td>
	
	</tr>
	<tr>
	<td bgcolor="#ffffff">score</td><td><td><td>
	<td align='right'><?php echo ($c25TVP+$m25TVP+$y25TVP+$k25TVP);?></td>
	<td bgcolor="#ffffff">score</td><td><td><td>
	<td align='right'><?php echo ($c50TVP+$m50TVP+$y50TVP+$k50TVP);?></td>
	<td bgcolor="#ffffff">score</td><td><td><td>
	<td align='right'><?php echo ($c75TVP+$m75TVP+$y75TVP+$k75TVP);?></td>
	<td align='right' bgcolor="#BBBBBB"><?php echo  round($tScoreT,2)."%";?></td>
	</tr>
</table>




<?php
$c9sum=0;
$c9sum=$c9sum+$cscore+$mscore+$yscore+$kscore+$rscore+$grscore+$bscore;
$c9sum=$c9sum+$c25TVP+$m25TVP+$y25TVP+$k25TVP;
$c9sum=$c9sum+$c50TVP+$m50TVP+$y50TVP+$k50TVP;
$c9sum=$c9sum+$c75TVP+$m75TVP+$y75TVP+$k75TVP;
$c9sum=$c9sum+$d25fP+$d50fP+$d75fP;  
//$c9sum=$c9sum+$tv25+$tv50+$tv75;echo "c9sum:".$c9sum;

$gmisum=0;
$gmisum=$gmisum+$cscoreg+$mscoreg+$yscoreg+$kscoreg+$rscoreg+$grscoreg+$bscoreg;

$gmisum=$gmisum+$c25TVP+$m25TVP+$y25TVP+$k25TVP;
$gmisum=$gmisum+$c50TVP+$m50TVP+$y50TVP+$k50TVP;
$gmisum=$gmisum+$c75TVP+$m75TVP+$y75TVP+$k75TVP;
$gmisum=$gmisum+$d25fPg+$d50fPg+$d75fPg;
//$gmisum=$gmisum+$tv25g+$tv50g+$tv75g;

$ct25sum=0;
$ct25sum=$ct25sum+$cscoref+$mscoref+$yscoref+$kscoref+$rscoref+$grscoref+$bscoref;

$ct25sum=$ct25sum+$c25TVP+$m25TVP+$y25TVP+$k25TVP;
$ct25sum=$ct25sum+$c50TVP+$m50TVP+$y50TVP+$k50TVP;
$ct25sum=$ct25sum+$c75TVP+$m75TVP+$y75TVP+$k75TVP;
$ct25sum=$ct25sum+$d25L+$dL+$d75L;
$ct25sum=$ct25sum+$d25fPf+$d50fPf+$d75fPf;//echo "ct25sum:".$ct25sum;

//$ct25sum=$ct25sum+$tv25f+$tv50f+$tv75f;
?>
<br>
<table width="450" border="1" align="center">
  <tr>
	<td>
	<td colspan = "1">目標L*</td>
	<td colspan = "1">目標a*</td>
	<td colspan = "1">目標b*</td>
	<td colspan = "1">量測L*</td>
	<td colspan = "1">量測a*</td>
	<td colspan = "1">量測b*</td>
	<td colspan = "1">ΔL</td>
	<td> ΔCh</td> 
	<?php if ($rule=='pbn') {echo '<td> L Score</td>';} ?>
	<td> Ch Score</td>
	<td><font color="blue"> <?php echo $rule;?> score</font></td>
	</tr>
	<tr>
	<td bgcolor="#dddddd">Gray25</td>
	<td align='right' bgcolor="#dddddd"><?php echo  $g25LT;?></td>
	<td align='right' bgcolor="#dddddd"><?php echo  round($Pam*0.75,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php echo  round($Pbm*0.75,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php echo  round($g25Lm,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php echo  round($g25am,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php echo  round($g25bm,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php if (abs($g25Lm-$g25LT)>2.5) {echo "<font color='red'>";} echo  round($g25Lm-$g25LT,1);?></td>
	
	<td align='right' bgcolor="#dddddd"><?php if (abs($d25f)>2.5) {echo "<font color='red'>";} echo  round($d25f,1);?></font></td>
	
	<?php if ($rule=='pbn') {echo '<td align="right" bgcolor="#dddddd">';  echo  round($d25L,1).'</td>';} ?>
	
	<td align='right' bgcolor="#dddddd"><?php if ( $rule=='c9') {echo  $d25fP;} elseif ($rule=='gmi') {echo  $d25fPg;} else {echo $d25fPf;} ?></td>
    <td align='right' rowspan="2"><?php if ( $rule=='c9') {echo "32/40";} elseif ( $rule=='gmi') {echo "60/75";} else {echo "42/54";}?> </td>
	</tr>
	
	<?php
if ($rule=='c9') {
  $gScore=($d25fP+$d50fP+$d75fP);
  $gScoreT=($d25fP+$d50fP+$d75fP)/40*100;
  $TGs='/10';}
elseif ($rule=='gmi') {
  $gScore=($d25fPg+$d50fPg+$d75fPg);
  $gScoreT=($d25fPg+$d50fPg+$d75fPg)/75*100;
  $TGs='/15';}
 elseif ($rule=='pbn') {
  $gScore=($d25fPf+$d50fPf+$d75fPf+$d75L+$d25L+$dL);
  $gScoreT=($d25fPf+$d50fPf+$d75fPf+$d75L+$d25L+$dL)/54*100;
  $TGs='/28';}

	?>
	
	<tr>
	<td bgcolor="#cccccc">Gray50</td>
	<td align='right' bgcolor="#cccccc"><?php echo  $gLT;?></td>
	<td align='right' bgcolor="#cccccc"><?php echo  round($Pam/2,1);?></td>
	<td align='right' bgcolor="#cccccc"><?php echo  round($Pbm/2,1);?></td>
	<td align='right' bgcolor="#cccccc"><?php echo  round($gLm,1);?></td>
	<td align='right' bgcolor="#cccccc"><?php echo  round($gam,1);?></td>
	<td align='right' bgcolor="#cccccc"><?php echo  round($gbm,1);?></td>
	<td align='right' bgcolor="#cccccc"><?php if (abs($gLm-$gLT)>2.5) {echo "<font color='red'>";}echo  round($gLm-$gLT,1);?></td>
	
	<td align='right' bgcolor="#cccccc"><?php if (abs($df)>2.5) {echo "<font color='red'>";} echo  round($df,1);?></td>
	<?php if ($rule=='pbn') {echo '<td align="right" bgcolor="#cccccc">'; echo  round($dL,1).'</td>';} ?>
	<td align='right' bgcolor="#cccccc"><?php if ( $rule=='c9'){echo  $d50fP;} elseif ($rule=='gmi') {echo  $d50fPg;} else {echo $d50fPf;} ?></td>
	<td align='right' bgcolor="#cccccc"><?php echo  round($gScore,0).$TGs;?></td>
    </tr>
	<tr>
	<td bgcolor="#bbbbbb">Gray75</td>
	<td align='right' bgcolor="#dddddd"><?php echo  $g75LT;?></td>
	<td align='right' bgcolor="#bbbbbb"><?php echo  round($Pam*0.25,1);?></td>
	<td align='right' bgcolor="#bbbbbb"><?php echo  round($Pbm*0.25,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php echo  round($g75Lm,1);?></td>
	<td align='right' bgcolor="#bbbbbb"><?php echo  round($g75am,1);?></td>
	<td align='right' bgcolor="#bbbbbb"><?php echo  round($g75bm,1);?></td>
	<td align='right' bgcolor="#dddddd"><?php if (abs($g75Lm-$g75LT)>2.5) {echo "<font color='red'>";} echo  round($g75Lm-$g75LT,1);?></td>
	
	<td align='right' bgcolor="#bbbbbb"><?php if (abs($d75f)>2.5) {echo "<font color='red'>";}  echo  round($d75f,1);?></td>
	<?php if ($rule=='pbn') {echo '<td align="right" bgcolor="#dddddd">';  echo  round($d75L,1).'</td>';} ?>
	<td align='right' bgcolor="#bbbbbb"><?php if ( $rule=='c9') {echo  $d75fP;} elseif ($rule=='gmi') {echo  $d75fPg;} else {echo $d75fPf;} ?></td>
	<td align='right' bgcolor="<?php 
	
	if ($c9sum<32 and $rule=='c9') {echo "#ebaabf";} 
	elseif ($gmisum<60 and $rule=='gmi'){echo "#ebaabf";} 
	elseif ($ct25sum<42 and $rule=='pbn'){echo "#ebaabf";}
	else {echo "#00FF7A";}?>"><?php if ( $rule=='c9') {echo  $c9sum."/40=".round(($c9sum/40*100),2)."%";} elseif ($rule=='gmi')  {echo  $gmisum."/75=".round(($gmisum/75*100),2)."%";} else {echo  $ct25sum."/54=".round(($ct25sum/54*100),2)."%";}?></td> 
	
	<td align='right' bgcolor="#cccccc"><?php echo  round($gScoreT,2)."%";?></td>
	
	</tr>
	
</table>
<table width="400" border="1" align="center">
<a href="6pmmTVI-parsingCTOKXct25ipGL.php?f123=target.txt&f321=<?php echo $f321;?>&target=<?php echo $aim;?>&rule=<?php echo $rule;?>&more=0">less<-</a>
<a href="6pmmTVI-parsingCTOKXct25ipGL.php?f123=target.txt&f321=<?php echo $f321;?>&target=<?php echo $aim;?>&rule=<?php echo $rule;?>&more=1">->more</a>
</table>


<?php
$more=$_GET['more'];
if ($more==1) {
echo "";}
else {
echo  "<!--  ";	
}


$cadexmin=min($hexCa3,$hexCa6,$hexCa9,$hexCa12,$hexCa15,$hexCa18,$hexCa21,$hexCa24,$hexCa27,$hexCa30,$ca)-0.5;
$cadexmax=max($hexCa3,$hexCa6,$hexCa9,$hexCa12,$hexCa15,$hexCa18,$hexCa21,$hexCa24,$hexCa27,$hexCa30,$ca)+0.5;

$cbdexmin=min($hexCb3,$hexCb6,$hexCb9,$hexCb12,$hexCb15,$hexCb18,$hexCb21,$hexCb24,$hexCb27,$hexCb30,$cb)-0.5;
$cbdexmax=max($hexCb3,$hexCb6,$hexCb9,$hexCb12,$hexCb15,$hexCb18,$hexCb21,$hexCb24,$hexCb27,$hexCb30,$cb)+0.5;


$madexmin=min($hexMa3,$hexMa6,$hexMa9,$hexMa12,$hexMa15,$hexMa18,$hexMa21,$hexMa24,$hexMa27,$hexMa30,$ma)-0.5;
$madexmax=max($hexMa3,$hexMa6,$hexMa9,$hexMa12,$hexMa15,$hexMa18,$hexMa21,$hexMa24,$hexMa27,$hexMa30,$ma)+0.5;

$mbdexmin=min($hexMb3,$hexMb6,$hexMb9,$hexMb12,$hexMb15,$hexMb18,$hexMb21,$hexMb24,$hexMb27,$hexMb30,$mb)-0.5;
$mbdexmax=max($hexMb3,$hexMb6,$hexMb9,$hexMb12,$hexMb15,$hexMb18,$hexMb21,$hexMb24,$hexMb27,$hexMb30,$mb)+0.5;

$yadexmin=min($hexYa3,$hexYa6,$hexYa9,$hexYa12,$hexYa15,$hexYa18,$hexYa21,$hexYa24,$hexYa27,$hexYa30,$ya)-0.5;
$yadexmax=max($hexYa3,$hexYa6,$hexYa9,$hexYa12,$hexYa15,$hexYa18,$hexYa21,$hexYa24,$hexYa27,$hexYa30,$ya)+0.5;

$ybdexmin=min($hexYb3,$hexYb6,$hexYb9,$hexYb12,$hexYb15,$hexYb18,$hexYb21,$hexYb24,$hexYb27,$hexYb30,$yb)-0.5;
$ybdexmax=max($hexYb3,$hexYb6,$hexYb9,$hexYb12,$hexYb15,$hexYb18,$hexYb21,$hexYb24,$hexYb27,$hexYb30,$yb)+0.5;


$kadexmin=min($hexKa3,$hexKa6,$hexKa9,$hexKa12,$hexKa15,$hexKa18,$hexKa21,$hexKa24,$hexKa27,$hexKa30,$ka)-0.5;
$kadexmax=max($hexKa3,$hexKa6,$hexKa9,$hexKa12,$hexKa15,$hexKa18,$hexKa21,$hexKa24,$hexKa27,$hexKa30,$ka)+0.5;

$kbdexmin=min($hexKb3,$hexKb6,$hexKb9,$hexKb12,$hexKb15,$hexKb18,$hexKb21,$hexKb24,$hexKb27,$hexKb30,$kb)-0.5;
$kbdexmax=max($hexKb3,$hexKb6,$hexKb9,$hexKb12,$hexKb15,$hexKb18,$hexKb21,$hexKb24,$hexKb27,$hexKb30,$kb)+0.5;



?>







<?php
$mopld=$moptL-$ml;
$mld=$mlm-$ml;
?>
<script>

         google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawVisualization);

      function drawVisualization() {
        // Some raw data (not necessarily accurate)
        var data = google.visualization.arrayToDataTable([
          ['', 'best de','sample'],
          ['',  <?=$mld?>,<?=$mopld?>],
          
        ]);

        var options = {
		legend: 'none',
          vAxis: {title: 'L*',viewWindow: {min:-5, max:5}},
          hAxis: {title: 'measured--Best'},
          seriesType: 'bars',
          series: {0: {color: 'red'},
		  1: {color: 'blue'}}
        };

        var chart = new google.visualization.ComboChart(document.getElementById('chart_divML'));
        chart.draw(data, options);
      }

</script>







	










<script type='text/javascript'>
google.load('visualization', '1.0', 
{'packages':['corechart'], 
'callback': drawchart});

var chartData;
var myLineChart;
var options;

function drawchart() {

        var dataH = google.visualization.arrayToDataTable
            ([["a*","", ''],
              [<?=$ca?>, <?=$cb?>, null],
              [<?=$gra?>, <?=$grb?>,   null],
              [<?=$ya?>, <?=$yb?>,   null],
              [<?=$ra?>, <?=$rb?>,   null],
              [<?=$ma?>, <?=$mb?>,   null],
              [<?=$ba?>, <?=$bb?>,   null],
              [<?=$ca?>, <?=$cb?>,   null], 
              [<?=$cam?>,   null,   <?=$cbm?>],
              [<?=$gram?>,  null,   <?=$grbm?>],
              [<?=$yam?>,   null,   <?=$ybm?>],
              [<?=$ram?>,   null,   <?=$rbm?>],
              [<?=$mam?>,   null,   <?=$mbm?>],
              [<?=$bam?>,   null,   <?=$bbm?>],
              [<?=$cam?>,   null,   <?=$cbm?>], 

			]);

options = {height: 600,width: 600,
hAxis: {title: 'a* (Target as Green)',gridlines: {count: 20}},
vAxis: {title: 'b*',gridlines: {count: 20}},
chartArea: {top:40, width: '70%', height: '75%'},
legend: {position: 'none'},
pointSize: 5,
colors: ['green','red'],
backgroundColor: 'none'
};

myLineChart = new google.visualization.LineChart(document.getElementById('chart1'));
myLineChart.draw(dataH, options);


}
</script>
 
  <table width='200'  align='center'><tr><td>
  <div id='brand_div' >
  <div id='chart1'></div>
  </td></tr></table> 
  
 <?php 
 //echo "dec00:".$dec00;
if ($dec00<3.5){
$pfc='#00D06A';}
else {
$pfc='red';	
//echo "pfc red:".$pfc;
}
//echo "pfc:".$pfc;
$cminR2=round($cmin,2);
$mminR2=round($mmin,2);
$yminR2=round($ymin,2);
$kminR2=round($kmin,2);

$dec00R2=round($dec00,2);
$dem00R2=round($dem00,2);
$dey00R2=round($dey00,2);
$dek00R2=round($dek00,2);

$cdmR2=round($cdm,2);
$coptDR2=round($coptD,2);
$mdmR2=round($mdm,2);
$moptDR2=round($moptD,2);
$ydmR2=round($ydm,2);
$yoptDR2=round($yoptD,2);
$kdmR2=round($kdm,2);
$koptDR2=round($koptD,2);
 ?> 
 <script>
 var pfc=<?php echo json_encode($pfc); ?>;

function drawChart() {
    var data1 = (
    		[
       ["濃度","預測色差"], //依序表示x軸,第一個y軸,第二個y軸
        [<?=$c1dd?>,<?=$dc176?>],
        [<?=$c2dd?>,<?=$dc276?>],
        [<?=$c3dd?>,<?=$dc376?>],
        [<?=$c4dd?>,<?=$dc476?>],
        [<?=$c5dd?>,<?=$dc576?>],
        [<?=$c6dd?>,<?=$dc676?>],
        [<?=$c7dd?>,<?=$dc776?>],
        [<?=$c8dd?>,<?=$dc876?>],
        [<?=$c9dd?>,<?=$dc976?>],
        [<?=$c10dd?>,<?=$dc1076?>],		
        [<?=$c11dd?>,<?=$dc1176?>],
        [<?=$c12dd?>,<?=$dc1276?>],
        [<?=$c13dd?>,<?=$dc1376?>],
        [<?=$c14dd?>,<?=$dc1476?>],
        [<?=$c15dd?>,<?=$dc1576?>],
        [<?=$c16dd?>,<?=$dc1676?>],
        [<?=$c17dd?>,<?=$dc1776?>],
        [<?=$c18dd?>,<?=$dc1876?>],
        [<?=$c19dd?>,<?=$dc1976?>],
        [<?=$c20dd?>,<?=$dc2076?>],	
        [<?=$c21dd?>,<?=$dc2176?>],
        [<?=$c22dd?>,<?=$dc2276?>],
        [<?=$c23dd?>,<?=$dc2376?>],
        [<?=$c24dd?>,<?=$dc2476?>],
        [<?=$c25dd?>,<?=$dc2576?>],
        [<?=$c26dd?>,<?=$dc2676?>],
        [<?=$c27dd?>,<?=$dc2776?>],
        [<?=$c28dd?>,<?=$dc2876?>],
        [<?=$c29dd?>,<?=$dc2976?>],
        [<?=$c30dd?>,<?=$dc3076?>],
    ]);
    var dt1 = google.visualization.arrayToDataTable(data1);
    
    var data2 = new google.visualization.DataTable();
    data2.addColumn('number', 'X');
    data2.addColumn('number', '量測位置/寬容值');
	

	
    data2.addRows([
        [<?=$c1dd?>, 3.5],
        [<?=$cdm?>, 3.5],
        [<?=$cdm?>, 0],
		[<?=$cdm?>, 3.5],
        [<?=$c30dd?>, 3.5]
    ]);
    
    
    var data3 = ([
        ["X","最佳色差"],
		[<?=$coptD?>,<?=$cmin?>],
		 [<?=$coptD?>,0]
    ]);
    var dt3 = google.visualization.arrayToDataTable(data3);
    
    var joinedData = google.visualization.data.join(dt1, data2, 'full', [[0, 0]], [1], [1]);
    var joinedData2 = google.visualization.data.join(joinedData, dt3, 'full', [[0, 0]], [1,2], [1]);
    
    var chart = new google.visualization.LineChart(document.querySelector('#chart_c'));
    chart.draw(joinedData2, {
        vAxis: {title: 'ΔE00', maxValue: 8,gridlines: {count: 20}},
        hAxis:  {title: '量測濃度:'+<?=$cdmR2?>+':量測色差: '+<?=$dec00R2?>+'<::>預測濃度:'+<?=$coptDR2?>+':預測色差: '+<?=$cminR2?>,gridlines: {count: 20}},
		pointSize: 5,
		 colors: ['#00bacb',pfc,'blue'],
        interpolateNulls: true
    });
	

	
	
}
google.load('visualization', '1', {packages:['corechart'], callback: drawChart});
</script>

<script>

       google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable
            ([["a*","", {'type': 'string', 'role': 'style'},{'type': 'string', 'role': 'annotation'}],
              [<?=$hexCa3?>, <?=$hexCb3?>, null, null],
              [<?=$hexCa6?>, <?=$hexCb6?>, null, null],
              [<?=$hexCa9?>, <?=$hexCb9?>, null, null],
              [<?=$hexCa12?>, <?=$hexCb12?>, null, null],
              [<?=$hexCa15?>, <?=$hexCb15?>, null, null],
              [<?=$hexCa18?>, <?=$hexCb18?>, null, null],
              [<?=$hexCa21?>, <?=$hexCb21?>, null, null], 
              [<?=$hexCa24?>, <?=$hexCb24?>, null, null],
			  [<?=$hexCa27?>, <?=$hexCb27?>, null, null],
			  [<?=$hexCa30?>, <?=$hexCb30?>, null, null],
			   [<?=$ca?>, <?=$cb?>, 'point { size: 10; shape-type: star; fill-color: green; }', 'Target'],
			   [<?=$cam?>, <?=$cbm?>, 'point { size: 7; shape-type: circle; fill-color: '+pfc+'; }', 'measured: ΔE'+<?=$dec00R2?>],
			   [<?=$copta?>, <?=$coptb?>, 'point { size: 10; shape-type: star; fill-color: #0012FE; }', 'Best: ΔE'+<?=$cminR2?>],

			   
        ]);

        var options = {
         legend: 'none',
          hAxis: {title: 'a*', viewWindow: {min: <?=$cadexmin?>, max:<?=$cadexmax?>},gridlines: {count: 5}},
          vAxis: {title: 'b*', viewWindow: {min: <?=$cbdexmin?>, max:<?=$cbdexmax?>},gridlines: {count: 5}},
          curveType: 'function',
          pointSize: 7,
          dataOpacity: 0.9,
		  colors:['#5586FB'],
		  backgroundColor: 'none'
        };

        var chart = new google.visualization.ScatterChart(document.getElementById('chart_divC'));
        chart.draw(data, options);
    }

</script>


<?php
$copld=$coptL-$cl;
$cld=$clm-$cl;
?>


  <script type="text/javascript">
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "L*", { role: "style" }, { role: 'annotation' } ],
        ["Measure", <?=$cld?>, pfc, <?=$cld?>],
        ["Best",<?=$copld?>, "color: blue",<?=$copld?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'L*', viewWindow: {min: -5, max:5}},
        bar: {groupWidth: "95%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divCL2"));
      chart.draw(view, options);
  }
  </script>


 <table border="1" align='center'>
 <tr>
<td> <div id="chart_c" style="width: 620px; height: 230px;"></div></td>
<td> <div id='brand_c'><div id="chart_divC" style="width: 200px; height: 230px;"></div></td>
<td> <div id="chart_divCL2" style="width: 200px; height: 230px;"></div></td>
</tr>
</table>






 <?php 
if ($dem00<3.5){
$pfm='00D06A';}
else {
$pfm='red';	
}
 ?> 
 <script>
 var pfm=<?php echo json_encode($pfm); ?>;

function drawChart() {
    var data1 = (
    		[
       ["濃度","預測色差"], //依序表示x軸,第一個y軸,第二個y軸
        [<?=$m1dd?>,<?=$dm176?>],
        [<?=$m2dd?>,<?=$dm276?>],
        [<?=$m3dd?>,<?=$dm376?>],
        [<?=$m4dd?>,<?=$dm476?>],
        [<?=$m5dd?>,<?=$dm576?>],
        [<?=$m6dd?>,<?=$dm676?>],
        [<?=$m7dd?>,<?=$dm776?>],
        [<?=$m8dd?>,<?=$dm876?>],
        [<?=$m9dd?>,<?=$dm976?>],
        [<?=$m10dd?>,<?=$dm1076?>],		
        [<?=$m11dd?>,<?=$dm1176?>],
        [<?=$m12dd?>,<?=$dm1276?>],
        [<?=$m13dd?>,<?=$dm1376?>],
        [<?=$m14dd?>,<?=$dm1476?>],
        [<?=$m15dd?>,<?=$dm1576?>],
        [<?=$m16dd?>,<?=$dm1676?>],
        [<?=$m17dd?>,<?=$dm1776?>],
        [<?=$m18dd?>,<?=$dm1876?>],
        [<?=$m19dd?>,<?=$dm1976?>],
        [<?=$m20dd?>,<?=$dm2076?>],	
        [<?=$m21dd?>,<?=$dm2176?>],
        [<?=$m22dd?>,<?=$dm2276?>],
        [<?=$m23dd?>,<?=$dm2376?>],
        [<?=$m24dd?>,<?=$dm2476?>],
        [<?=$m25dd?>,<?=$dm2576?>],
        [<?=$m26dd?>,<?=$dm2676?>],
        [<?=$m27dd?>,<?=$dm2776?>],
        [<?=$m28dd?>,<?=$dm2876?>],
        [<?=$m29dd?>,<?=$dm2976?>],
        [<?=$m30dd?>,<?=$dm3076?>],
    ]);
    var dt1 = google.visualization.arrayToDataTable(data1);
    
    var data2 = new google.visualization.DataTable();
    data2.addColumn('number', 'X');
    data2.addColumn('number', '量測位置/寬容值');
	

	
    data2.addRows([
        [<?=$m1dd?>, 3.5],
        [<?=$mdm?>, 3.5],
        [<?=$mdm?>, 0],
		[<?=$mdm?>, 3.5],
        [<?=$m30dd?>, 3.5]
    ]);
    
    
    var data3 = ([
        ["X","最佳色差"],
		[<?=$moptD?>,<?=$mmin?>],
		 [<?=$moptD?>,0]
    ]);
    var dt3 = google.visualization.arrayToDataTable(data3);
    
    var joinedData = google.visualization.data.join(dt1, data2, 'full', [[0, 0]], [1], [1]);
    var joinedData2 = google.visualization.data.join(joinedData, dt3, 'full', [[0, 0]], [1,2], [1]);
    
    var chart = new google.visualization.LineChart(document.querySelector('#chart_m'));

	    chart.draw(joinedData2, {
        vAxis: {title: 'ΔE00', maxValue: 8,gridlines: {count: 20}},
        hAxis:  {title: '量測濃度:'+<?=$mdmR2?>+':量測色差: '+<?=$dem00R2?>+'<::>預測濃度:'+<?=$moptDR2?>+':預測色差: '+<?=$mminR2?>,gridlines: {count: 20}},
		pointSize: 5,
		 colors: ['#FF007A',pfm,'blue'],
        interpolateNulls: true
    });
	
}
google.load('visualization', '1', {packages:['corechart'], callback: drawChart});
</script>

<script>

       google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable
            ([["a*","", {'type': 'string', 'role': 'style'},{'type': 'string', 'role': 'annotation'}],
              [<?=$hexMa3?>, <?=$hexMb3?>, null, null],
              [<?=$hexMa6?>, <?=$hexMb6?>, null, null],
              [<?=$hexMa9?>, <?=$hexMb9?>, null, null],
              [<?=$hexMa12?>, <?=$hexMb12?>, null, null],
              [<?=$hexMa15?>, <?=$hexMb15?>, null, null],
              [<?=$hexMa18?>, <?=$hexMb18?>, null, null],
              [<?=$hexMa21?>, <?=$hexMb21?>, null, null], 
              [<?=$hexMa24?>, <?=$hexMb24?>, null, null],
			  [<?=$hexMa27?>, <?=$hexMb27?>, null, null],
			  [<?=$hexMa30?>, <?=$hexMb30?>, null, null],
			   [<?=$ma?>, <?=$mb?>, 'point { size: 10; shape-type: star; fill-color: green; }', 'Target'],
			   [<?=$mam?>, <?=$mbm?>, 'point { size: 7; shape-type: circle; fill-color: '+pfm+'; }', 'measured: ΔE'+<?=$dem00R2?>],
			   [<?=$mopta?>, <?=$moptb?>, 'point { size: 10; shape-type: star; fill-color: #0012FE; }', 'Best ΔE'+<?=$mminR2?>],

			   
        ]);

        var options = {
          legend: 'none',
          hAxis: {title: 'a*', viewWindow: {min: <?=$madexmin?>, max:<?=$madexmax?>},gridlines: {count: 5}},
          vAxis: {title: 'b*', viewWindow: {min: <?=$mbdexmin?>, max:<?=$mbdexmax?>},gridlines: {count: 5}},
          curveType: 'function',
          pointSize: 7,
          dataOpacity: 0.9,
		  colors:['#FE00F5'],
		  backgroundColor: 'none'
        };

        var chart = new google.visualization.ScatterChart(document.getElementById('chart_divM'));
        chart.draw(data, options);
    }

</script>

  <script type="text/javascript">
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "L*", { role: "style" }, { role: 'annotation' } ],
        ["Measure", <?=$mld?>, pfm, <?=$mld?>],
        ["Best",<?=$mopld?>, "color: blue",<?=$mopld?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'L*', viewWindow: {min: -5, max:5}},
        bar: {groupWidth: "95%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divML2"));
      chart.draw(view, options);
  }
  </script>






  <table border="1" align='center'><tr><td> <div id="chart_m" style="width: 620px; height: 230px;"></div></td>
	<td><div id='brand_m' >
    <div id="chart_divM" style="width: 200px; height: 230px;"></div>
	</td><td> 
    <div id="chart_divML2" style="width: 200px; height: 230px;"></div>
	</td></tr></table>

 <?php 
if ($dey00<3.5){
$pfy='00D06A';}
else {
$pfy='red';	
}
 ?> 
 <script>
 var pfy=<?php echo json_encode($pfy); ?>;
function drawChart() {
    var data1 = (
    		[
       ["濃度","預測色差"], //依序表示x軸,第一個y軸,第二個y軸
        [<?=$y1dd?>,<?=$dy176?>],
        [<?=$y2dd?>,<?=$dy276?>],
        [<?=$y3dd?>,<?=$dy376?>],
        [<?=$y4dd?>,<?=$dy476?>],
        [<?=$y5dd?>,<?=$dy576?>],
        [<?=$y6dd?>,<?=$dy676?>],
        [<?=$y7dd?>,<?=$dy776?>],
        [<?=$y8dd?>,<?=$dy876?>],
        [<?=$y9dd?>,<?=$dy976?>],
        [<?=$y10dd?>,<?=$dy1076?>],		
        [<?=$y11dd?>,<?=$dy1176?>],
        [<?=$y12dd?>,<?=$dy1276?>],
        [<?=$y13dd?>,<?=$dy1376?>],
        [<?=$y14dd?>,<?=$dy1476?>],
        [<?=$y15dd?>,<?=$dy1576?>],
        [<?=$y16dd?>,<?=$dy1676?>],
        [<?=$y17dd?>,<?=$dy1776?>],
        [<?=$y18dd?>,<?=$dy1876?>],
        [<?=$y19dd?>,<?=$dy1976?>],
        [<?=$y20dd?>,<?=$dy2076?>],	
        [<?=$y21dd?>,<?=$dy2176?>],
        [<?=$y22dd?>,<?=$dy2276?>],
        [<?=$y23dd?>,<?=$dy2376?>],
        [<?=$y24dd?>,<?=$dy2476?>],
        [<?=$y25dd?>,<?=$dy2576?>],
        [<?=$y26dd?>,<?=$dy2676?>],
        [<?=$y27dd?>,<?=$dy2776?>],
        [<?=$y28dd?>,<?=$dy2876?>],
        [<?=$y29dd?>,<?=$dy2976?>],
        [<?=$y30dd?>,<?=$dy3076?>],
    ]);
    var dt1 = google.visualization.arrayToDataTable(data1);
    
    var data2 = new google.visualization.DataTable();
    data2.addColumn('number', 'X');
    data2.addColumn('number', '量測位置/寬容值');
	

	
    data2.addRows([
        [<?=$y1dd?>, 3.5],
        [<?=$ydm?>, 3.5],
        [<?=$ydm?>, 0],
		[<?=$ydm?>, 3.5],
        [<?=$y30dd?>, 3.5]
    ]);
    
    
    var data3 = ([
        ["X","最佳色差"],
		[<?=$yoptD?>,<?=$ymin?>],
		 [<?=$yoptD?>,0]
    ]);
	
    var dt3 = google.visualization.arrayToDataTable(data3);
    
    var joinedData = google.visualization.data.join(dt1, data2, 'full', [[0, 0]], [1], [1]);
    var joinedData2 = google.visualization.data.join(joinedData, dt3, 'full', [[0, 0]], [1,2], [1]);
    
    var chart = new google.visualization.LineChart(document.querySelector('#chart_y'));

	
		    chart.draw(joinedData2, {
        vAxis: {title: 'ΔE00', maxValue: 8,gridlines: {count: 20}},
        hAxis:  {title: '量測濃度:'+<?=$ydmR2?>+':量測色差: '+<?=$dey00R2?>+'<::>預測濃度:'+<?=$yoptDR2?>+':預測色差: '+<?=$yminR2?>,gridlines: {count: 20}},
		pointSize: 5,
		 colors: ['#E0D900',pfy,'blue'],
        interpolateNulls: true
    });
}
google.load('visualization', '1', {packages:['corechart'], callback: drawChart});
</script>
<script>

       google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable
            ([["a*","", {'type': 'string', 'role': 'style'},{'type': 'string', 'role': 'annotation'}],
              [<?=$hexYa3?>, <?=$hexYb3?>, null, null],
              [<?=$hexYa6?>, <?=$hexYb6?>, null, null],
              [<?=$hexYa9?>, <?=$hexYb9?>, null, null],
              [<?=$hexYa12?>, <?=$hexYb12?>, null, null],
              [<?=$hexYa15?>, <?=$hexYb15?>, null, null],
              [<?=$hexYa18?>, <?=$hexYb18?>, null, null],
              [<?=$hexYa21?>, <?=$hexYb21?>, null, null], 
              [<?=$hexYa24?>, <?=$hexYb24?>, null, null],
			  [<?=$hexYa27?>, <?=$hexYb27?>, null, null],
			  [<?=$hexYa30?>, <?=$hexYb30?>, null, null],
			   [<?=$ya?>, <?=$yb?>, 'point { size: 10; shape-type: star; fill-color: green; }', 'Target'],
			   [<?=$yam?>, <?=$ybm?>, 'point { size: 7; shape-type: circle; fill-color: '+pfy+'; }', 'measured: ΔE'+<?=$dey00R2?>],
			   [<?=$yopta?>, <?=$yoptb?>, 'point { size: 10; shape-type: star; fill-color: #0012FE; }', 'Best ΔE'+<?=$yminR2?>],

			   
        ]);

        var options = {
          legend: 'none',
          hAxis: {title: 'a*', viewWindow: {min: <?=$yadexmin?>, max:<?=$yadexmax?>},gridlines: {count: 5}},
          vAxis: {title: 'b*', viewWindow: {min: <?=$ybdexmin?>, max:<?=$ybdexmax?>},gridlines: {count: 5}},
          curveType: 'function',
          pointSize: 7,
          dataOpacity: 0.9,
		  colors:['#DBE300'],
		  backgroundColor: 'none'
        };

        var chart = new google.visualization.ScatterChart(document.getElementById('chart_divY'));
        chart.draw(data, options);
    }

</script>
<?php
$yopld=$yoptL-$yl;
$yld=$ylm-$yl;
?>



  <script type="text/javascript">
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "L*", { role: "style" }, { role: 'annotation' } ],
        ["Measure", <?=$yld?>, pfy, <?=$yld?>],
        ["Best",<?=$yopld?>, "color: blue",<?=$yopld?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'L*', viewWindow: {min: -5, max:5}},
        bar: {groupWidth: "95%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divYL2"));
      chart.draw(view, options);
  }
  </script>




  <table  border="1" align='center'><tr><td> <div id="chart_y" style="width: 620px; height: 230px;"></div></td>
	<td><div id='brand_y' >
    <div id="chart_divY" style="width:200px; height:230px;"></div>
	</td><td> 
    <div id="chart_divYL2" style="width:200px; height:230px;"></div>
	</td></tr></table>
 
 <?php 
if ($dek00<3.5){
$pfk='00D06A';}
else {
$pfk='red';	
}
 ?> 
 <script>
 var pfk=<?php echo json_encode($pfk); ?>;
function drawChart() {
    var data1 = (
    		[
       ["濃度","預測色差"], //依序表示x軸,第一個y軸,第二個y軸
        [<?=$k1dd?>,<?=$dk176?>],
        [<?=$k2dd?>,<?=$dk276?>],
        [<?=$k3dd?>,<?=$dk376?>],
        [<?=$k4dd?>,<?=$dk476?>],
        [<?=$k5dd?>,<?=$dk576?>],
        [<?=$k6dd?>,<?=$dk676?>],
        [<?=$k7dd?>,<?=$dk776?>],
        [<?=$k8dd?>,<?=$dk876?>],
        [<?=$k9dd?>,<?=$dk976?>],
        [<?=$k10dd?>,<?=$dk1076?>],		
        [<?=$k11dd?>,<?=$dk1176?>],
        [<?=$k12dd?>,<?=$dk1276?>],
        [<?=$k13dd?>,<?=$dk1376?>],
        [<?=$k14dd?>,<?=$dk1476?>],
        [<?=$k15dd?>,<?=$dk1576?>],
        [<?=$k16dd?>,<?=$dk1676?>],
        [<?=$k17dd?>,<?=$dk1776?>],
        [<?=$k18dd?>,<?=$dk1876?>],
        [<?=$k19dd?>,<?=$dk1976?>],
        [<?=$k20dd?>,<?=$dk2076?>],	
        [<?=$k21dd?>,<?=$dk2176?>],
        [<?=$k22dd?>,<?=$dk2276?>],
        [<?=$k23dd?>,<?=$dk2376?>],
        [<?=$k24dd?>,<?=$dk2476?>],
        [<?=$k25dd?>,<?=$dk2576?>],
        [<?=$k26dd?>,<?=$dk2676?>],
        [<?=$k27dd?>,<?=$dk2776?>],
        [<?=$k28dd?>,<?=$dk2876?>],
        [<?=$k29dd?>,<?=$dk2976?>],
        [<?=$k30dd?>,<?=$dk3076?>],
    ]);
    var dt1 = google.visualization.arrayToDataTable(data1);
    
    var data2 = new google.visualization.DataTable();
    data2.addColumn('number', 'X');
    data2.addColumn('number', '量測位置/寬容值');
	

	
    data2.addRows([
        [<?=$k1dd?>, 5],
        [<?=$kdm?>, 5],
        [<?=$kdm?>, 0],
		[<?=$kdm?>, 5],
        [<?=$k30dd?>, 5]
    ]);
    
    
    var data3 = ([
        ["X","最佳色差"],
		[<?=$koptD?>,<?=$kmin?>],
		 [<?=$koptD?>,0]
    ]);
    var dt3 = google.visualization.arrayToDataTable(data3);
    
    var joinedData = google.visualization.data.join(dt1, data2, 'full', [[0, 0]], [1], [1]);
    var joinedData2 = google.visualization.data.join(joinedData, dt3, 'full', [[0, 0]], [1,2], [1]);
    
    var chart = new google.visualization.LineChart(document.querySelector('#chart_k'));

	chart.draw(joinedData2, {
        vAxis: {title: 'ΔE00', maxValue: 8,gridlines: {count: 20}},
        hAxis:  {title: '量測濃度:'+<?=$kdmR2?>+':量測色差: '+<?=$dek00R2?>+'<::>預測濃度:'+<?=$koptDR2?>+':預測色差: '+<?=$kminR2?>,gridlines: {count: 20}},
		pointSize: 5,
		 colors: ['#777777',pfk,'blue'],
        interpolateNulls: true
    });
}
google.load('visualization', '1', {packages:['corechart'], callback: drawChart});
</script>


<script>

       google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable
            ([["a*","", {'type': 'string', 'role': 'style'},{'type': 'string', 'role': 'annotation'}],
              [<?=$hexKa3?>, <?=$hexKb3?>, null, null],
              [<?=$hexKa6?>, <?=$hexKb6?>, null, null],
              [<?=$hexKa9?>, <?=$hexKb9?>, null, null],
              [<?=$hexKa12?>, <?=$hexKb12?>, null, null],
              [<?=$hexKa15?>, <?=$hexKb15?>, null, null],
              [<?=$hexKa18?>, <?=$hexKb18?>, null, null],
              [<?=$hexKa21?>, <?=$hexKb21?>, null, null], 
              [<?=$hexKa24?>, <?=$hexKb24?>, null, null],
			  [<?=$hexKa27?>, <?=$hexKb27?>, null, null],
			  [<?=$hexKa30?>, <?=$hexKb30?>, null, null],
			   [<?=$ka?>, <?=$kb?>, 'point { size: 10; shape-type: star; fill-color: green; }', 'Target'],
			   [<?=$kam?>, <?=$kbm?>, 'point { size: 7; shape-type: circle; fill-color: '+pfk+'; }', 'measured: ΔE'+<?=$dek00R2?>],
			   [<?=$kopta?>, <?=$koptb?>, 'point { size: 10; shape-type: star; fill-color: #0012FE; }', 'Best ΔE'+<?=$kminR2?>],
			   
        ]);

        var options = {
          legend: 'none',
          hAxis: {title: 'a*', viewWindow: {min: <?=$kadexmin?>, max:<?=$kadexmax?>},gridlines: {count: 5}},
          vAxis: {title: 'b*', viewWindow: {min: <?=$kbdexmin?>, max:<?=$kbdexmax?>},gridlines: {count: 5}},
          curveType: 'function',
          pointSize: 7,
          dataOpacity: 0.9,
		  colors:['gray'],
		  backgroundColor: 'none'
        };

        var chart = new google.visualization.ScatterChart(document.getElementById('chart_divG'));
        chart.draw(data, options);
    }

</script>




<?php
$kopld=$koptL-$kl;
$kld=$klm-$kl;
?>


  <script type="text/javascript">
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "L*", { role: "style" }, { role: 'annotation' } ],
        ["Measure", <?=$kld?>, pfk, <?=$kld?>],
        ["Best",<?=$kopld?>, "color: blue",<?=$kopld?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'L*', viewWindow: {min: -5, max:5}},
        bar: {groupWidth: "95%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divKL2"));
      chart.draw(view, options);
  }
  </script>



 <table border="1" align='center'><tr><td> <div id="chart_k" style="width: 620px; height: 230px;"></div></td><td> 
	<div id='brand_g' >
    <div id="chart_divG" style="width: 200px; height: 230px;"></div>
	</td>
	<td> 
    <div id="chart_divKL2" style="width: 200px; height: 230px;"></div>
	</td></tr></table>


 <?php
if (abs($k25TVI)<4){
$TVK25cc='#aFaFaF';}
else {
$TVK25cc='red';	
}
if (abs($c25TVI)<4){
$TVC25cc='#ACE2E6';}
else {
$TVC25cc='red';	
}
if (abs($m25TVI)<4){
$TVM25cc='#FFC3C2';}
else {
$TVM25cc='red';	
}
if (abs($y25TVI)<4){
$TVY25cc='#F7FBA5';}
else {
$TVY25cc='red';	
}

?>

  <script type="text/javascript">
  var TVK25cc=<?php echo json_encode($TVK25cc); ?>;
  var TVC25cc=<?php echo json_encode($TVC25cc); ?>;
  var TVM25cc=<?php echo json_encode($TVM25cc); ?>;
  var TVY25cc=<?php echo json_encode($TVY25cc); ?>;
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "TVI", { role: "style" }, { role: 'annotation' } ],
        ["C25", <?=$c25TVI?>, "color:"+TVC25cc+"", <?=$c25TVI?>],
        ["M25",<?=$m25TVI?>, "color: "+TVM25cc+"",<?=$m25TVI?>],
        ["Y25",<?=$y25TVI?>, "color: "+TVY25cc+"",<?=$y25TVI?>],
        ["K25",<?=$k25TVI?>, "color: "+TVK25cc+"",<?=$k25TVI?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'TVI*', viewWindow: {min: -7, max:7}},
        width: 340,
        height: 240,
        bar: {groupWidth: "95%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divTV25"));
      chart.draw(view, options);
  }
  </script>
 <?php
if (abs($k50TVI)<4){
$TVK50cc='#7F7F7F';}
else {
$TVK50cc='red';	
}
if (abs($c50TVI)<4){
$TVC50cc='#91DEFC';}
else {
$TVC50cc='red';	
}
if (abs($m50TVI)<4){
$TVM50cc='#FFA3C3';}
else {
$TVM50cc='red';	
}
if (abs($y50TVI)<4){
$TVY50cc='#FBEDB7';}
else {
$TVY50cc='red';	
}

?>

  <script type="text/javascript">
  var TVK50cc=<?php echo json_encode($TVK50cc); ?>;
  var TVC50cc=<?php echo json_encode($TVC50cc); ?>;
  var TVM50cc=<?php echo json_encode($TVM50cc); ?>;
  var TVY50cc=<?php echo json_encode($TVY50cc); ?>;
  
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "TVI", { role: "style" }, { role: 'annotation' } ],
        ["C50", <?=$c50TVI?>, "color: "+TVC50cc+"", <?=$c50TVI?>],
        ["M50",<?=$m50TVI?>, "color: "+TVM50cc+"",<?=$m50TVI?>],
        ["Y50",<?=$y50TVI?>, "color: "+TVY50cc+"",<?=$y50TVI?>],
        ["K50",<?=$k50TVI?>, "color: "+TVK50cc+"",<?=$k50TVI?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'TVI*', viewWindow: {min: -7, max:7}},
        width: 340,
        height: 240,
        bar: {groupWidth: "95%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divTV50"));
      chart.draw(view, options);
  }
  </script>

 <?php
if (abs($k75TVI)<4){
$TVK75cc='#636362';}
else {
$TVK75cc='red';	
}
if (abs($c75TVI)<4){
$TVC75cc='#00B2F3';}
else {
$TVC75cc='red';	
}
if (abs($m75TVI)<4){
$TVM75cc='#F7419B';}
else {
$TVM75cc='red';	
}
if (abs($y75TVI)<4){
$TVY75cc='#FFF919';}
else {
$TVY75cc='red';	
}

?>

  <script type="text/javascript">
  var TVK75cc=<?php echo json_encode($TVK75cc); ?>;
  var TVC75cc=<?php echo json_encode($TVC75cc); ?>;
  var TVM75cc=<?php echo json_encode($TVM75cc); ?>;
  var TVY75cc=<?php echo json_encode($TVY75cc); ?>;
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "TVI", { role: "style" }, { role: 'annotation' } ],
        ["C75", <?=$c75TVI?>, "color: "+TVC75cc+"", <?=$c75TVI?>],
        ["M75",<?=$m75TVI?>, "color: "+TVM75cc+"",<?=$m75TVI?>],
        ["Y75",<?=$y75TVI?>, "color: "+TVY75cc+"",<?=$y75TVI?>],
        ["K75",<?=$k75TVI?>, "color: "+TVK75cc+"",<?=$k75TVI?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'TVI', viewWindow: {min: -7, max:7}},
        width: 340,
        height: 240,
        bar: {groupWidth: "95%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divTV75"));
      chart.draw(view, options);
  }
  </script>


    <script type="text/javascript">
      google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable([
          ['dot', 'TV','Target'],
          ['0',  0,0],
          ['25',   <?=$c25TVI+$c25TVT-25?>,<?=$c25TVT-25?>],
          ['50',   <?=$c50TVI+$c50TVT-50?>,<?=$c50TVT-50?>],
          ['75',   <?=$c75TVI+$c75TVT-75?>,<?=$c75TVT-75?>],
		  ['100',  0,0]
        ]);

        var options = {
	      vAxis: {title: 'curve C', viewWindow: {min: 0, max:25}},
		  hAxis: {title: 'Target as Green'},
          curveType: 'function',
		   pointSize: 5,
		  width: 515,
          height: 240,
          legend: "none" ,
		  series: {0: {color: '#91DEFC'},1: {color: 'green'}}
        };

        var chart = new google.visualization.LineChart(document.getElementById('curve_C'));

        chart.draw(data, options);
      }
    </script>
  <script type="text/javascript">
      google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable([
          ['dot', 'TV','Target'],
          ['0',  0,0],
          ['25',   <?=$m25TVI+$m25TVT-25?>,<?=$m25TVT-25?>],
          ['50',   <?=$m50TVI+$m50TVT-50?>,<?=$m50TVT-50?>],
          ['75',   <?=$m75TVI+$m75TVT-75?>,<?=$c75TVT-75?>],
		  ['100',  0,0]
        ]);

        var options = {
	      vAxis: {title: 'curve M', viewWindow: {min: 0, max:25}},
		  hAxis: {title: 'Target as Green'},
          curveType: 'function',
		   pointSize: 5,
		  width: 515,
          height: 240,
          legend: "none" ,
		  series: {0: {color: '#FFA3C3'},1: {color: 'green'}}
        };

        var chart = new google.visualization.LineChart(document.getElementById('curve_M'));

        chart.draw(data, options);
      }
    </script>
	
	   <script type="text/javascript">
      google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable([
          ['dot', 'TV','Target'],
          ['0',  0,0],
          ['25',   <?=$y25TVI+$y25TVT-25?>,<?=$y25TVT-25?>],
          ['50',   <?=$y50TVI+$y50TVT-50?>,<?=$y50TVT-50?>],
          ['75',   <?=$y75TVI+$y75TVT-75?>,<?=$y75TVT-75?>],
		  ['100',  0,0]
        ]);

        var options = {
	      vAxis: {title: 'curve Y', viewWindow: {min: 0, max:25}},
		  hAxis: {title: 'Target as Green'},
          curveType: 'function',
		   pointSize: 5,
		  width: 515,
          height: 240,
          legend: "none" ,
		  series: {0: {color: '#F9FF00'},1: {color: 'green'}}
        };

        var chart = new google.visualization.LineChart(document.getElementById('curve_Y'));

        chart.draw(data, options);
      }
    </script>
  <script type="text/javascript">
      google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable([
          ['dot', 'TV','Target'],
          ['0',  0,0],
          ['25',   <?=$k25TVI+$k25TVT-25?>,<?=$k25TVT-25?>],
          ['50',   <?=$k50TVI+$k50TVT-50?>,<?=$k50TVT-50?>],
          ['75',   <?=$k75TVI+$k75TVT-75?>,<?=$k75TVT-75?>],
		  ['100',  0,0]
        ]);

        var options = {
	      vAxis: {title: 'curve K', viewWindow: {min: 0, max:25}},
		  hAxis: {title: 'Target as Green'},
          curveType: 'function',
		   pointSize: 5,
		  width: 515,
          height: 240,
          legend: "none" ,
		  series: {0: {color: '#7F7F7F'},1: {color: 'green'}}
        };

        var chart = new google.visualization.LineChart(document.getElementById('curve_K'));

        chart.draw(data, options);
      }
    </script>
 <table border="1" align='center'>
 <tr>
 <td> <div id="chart_divTV25"></div></td>
 <td> <div id="chart_divTV50"></div></td>
  <td> <div id="chart_divTV75"></div></td>
 </tr></table>

 <table border="1" align='center'>
 <tr>
 <td> <div id="curve_C"></div></td>
 <td> <div id="curve_M"></div></td>
 </tr></table>
 <table border="1" align='center'>
 <tr>
 <td> <div id="curve_Y"></div></td>
 <td> <div id="curve_K"></div></td>
 </tr></table>


 <?php
///C  ggc gray adjust C
//echo "dgl2575:".$dgl25."_".$dgl."_".$dgl75;

echo "=====================================================================================";

/////////////////////////////////////////////////// gray rule 50
$dL=($gLm-$gLT);
$da=$gam-($Pam/2);
$db=$gbm-($Pbm/2);

if (($PLm-$gy100lm)>70) {
$pdle=0.5;
}
else {
$pdle=0.7;
}

if($mam<45){
$m50f=0.7;
}
else {
$m50f=0.5;
}

if($ybm<45){
$y50f=0.6;
}
else {
$y50f=0.5;
}


$ndLf=$dL+($da*$pdle)+($db*$pdle*0.2);

$FixC=$ndLf;
$FixM=-$da*$m50f+($ndLf*$m50f);
$FixY=-$db*$y50f+($ndLf*$y50f);
//echo "<br>FixC:".($FixC)."_fixM:".($FixM)."_fixY:".($FixY);


////////////////////////////rule set 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);
}

$TL=$gLT;
$Ta=($Pam/2);
$Tb=($Pbm/2);

$ML=$gLm;
$Ma=$gam;
$Mb=$gbm;

$emin=100;
$mddexT=0;
$deT=0;
	

/////////////////////////////////////////////////////////////////////
for ($CD=45;$CD<=55;$CD=$CD+0.5) {
for ($MD=35;$MD<=45;$MD=$MD+0.5) {
for ($YD=35;$YD<=45;$YD=$YD+0.5) {
$dc=$CD-50;
$dm=$MD-40;
$dy=$YD-40;

$cc=$dc*0.3; //echo "cc:".$cc;
$cm=$dm*0.4;//echo "cm:".$cm;

if ($dy>1) {
$cy=0;
}
else {
$cy=1;	
}
//echo "cy:".$cy;

$mc=-$dc*0.6;//echo "mc:".$mc;
$mm=$dm*0.7;//echo "mm:".$mm;
if ($dy>1) {
$my=-$dy*0.1;
}
else {
$my=-$dy*0.2;	
}
//echo "my:".$my;

$yc=-$dc*0.4;
$ym=-$dm*0.2;
$yy=$dy*0.6;

${'C'.$CD.$MD.$YD."L"}=round($TL-($cc+$cm-$cy),1);
${'C'.$CD.$MD.$YD."a"}=round($Ta+($mc+$mm+$my),1);
${'C'.$CD.$MD.$YD."b"}=round($Tb+($yc+$ym+$yy),1);
${'de'.$CD.$MD.$YD}=round(de76($ML,$Ma,$Mb,$TL-($cc+$cm-$cy),$Ta+($mc+$mm+$my),$Tb+($yc+$ym+$yy)),2);

if (${'de'.$CD.$MD.$YD}<1) 
	{$fColor='red';}
else {
	$fColor='black';
}

	$emin=min($emin,${'de'.$CD.$MD.$YD});
	if ($emin==${'de'.$CD.$MD.$YD}) {
	$mddexT=$CD."-".$MD."-".$YD;
	$deT=${'de'.$CD.$MD.$YD};
	}



//echo "<tr><td>".$CD."-".$MD."-".$YD."</td><td>".${'C'.$CD.$MD.$YD."L"}."</td><td>".${'C'.$CD.$MD.$YD."a"}."</td><td>".${'C'.$CD.$MD.$YD."b"}."</td><td><font color='".$fColor."'>".${'de'.$CD.$MD.$YD}."</td></tr>";
///////////////////////////////////////////////////////////////////////////////////////////////////
}
}
}

echo "mdexT:".$mddexT;

///////////////////////////////////////////////////////////Measured


$emin=100;
$mddexM=0;
$deM=0;

/////////////////////////////////////////////////////////////////////
for ($CD=45;$CD<=55;$CD=$CD+0.5) {
for ($MD=35;$MD<=45;$MD=$MD+0.5) {
for ($YD=35;$YD<=45;$YD=$YD+0.5) {
$dc=$CD-50;
$dm=$MD-40;
$dy=$YD-40;

$cc=$dc*0.3; //echo "cc:".$cc;
$cm=$dm*0.4;//echo "cm:".$cm;

if ($dy>1) {
$cy=0;
}
else {
$cy=1;	
}
//echo "cy:".$cy;

$mc=-$dc*0.6;//echo "mc:".$mc;
$mm=$dm*0.7;//echo "mm:".$mm;
if ($dy>1) {
$my=-$dy*0.1;
}
else {
$my=-$dy*0.2;	
}
//echo "my:".$my;

$yc=-$dc*0.4;
$ym=-$dm*0.2;
$yy=$dy*0.6;

${'C'.$CD.$MD.$YD."L"}=round($ML-($cc+$cm-$cy),1);
${'C'.$CD.$MD.$YD."a"}=round($Ma+($mc+$mm+$my),1);
${'C'.$CD.$MD.$YD."b"}=round($Mb+($yc+$ym+$yy),1);
${'de'.$CD.$MD.$YD}=round(de76($TL,$Ta,$Tb,$ML-($cc+$cm-$cy),$Ma+($mc+$mm+$my),$Mb+($yc+$ym+$yy)),2);

if (${'de'.$CD.$MD.$YD}<1) 
	{$fColor='red';}
else {
	$fColor='black';
}

	$emin=min($emin,${'de'.$CD.$MD.$YD});
	if ($emin==${'de'.$CD.$MD.$YD}) {
	$mddexM=$CD."-".$MD."-".$YD;
	$deM=${'de'.$CD.$MD.$YD};
	}



//echo "<tr><td>".$CD."-".$MD."-".$YD."</td><td>".${'C'.$CD.$MD.$YD."L"}."</td><td>".${'C'.$CD.$MD.$YD."a"}."</td><td>".${'C'.$CD.$MD.$YD."b"}."</td><td><font color='".$fColor."'>".${'de'.$CD.$MD.$YD}."</td></tr>";
///////////////////////////////////////////////////////////////////////////////////////////////////
}
}
}

echo "mdexM:".$mddexM;
echo "<br>deT=".$deT."_deM=".$deM;

if ($deT<$deM){
	$FinalF=$mddexT;
	$dotF=explode("-", $FinalF);////Measure upload
	print_r($dotF);
	$FC=50-$dotF[0];
	$FM=40-$dotF[1];
	$FY=40-$dotF[2];
}
else {
	$FinalF=$mddexM;
	$dotF=explode("-", $FinalF);////Measure upload
	print_r($dotF);
	$FC=$dotF[0]-50;
	$FM=$dotF[1]-40;
	$FY=$dotF[2]-40;
}
/*
	$FinalF=$mddexT;
	$dotF=explode("-", $FinalF);////Measure upload
	//print_r($dotF);
	$FC=50-$dotF[0];
	$FM=40-$dotF[1];
	$FY=40-$dotF[2];
	*/
	
echo "FC:".$FC;
echo "FM:".$FM;
echo "FY:".$FY;

echo "<br>Fix:".$FinalF."<br>";

///////////////////////////////////// rule set 25


$TL=$g25LT;
$Ta=($Pam*0.75);
$Tb=($Pbm*0.75);

$ML=$g25Lm;
$Ma=$g25am;
$Mb=$g25bm;

$emin=100;
$mddexT=0;
$deT=0;
	

/////////////////////////////////////////////////////////////////////
for ($CD=20;$CD<=30;$CD=$CD+0.5) {
for ($MD=14;$MD<=24;$MD=$MD+0.5) {
for ($YD=14;$YD<=24;$YD=$YD+0.5) {
$dc=$CD-25;
$dm=$MD-19;
$dy=$YD-19;

$cc=$dc*0.4; //echo "cc:".$cc;
$cm=$dm*0.4;//echo "cm:".$cm;
$cy=0;

//echo "cy:".$cy;

$mc=-$dc*0.3;//echo "mc:".$mc;
$mm=$dm*0.6;//echo "mm:".$mm;
$my=-0.1;

//echo "my:".$my;

$yc=-$dc*0.6;
$ym=-$dm*0.2;
$yy=$dy*0.8;

${'C'.$CD.$MD.$YD."L"}=round($TL-($cc+$cm-$cy),1);
${'C'.$CD.$MD.$YD."a"}=round($Ta+($mc+$mm+$my),1);
${'C'.$CD.$MD.$YD."b"}=round($Tb+($yc+$ym+$yy),1);
${'de'.$CD.$MD.$YD}=round(de76($ML,$Ma,$Mb,$TL-($cc+$cm-$cy),$Ta+($mc+$mm+$my),$Tb+($yc+$ym+$yy)),2);

if (${'de'.$CD.$MD.$YD}<1) 
	{$fColor='red';}
else {
	$fColor='black';
}

	$emin=min($emin,${'de'.$CD.$MD.$YD});
	if ($emin==${'de'.$CD.$MD.$YD}) {
	$mddexT=$CD."-".$MD."-".$YD;
	$deT=${'de'.$CD.$MD.$YD};
	}



//echo "<tr><td>".$CD."-".$MD."-".$YD."</td><td>".${'C'.$CD.$MD.$YD."L"}."</td><td>".${'C'.$CD.$MD.$YD."a"}."</td><td>".${'C'.$CD.$MD.$YD."b"}."</td><td><font color='".$fColor."'>".${'de'.$CD.$MD.$YD}."</td></tr>";
///////////////////////////////////////////////////////////////////////////////////////////////////
}
}
}

echo "mdexT:".$mddexT;

///////////////////////////////////////////////////////////Measured


$emin=100;
$mddexM=0;
$deM=0;

/////////////////////////////////////////////////////////////////////
for ($CD=20;$CD<=30;$CD=$CD+0.5) {
for ($MD=14;$MD<=24;$MD=$MD+0.5) {
for ($YD=14;$YD<=24;$YD=$YD+0.5) {
$dc=$CD-25;
$dm=$MD-19;
$dy=$YD-19;

$cc=$dc*0.4; //echo "cc:".$cc;
$cm=$dm*0.4;//echo "cm:".$cm;
$cy=0;

//echo "cy:".$cy;

$mc=-$dc*0.3;//echo "mc:".$mc;
$mm=$dm*0.6;//echo "mm:".$mm;
$my=-0.1;

//echo "my:".$my;

$yc=-$dc*0.6;
$ym=-$dm*0.2;
$yy=$dy*0.8;

${'C'.$CD.$MD.$YD."L"}=round($ML-($cc+$cm-$cy),1);
${'C'.$CD.$MD.$YD."a"}=round($Ma+($mc+$mm+$my),1);
${'C'.$CD.$MD.$YD."b"}=round($Mb+($yc+$ym+$yy),1);
${'de'.$CD.$MD.$YD}=round(de76($TL,$Ta,$Tb,$ML-($cc+$cm-$cy),$Ma+($mc+$mm+$my),$Mb+($yc+$ym+$yy)),2);

if (${'de'.$CD.$MD.$YD}<1) 
	{$fColor='red';}
else {
	$fColor='black';
}

	$emin=min($emin,${'de'.$CD.$MD.$YD});
	if ($emin==${'de'.$CD.$MD.$YD}) {
	$mddexM=$CD."-".$MD."-".$YD;
	$deM=${'de'.$CD.$MD.$YD};
	}



//echo "<tr><td>".$CD."-".$MD."-".$YD."</td><td>".${'C'.$CD.$MD.$YD."L"}."</td><td>".${'C'.$CD.$MD.$YD."a"}."</td><td>".${'C'.$CD.$MD.$YD."b"}."</td><td><font color='".$fColor."'>".${'de'.$CD.$MD.$YD}."</td></tr>";
///////////////////////////////////////////////////////////////////////////////////////////////////
}
}
}

echo "mdexM:".$mddexM;
echo "<br>deT=".$deT."_deM=".$deM;
/*
if ($deT<$deM){
	$FinalF=$mddexT;
	$dotF=explode("-", $FinalF);////Measure upload
	print_r($dotF);
	$FC=25-$dotF[0];
	$FM=19-$dotF[1];
	$FY=19-$dotF[2];
}
else {
	$FinalF=$mddexM;
	$dotF=explode("-", $FinalF);////Measure upload
	print_r($dotF);
	$FC=$dotF[0]-25;
	$FM=$dotF[1]-19;
	$FY=$dotF[2]-19;
}
*/
	$FinalF=$mddexT;
	$dotF=explode("-", $FinalF);////Measure upload
	//print_r($dotF);
	$FC25=25-$dotF[0];
	$FM25=19-$dotF[1];
	$FY25=19-$dotF[2];
echo "FC25:".$FC25;
echo "FM25:".$FM25;
echo "FY25:".$FY25;

echo "<br>Fix:".$FinalF."<br>";

///////////////////////////////////// rule set 25

///////////////////////////////////// rule set 75


$TL=$g75LT;
$Ta=($Pam*0.25);
$Tb=($Pbm*0.25);

$ML=$g75Lm;
$Ma=$g75am;
$Mb=$g75bm;

$emin=100;
$mddexT=0;
$deT=0;
	

/////////////////////////////////////////////////////////////////////
for ($CD=70;$CD<=80;$CD=$CD+0.5) {
for ($MD=61;$MD<=71;$MD=$MD+0.5) {
for ($YD=61;$YD<=71;$YD=$YD+0.5) {
$dc=$CD-75;
$dm=$MD-66;
$dy=$YD-66;

$cc=$dc*0.3; //echo "cc:".$cc;
$cm=$dm*0.3;//echo "cm:".$cm;
$cy=0;

//echo "cy:".$cy;

$mc=-$dc*0.7;//echo "mc:".$mc;
$mm=$dm*0.5;//echo "mm:".$mm;
$my=-0.1;

//echo "my:".$my;

$yc=-$dc*0.4;
$ym=-$dm*0.2;
$yy=$dy*0.6;

${'C'.$CD.$MD.$YD."L"}=round($TL-($cc+$cm-$cy),1);
${'C'.$CD.$MD.$YD."a"}=round($Ta+($mc+$mm+$my),1);
${'C'.$CD.$MD.$YD."b"}=round($Tb+($yc+$ym+$yy),1);
${'de'.$CD.$MD.$YD}=round(de76($ML,$Ma,$Mb,$TL-($cc+$cm-$cy),$Ta+($mc+$mm+$my),$Tb+($yc+$ym+$yy)),2);

if (${'de'.$CD.$MD.$YD}<1) 
	{$fColor='red';}
else {
	$fColor='black';
}

	$emin=min($emin,${'de'.$CD.$MD.$YD});
	if ($emin==${'de'.$CD.$MD.$YD}) {
	$mddexT=$CD."-".$MD."-".$YD;
	$deT=${'de'.$CD.$MD.$YD};
	}



//echo "<tr><td>".$CD."-".$MD."-".$YD."</td><td>".${'C'.$CD.$MD.$YD."L"}."</td><td>".${'C'.$CD.$MD.$YD."a"}."</td><td>".${'C'.$CD.$MD.$YD."b"}."</td><td><font color='".$fColor."'>".${'de'.$CD.$MD.$YD}."</td></tr>";
///////////////////////////////////////////////////////////////////////////////////////////////////
}
}
}

echo "mdexT:".$mddexT;

///////////////////////////////////////////////////////////Measured


$emin=100;
$mddexM=0;
$deM=0;

/////////////////////////////////////////////////////////////////////
for ($CD=70;$CD<=80;$CD=$CD+0.5) {
for ($MD=61;$MD<=71;$MD=$MD+0.5) {
for ($YD=61;$YD<=71;$YD=$YD+0.5) {
$dc=$CD-75;
$dm=$MD-66;
$dy=$YD-66;

$cc=$dc*0.3; //echo "cc:".$cc;
$cm=$dm*0.3;//echo "cm:".$cm;
$cy=0;

//echo "cy:".$cy;

$mc=-$dc*0.7;//echo "mc:".$mc;
$mm=$dm*0.5;//echo "mm:".$mm;
$my=-0.1;

//echo "my:".$my;

$yc=-$dc*0.4;
$ym=-$dm*0.2;
$yy=$dy*0.6;

${'C'.$CD.$MD.$YD."L"}=round($ML-($cc+$cm-$cy),1);
${'C'.$CD.$MD.$YD."a"}=round($Ma+($mc+$mm+$my),1);
${'C'.$CD.$MD.$YD."b"}=round($Mb+($yc+$ym+$yy),1);
${'de'.$CD.$MD.$YD}=round(de76($TL,$Ta,$Tb,$ML-($cc+$cm-$cy),$Ma+($mc+$mm+$my),$Mb+($yc+$ym+$yy)),2);

if (${'de'.$CD.$MD.$YD}<1) 
	{$fColor='red';}
else {
	$fColor='black';
}

	$emin=min($emin,${'de'.$CD.$MD.$YD});
	if ($emin==${'de'.$CD.$MD.$YD}) {
	$mddexM=$CD."-".$MD."-".$YD;
	$deM=${'de'.$CD.$MD.$YD};
	}



//echo "<tr><td>".$CD."-".$MD."-".$YD."</td><td>".${'C'.$CD.$MD.$YD."L"}."</td><td>".${'C'.$CD.$MD.$YD."a"}."</td><td>".${'C'.$CD.$MD.$YD."b"}."</td><td><font color='".$fColor."'>".${'de'.$CD.$MD.$YD}."</td></tr>";
///////////////////////////////////////////////////////////////////////////////////////////////////
}
}
}

echo "mdexM:".$mddexM;
echo "<br>deT=".$deT."_deM=".$deM;
/*
if ($deT<$deM){
	$FinalF=$mddexT;
	$dotF=explode("-", $FinalF);////Measure upload
	print_r($dotF);
	$FC=75-$dotF[0];
	$FM=66-$dotF[1];
	$FY=66-$dotF[2];
}
else {
	$FinalF=$mddexM;
	$dotF=explode("-", $FinalF);////Measure upload
	print_r($dotF);
	$FC=$dotF[0]-75;
	$FM=$dotF[1]-66;
	$FY=$dotF[2]-66;
}
*/
	$FinalF=$mddexT;
	$dotF=explode("-", $FinalF);////Measure upload
	//print_r($dotF);
	$FC75=75-$dotF[0];
	$FM75=66-$dotF[1];
	$FY75=66-$dotF[2];


echo "FC75:".$FC75;
echo "FM75:".$FM75;
echo "FY75:".$FY75;


//echo "<br>Fix:".$FinalF."<br>";

///////////////////////////////////// rule set 75







$dk=$k50dm-0.5;
$dk25=$k25dm-0.22;
$dk75=$k75dm-0.9;
/////////////////////////////////////////////// gray rule 50 





/////////////////////////////////////////////////// gray rule 25
$dL25=($g25Lm-$g25LT);
$da25=$g25am-($Pam*0.75);
$db25=$g25bm-($Pbm*0.75);

if (($PLm-$gy100lm)>70) {
$pdle25=0.5;
}
else {
$pdle25=0.7;
}

if($mam<45){
$m25f=0.7;
}
else {
$m25f=0.5;
}

if($ybm<45){
$y25f=0.6;
}
else {
$y25f=0.5;
}


$ndLf25=$dL25+($da25*$pdle25)+($db25*$pdle25*0.2);

$FixC25=$ndLf25;
$FixM25=-$da25*$m25f+($ndLf25*$m25f);
$FixY25=-$db25*$y25f+($ndLf*$y25f);
//echo "<br>FixC25:".($FixC25)."_fixM25:".($FixM25)."_fixY25:".($FixY25);
/////////////////////////////////////////////// gray rule 25 

/////////////////////////////////////////////////// gray rule 75
$dL75=($g75Lm-$g75LT);
$da75=$g75am-($Pam*0.25);
$db75=$g75bm-($Pbm*0.25);

if (($PLm-$gy100lm)>70) {
$pdle75=0.5;
}
else {
$pdle75=0.7;
}

if($mam<45){
$m75f=0.7;
}
else {
$m75f=0.5;
}

if($ybm<45){
$y75f=0.6;
}
else {
$y75f=0.5;
}


$ndLf75=$dL75+($da75*$pdle75)+($db75*$pdle75*0.2);

$FixC75=$ndLf75;
$FixM75=-$da75*$m75f+($ndLf75*$m75f);
$FixY75=-$db75*$y75f+($ndLf*$y75f);
//echo "<br>FixC75:".($FixC75)."_fixM75:".($FixM75)."_fixY75:".($FixY75)."_dk:".($dk);
/////////////////////////////////////////////// gray rule 75 

$FCa=$FC;
$FMa=$FM;
$FYa=$FY;

$FC25a=$FC25;
$FM25a=$FM25;
$FY25a=$FY25;

$FC75a=$FC75;
$FM75a=$FM75;
$FY75a=$FY75;

?>


<?php
$p25adexmin=min(($Pam*0.75),$g25am)-0.5;
$p25adexmax=max(($Pam*0.75),$g25am)+0.5;

$g25adexmin=min(($Pbm*0.75),$g25bm)-0.5;
$g25bdexmax=max(($Pbm*0.75),$g25bm)+0.5;
?>


 <?php 
if ($d25f<2.5){
$pfg25='00D06A';}
else {
$pfg25='red';	
}
 ?> 
 <script>
 var pfg25=<?php echo json_encode($pfg25); ?>;

       google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable
            ([["a*","", {'type': 'string', 'role': 'style'},{'type': 'string', 'role': 'annotation'}],
			   [<?=($Pam*0.75)?>, <?=($Pbm*0.75)?>, 'point { size: 10; shape-type: star; fill-color: green; }', 'Target'],
			   [<?=$g25am?>, <?=$g25bm?>, 'point { size: 7; shape-type: circle; fill-color:'+ pfg25+'; }', 'measured: Δch'+<?=round($d25f,2)?>],
			   
        ]);

        var options = {
          legend: 'none',
          hAxis: {title: 'a*', viewWindow: {min: <?=$p25adexmin?>, max:<?=$p25adexmax?>},gridlines: {count: 5}},
          vAxis: {title: 'b*', viewWindow: {min:<?=$g25adexmin?>, max:<?=$g25bdexmax?>},gridlines: {count: 5}},
          curveType: 'function',
          pointSize: 7,
          dataOpacity: 0.9,
		  colors:['gray'],
		  backgroundColor: 'none'
        };

        var chart = new google.visualization.ScatterChart(document.getElementById('chart_divG25'));
        chart.draw(data, options);
    }

</script>

<?php
$g25ld=$g25Lm-$g25LT;
//echo "<br>gld:".$g25ld;
?>

 <?php 
if (abs($g25ld)<2.5){
$pfgL25='00D06A';}
else {
$pfgL25='red';	
}
 ?> 
 <script>
 var pfgL25=<?php echo json_encode($pfgL25); ?>;
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "L*", { role: "style" }, { role: 'annotation' } ],
        ["Measure", <?=$g25ld?>, "color: "+pfgL25+"", <?=$g25ld?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'L*', viewWindow: {min: -5, max:5}},
        bar: {groupWidth: "80%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divG25L"));
      chart.draw(view, options);
  }
  </script>

  <script type="text/javascript">
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "", { role: "style" }, { role: 'annotation' } ],
        ["C25", <?=-$FC25?>, "color: #A5E4E8", <?=-$FC25?>],
        ["M19",<?=-$FM25?>, "color: #FFBFBF",<?=-$FM25?>],
        ["Y19",<?=-$FY25?>, "color: #F2FF9A",<?=-$FY25?>],
        ["K25",<?=$dk25*10 ?>, "color: #AFAFAF",<?=$dk25*10 ?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {viewWindow: {min: -7, max:7}},

        bar: {groupWidth: "80%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divG25Li"));
      chart.draw(view, options);
  }
  </script>





<?php
$padexmin=min(($Pam*0.5),$gam)-0.5;
$padexmax=max(($Pam*0.5),$gam)+0.5;

$gadexmin=min(($Pbm*0.5),$gbm)-0.5;
$gbdexmax=max(($Pbm*0.5),$gbm)+0.5;
?>

 <?php 
if ($df<2.5){
$pfg50='00D06A';}
else {
$pfg50='red';	
}
 ?> 
 <script>
 var pfg50=<?php echo json_encode($pfg50); ?>;


       google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable
            ([["a*","", {'type': 'string', 'role': 'style'},{'type': 'string', 'role': 'annotation'}],
			   [<?=($Pam*0.5)?>, <?=($Pbm*0.5)?>, 'point { size: 10; shape-type: star; fill-color: green; }', 'Target'],
			   [<?=$gam?>, <?=$gbm?>, 'point { size: 7; shape-type: circle; fill-color: '+pfg50+'; }', 'measured: Δch'+<?=round($df,2)?>],
			   
        ]);

        var options = {
          legend: 'none',
          hAxis: {title: 'a*', viewWindow: {min: <?=$padexmin?>, max:<?=$padexmax?>},gridlines: {count: 5}},
          vAxis: {title: 'b*', viewWindow: {min:<?=$gadexmin?>, max:<?=$gbdexmax?>},gridlines: {count: 5}},
          curveType: 'function',
          pointSize: 7,
          dataOpacity: 0.9,
		  colors:['gray'],
		  backgroundColor: 'none'
        };

        var chart = new google.visualization.ScatterChart(document.getElementById('chart_divG50'));
        chart.draw(data, options);
    }

</script>

<?php
$gld=$gLm-$gLT;
//echo "<br>gld:".$gld;
?>

 <?php 
if (abs($gld)<2.5){
$pfgL50='00D06A';}
else {
$pfgL50='red';	
}
 ?> 
 <script>
 var pfgL50=<?php echo json_encode($pfgL50); ?>;
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "L*", { role: "style" }, { role: 'annotation' } ],
        ["Measure", <?=$gld?>, "color: "+pfgL50+"", <?=$gld?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'L*', viewWindow: {min: -5, max:5}},
        bar: {groupWidth: "80%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divG50L"));
      chart.draw(view, options);
  }
  </script>

  <script type="text/javascript">
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "", { role: "style" }, { role: 'annotation' } ],
        ["C50", <?=-$FC?>, "color: #88DEFF", <?=-$FC?>],
        ["M40",<?=-$FM?>, "color: #FF97C1",<?=-$FM?>],
        ["Y40",<?=-$FY?>, "color: #FAF1B0",<?=-$FY?>],
        ["K50",<?=$dk*10 ?>, "color: #7F7F7F",<?=$dk*10 ?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: { viewWindow: {min: -7, max:7}},

        bar: {groupWidth: "80%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divG50Li"));
      chart.draw(view, options);
  }
  </script>





<?php
$p75adexmin=min(($Pam*0.25),$g75am)-0.5;
$p75adexmax=max(($Pam*0.25),$g75am)+0.5;

$g75adexmin=min(($Pbm*0.25),$g75bm)-0.5;
$g75bdexmax=max(($Pbm*0.25),$g75bm)+0.5;
?>


 <?php 
if ($d75f<2.5){
$pfg75='00D06A';}
else {
$pfg75='red';	
}
 ?> 
 <script>
 var pfg75=<?php echo json_encode($pfg75); ?>;

       google.charts.load('current', {'packages':['corechart']});
      google.charts.setOnLoadCallback(drawChart);

      function drawChart() {
        var data = google.visualization.arrayToDataTable
            ([["a*","", {'type': 'string', 'role': 'style'},{'type': 'string', 'role': 'annotation'}],
			   [<?=($Pam*0.25)?>, <?=($Pbm*0.25)?>, 'point { size: 10; shape-type: star; fill-color: green; }', 'Target'],
			   [<?=$g75am?>, <?=$g75bm?>, 'point { size: 7; shape-type: circle; fill-color: '+pfg75+'; }', 'measured: Δch'+<?=round($d75f,2)?>],
			   
        ]);

        var options = {
          legend: 'none',
          hAxis: {title: 'a*', viewWindow: {min: <?=$p75adexmin?>, max:<?=$p75adexmax?>},gridlines: {count: 5}},
          vAxis: {title: 'b*', viewWindow: {min:<?=$g75adexmin?>, max:<?=$g75bdexmax?>},gridlines: {count: 5}},
          curveType: 'function',
          pointSize: 7,
          dataOpacity: 0.9,
		  colors:['gray'],
		  backgroundColor: 'none'
        };

        var chart = new google.visualization.ScatterChart(document.getElementById('chart_divG75'));
        chart.draw(data, options);
    }

</script>

<?php
$g75ld=$g75Lm-$g75LT;
//echo "<br>gld:".$g75ld;
?>

 <?php 
if (abs($g75ld)<2.5){
$pfgL75='00D06A';}
else {
$pfgL75='red';	
}
 ?> 
 <script>
 var pfgL75=<?php echo json_encode($pfgL75); ?>;
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "L*", { role: "style" }, { role: 'annotation' } ],
        ["Measure", <?=$g75ld?>, "color: "+pfgL75+"", <?=$g75ld?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {title: 'L*', viewWindow: {min: -5, max:5}},
        bar: {groupWidth: "80%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divG75L"));
      chart.draw(view, options);
  }
  </script>

  <script type="text/javascript">
    google.charts.load("current", {packages:['corechart']});
    google.charts.setOnLoadCallback(drawChart);
    function drawChart() {
      var data = google.visualization.arrayToDataTable([
        ["TV", "", { role: "style" }, { role: 'annotation' } ],
        ["C75", <?=-$FC75?>, "color: #00B2F3", <?=-$FC75?>],
        ["M66",<?=-$FM75?>, "color: #F7419B",<?=-$FM75?>],
        ["Y66",<?=-$FY75?>, "color: #FFF919",<?=-$FY75?>],
        ["K75",<?=$dk75*10 ?>, "color: #636362",<?=$dk75*10 ?>]
      ]);

      var view = new google.visualization.DataView(data);


      var options = {
        vAxis: {viewWindow: {min: -7, max:7}},

        bar: {groupWidth: "80%"},
        legend: { position: "none" },
      };
      var chart = new google.visualization.ColumnChart(document.getElementById("chart_divG75Li"));
      chart.draw(view, options);
  }
  </script>

 <table border="1" align='center'><tr><td> 
	<div id='brand_g' >
    <div id="chart_divG25" style="width: 200px; height: 230px;"></div>
</td>
<td> 
    <div id="chart_divG25L" style="width: 100px; height: 230px;"></div>
</td>


 <td> 
	<div id='brand_g' >
    <div id="chart_divG50" style="width: 200px; height: 230px;"></div>
</td>
<td> 
    <div id="chart_divG50L" style="width: 100px; height: 230px;"></div>
</td>


 <td> 
	<div id='brand_g' >
    <div id="chart_divG75" style="width: 200px; height: 230px;"></div>
</td>
<td> 
    <div id="chart_divG75L" style="width: 100px; height: 230px;"></div>
</td></tr></table>

 <table border="1" align='center'><tr>
<td> 
    <div id="chart_divG25Li" style="width: 307px; height: 200px;"></div>
</td>
<td> 
    <div id="chart_divG50Li" style="width: 307px; height: 200px;"></div>
</td>
<td> 
    <div id="chart_divG75Li" style="width: 307px; height: 200px;"></div>
</td>
 </tr></table>
 

   	<table width="200" border="1" align="center">
  <tr>
  	<td><div align="center">*id<?php echo $sNo;?>*</div></td>
   <td><font color="#666666">P</td>
    <td><font color='<?php if ($dec00>3.5){echo "red";}else {echo "black";}?>'>C</td>
    <td><font color='<?php if ($dem00>3.5){echo "red";}else {echo "black";}?>'>M</td>
    <td><font color='<?php if ($dey00>3.5){echo "red";}else {echo "black";}?>'>Y</td>
    <td><font color='<?php if ($dek00>3.5){echo "red";}else {echo "black";}?>'>K</td>
	<td><font color='<?php if ($der00>3.5){echo "red";}else {echo "black";}?>'>R</td>
    <td><font color='<?php if ($degr00>3.5){echo "red";}else {echo "black";}?>'>G</td>
    <td><font color='<?php if ($deb00>3.5){echo "red";}else {echo "black";}?>'>B</td>
	<td>*TVI:</td>
    <td><font color='<?php if ($c50TVI>4 or $c50TVI<-4){echo "red";}else {echo "black";}?>'>C50</td>
    <td><font color='<?php if ($m50TVI>4 or $m50TVI<-4){echo "red";}else {echo "black";}?>'>M50</td>
    <td><font color='<?php if ($y50TVI>4 or $y50TVI<-4){echo "red";}else {echo "black";}?>'>Y50</td>
    <td><font color='<?php if ($k50TVI>4 or $k50TVI<-4){echo "red";}else {echo "black";}?>'>K50</td>
	<td>*G7*</td>
    <td><font color='<?php if ((abs($dgl25)>2.5)){echo "red";}else {echo "black";}?>'>ΔL*25</td>
	<td><font color='<?php if ($df>2.5){echo "red";}else {echo "black";}?>'>Δa*25</td>
	<td><font color='<?php if ($df>2.5){echo "red";}else {echo "black";}?>'>Δb*25</td>
	<td><font color='<?php if ((abs($d25f)>2.5)){echo "red";}else {echo "black";}?>'>Δch25</td>
	<td><font color='<?php if ((abs($dgl)>2.5)){echo "red";}else {echo "black";}?>'>ΔL*50</td>
	<td><font color='<?php if ($df>2.5){echo "red";}else {echo "black";}?>'>Δa*50</td>
	<td><font color='<?php if ($df>2.5){echo "red";}else {echo "black";}?>'>Δb*50</td>
	<td><font color='<?php if ((abs($df)>2.5)){echo "red";}else {echo "black";}?>'>Δch50</td>
	<td><font color='<?php if ((abs($dgl75)>2.5)){echo "red";}else {echo "black";}?>'>ΔL*75</td>
	<td><font color='<?php if ($d75f>2.5){echo "red";}else {echo "black";}?>'>Δa*75</td>
	<td><font color='<?php if ($d75f>2.5){echo "red";}else {echo "black";}?>'>Δb*75</td>
	<td><font color='<?php if ($d75f>2.5){echo "red";}else {echo "black";}?>'>Δch75</td>
  </tr>
    
  
<tr bgcolor="#aaaaaa">
<td><div align="center">色差</div></td>
<td bgcolor="#CCCCCC"><font color='<?php if ($dep00>3){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($PLm,0).",".round($Pam,0).",".round($Pbm,0);?>"><?php $sum=$sum-$dec00; echo  round($dep00,2);?></a> </div></td>
<td bgcolor="#88DEFF"><font color='<?php if ($dec00>3.5){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($clm,0).",".round($cam,0).",".round($cbm,0);?>"><?php $sum=$sum-$dec00; echo  round($dec00,2);?></a> </div></td>
<td bgcolor="#FF97C1"><font color='<?php if ($dem00>3.5){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($mlm,0).",".round($mam,0).",".round($mbm,0);?>"><?php $sum=$sum-$dem00;echo  round($dem00,2);?></a></div></td>
<td bgcolor="#FAF1B0"><font color='<?php if ($dey00>3.5){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($ylm,0).",".round($yam,0).",".round($ybm,0);?>"><?php $sum=$sum-$dey00; echo  round($dey00,2);?></a></div></td>
<td bgcolor="#cccccc"><font color='<?php if ($dek00>3.5){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($klm,0).",".round($kam,0).",".round($kbm,0);?>"><?php $sum=$sum-$dek00; echo  round($dek00,2);?></a></div></td>
<td bgcolor="#E56D6F"><font color='<?php if ($der00>3.5){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($rlm,0).",".round($ram,0).",".round($rbm,0);?>"><?php $sum=$sum-$der00; echo  round($der00,2);?></a></div></td>
<td bgcolor="#25C64B"><font color='<?php if ($degr00>3.5){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($grlm,0).",".round($gram,0).",".round($grbm,0);?>"><?php $sum=$sum-$degr00; echo  round($degr00,2);?></a></div></td>
<td bgcolor="#767EFF"><font color='<?php if ($deb00>3.5){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($blm,0).",".round($bam,0).",".round($bbm,0);?>"><?php $sum=$sum-$deb00; echo  round($deb00,2);?></a></div></td>

<td bgcolor="#ffffff">TVI</td>
<td bgcolor="#88DEFF"><font color='<?php if ($c50TVI>4 or $c50TVI<-4){echo "red";}else {echo "black";}?>'><div align="right"><?php  $sum=$sum-abs($c50TVI);echo  round($c50TVI,2);?></div></td>
<td bgcolor="#FF97C1"><font color='<?php if ($m50TVI>4 or $m50TVI<-4){echo "red";}else {echo "black";}?>'><div align="right"><?php $sum=$sum-abs($m50TVI);echo  round($m50TVI,2);?></div></td>
<td bgcolor="#FAF1B0"><font color='<?php if ($y50TVI>4 or $y50TVI<-4){echo "red";}else {echo "black";}?>'><div align="right"><?php $sum=$sum-abs($y50TVI);echo  round($y50TVI,2);?></div></td>
<td bgcolor="#cccccc"><font color='<?php if ($k50TVI>4 or $k50TVI<-4){echo "red";}else {echo "black";}?>'><div align="right"><?php $sum=$sum-abs($k50TVI); echo  round($k50TVI,2);?></div></td>
<td bgcolor="#ffffff">G7</td>
<td bgcolor="#dddddd"><div align="right"><font color='<?php if (abs($g25Lm-$g25LT)>2.5){echo "red";}else {echo "black";}?>'><?php $sum=$sum-abs($g25Lm-$g25LT)*5; echo  round($g25Lm-$g25LT,2);?></div></td>
<td bgcolor="#dddddd"><div align="right"><font color='<?php if ($d25f>2.5){echo "red";}else {echo "black";}?>'><?php echo  round($dg25a,2);?></div></td>
<td bgcolor="#dddddd"><div align="right"><font color='<?php if ($d25f>2.5){echo "red";}else {echo "black";}?>'><?php echo  round($dg25b,2);?></div></td>
<td bgcolor="#dddddd"><div align="right"><font color='<?php if ($d25f>2.5){echo "red";}else {echo "black";}?>'><?php echo  round($d25f,2);?></div></td>

<td bgcolor="#bbbbbb"><div align="right"><font color='<?php if (abs($gLm-$gLT)>2.5){echo "red";}else {echo "black";}?>'><?php $sum=$sum-abs($gLm-$gLT)*5; echo  round($gLm-$gLT,2);?></div></td>
<td bgcolor="#bbbbbb"><div align="right"><font color='<?php if ($df>2.5){echo "red";}else {echo "black";}?>'><?php echo  round($dga,2);?></div></td>
<td bgcolor="#bbbbbb"><div align="right"><font color='<?php if ($df>2.5){echo "red";}else {echo "black";}?>'><?php echo  round($dgb,2);?></div></td>
<td bgcolor="#bbbbbb"><div align="right"><font color='<?php if ($df>2.5){echo "red";}else {echo "black";}?>'><?php echo  round($df,2);?></div></td>

<td bgcolor="#999999"><div align="right"><font color='<?php if (abs($g75Lm-$g75LT)>2.5){echo "red";}else {echo "black";}?>'><?php $sum=$sum-abs($g75Lm-$g75LT)*5; echo  round($g75Lm-$g75LT,2);?></div></td>
<td bgcolor="#999999"><div align="right"><font color='<?php if ($d75f>2.5){echo "red";}else {echo "black";}?>'><?php echo  round($dg75a,2);?></div></td>
<td bgcolor="#999999"><div align="right"><font color='<?php if ($d75f>2.5){echo "red";}else {echo "black";}?>'><?php echo  round($dg75b,2);?></div></td>
<td bgcolor="#999999"><div align="right"><font color='<?php if ($d75f>2.5){echo "red";}else {echo "black";}?>'><?php echo  round($d75f,2);?></div></td>

</tr>


<tr>
<td><div align="center">量測濃度</div></td>
<td bgcolor="#CCCCCC"></td>
<td bgcolor="#88DEFF"><div align="right"><font color='<?php if ($dec00>3.5){echo "red";}else {echo "black";}?>'><?php echo round($cdm,2);?></div></td>
<td bgcolor="#FF97C1"><div align="right"><font color='<?php if ($dem00>3.5){echo "red";}else {echo "black";}?>'><?php echo round($mdm,2);?></div></td>
<td bgcolor="#FAF1B0"><div align="right"><font color='<?php if ($dey00>3.5){echo "red";}else {echo "black";}?>'><?php echo round($ydm,2);?></div></td>
<td bgcolor="#cccccc"><div align="right"><font color='<?php if ($dek00>5){echo "red";}else {echo "black";}?>'><?php echo round($kdm,2);?></div></td>
<td bgcolor="#E56D6F"><div align="right"><font color='<?php if ($der00>4.2){echo "red";}else {echo "black";}?>'><?php echo round($rdm,2);?></div></td>
<td bgcolor="#25C64B"><div align="right"><font color='<?php if ($degr00>4.2){echo "red";}else {echo "black";}?>'><?php echo round($grdm,2);?></div></td>
<td bgcolor="#767EFF"><div align="right"><font color='<?php if ($deb00>4.2){echo "red";}else {echo "black";}?>'><div align="right"><?php echo round($bdm,2);?></div></td>
<td>TV濃度</td>
<td bgcolor="#88DEFF"><div align="right"><?php echo round($c50dm,2);?></div></td>
<td bgcolor="#FF97C1"><div align="right"><?php echo round($m50dm,2);?></div></td>
<td bgcolor="#FAF1B0"><div align="right"><?php echo round($y50dm,2);?></div></td>
<td bgcolor="#cccccc"><div align="right"><?php echo round($k50dm,2);?></div></td>
<td>G7量測</td>
<td bgcolor="#88DEFF"><div align="right"><?php echo round($g25Lm,2);?></div></td>
<td bgcolor="#FF97C1"><div align="right"><?php echo round($g25am,2);?></div></td>
<td bgcolor="#FAF1B0"><div align="right"><?php echo round($g25bm,2);?></div></td>
<td>
<td bgcolor="#88DEFF"><div align="right"><?php echo round($gLm,2);?></div></td>
<td bgcolor="#FF97C1"><div align="right"><?php echo round($gam,2);?></div></td>
<td bgcolor="#FAF1B0"><div align="right"><?php echo round($gbm,2);?></div></td>
<td>
<td bgcolor="#88DEFF"><div align="right"><?php echo round($g75Lm,2);?></div></td>
<td bgcolor="#FF97C1"><div align="right"><?php echo round($g75am,2);?></div></td>
<td bgcolor="#FAF1B0"><div align="right"><?php echo round($g75bm,2);?></div></td>
</tr>
<tr>
<td><div align="center">預測濃度</div></td>
<td bgcolor="#CCCCCC"></td>
<td bgcolor="#88DEFF"><div align="right"><?php echo round($coptD,2);?></div></td>
<td bgcolor="#FF97C1"><div align="right"><?php echo round($moptD,2);?></div></td>
<td bgcolor="#FAF1B0"><div align="right"><?php echo round($yoptD,2);?></div></td>
<td bgcolor="#cccccc"><div align="right"><?php echo round($koptD,2);?></div></td>

<td bgcolor="#E56D6F"><div align="right"><?php echo round($roptD,2);?></div></td>
<td bgcolor="#25C64B"><div align="right"><?php echo round($groptD,2);?></div></td>
<td bgcolor="#767EFF"><div align="right"><?php echo round($boptD,2);?></div></td>
<td></td>
<td bgcolor="#88DEFF"><div align="right"></div></td>
<td bgcolor="#FF97C1"><div align="right"></div></td>
<td bgcolor="#FAF1B0"><div align="right"></div></td>
<td bgcolor="#cccccc"><div align="right"></div></td>
<td>G7目標</td>
<td bgcolor="#88DEFF"><div align="right"><?php echo round($g25LT,2);?></div></td>
<td bgcolor="#FF97C1"><div align="right"><?php echo round($Pam*0.75,2);?></div></td>
<td bgcolor="#FAF1B0"><div align="right"><?php echo round($Pbm*0.75,2);?></div></td>
<td>
<td bgcolor="#88DEFF"><div align="right"><?php echo round($gLT,2);?></div></td>
<td bgcolor="#FF97C1"><div align="right"><?php echo round($Pam/2,2);?></div></td>
<td bgcolor="#FAF1B0"><div align="right"><?php echo round($Pbm/2,2);?></div></td>
<td>
<td bgcolor="#88DEFF"><div align="right"><?php echo round($g75LT,2);?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo round($Pam*0.25,2);?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo round($Pbm*0.25,2);?></div></td>
</tr>
<tr>
<td><div align="center">最佳色差</div></td>
<td bgcolor="#CCCCCC"></td>

<td bgcolor="#88DEFF"><div align="right"><?php if ($cmin>5) {?><font color="red"><?php } echo round($cmin,2);?></div></td>
<td bgcolor="#FF97C1"><div align="right"><?php if ($mmin>5) {?><font color="red"><?php } echo round($mmin,2);?></div></td>
<td bgcolor="#FAF1B0"><div align="right"><?php if ($ymin>5) {?><font color="red"><?php } echo round($ymin,2);?></div></td>
<td bgcolor="#CCCCCC"><div align="right"><?php if ($kmin>5) {?><font color="red"><?php } echo round($kmin,2);?></div></td>
<td bgcolor="#E56D6F"><div align="right"><?php if ($rmin>6) {?><font color="red"><?php } echo round($rmin,2);?></div></td>
<td bgcolor="#25C64B"><div align="right"><?php if ($grmin>6) {?><font color="red"><?php } echo round($grmin,2);?></div></td>
<td bgcolor="#767EFF"><div align="right"><?php if ($bmin>6) {?><font color="red"><?php } echo round($bmin,2);?></div></td>



<br>
</tr>
</table>
<tr></tr>





<?php 
if ($rule=='c9') {
	$Vscore=$c9sum;
}
elseif ($rule=='gmi') {
	$Vscore=$gmisum;
}
elseif ($rule=='pbn') {
	$Vscore=$ct25sum;
}


				$querys = "select po, sNo,filename  from productionc9 where po='$po' ORDER BY id DESC LIMIT 1 ";
		//echo "sql:".$querys;
	$results =  mysqli_query($conn, $querys);
		$num = mysqli_num_rows( $results);
		//$obj = mysqli_fetch_object($results);
		
	if ($num > 0)
	{
		
$row = mysqli_fetch_object($results);	
		$sqName=$row->filename;
		$sNo=$row->sNo+1;}
	else {	$sNo=1;}
//echo "sqName:".$sqName;
	if ($sqName<>$filename) {
		// generate and execute query
		$query = "INSERT INTO productionc9 (po, sn,Fscore, Vscore,sNo, filename,  target, mode, ddate, pdate, press, paper, ink , cmmt, denC,denM,denY, denK, TVIc,TVIm, TVIy,TVIk,dek,decc,dem,dey,deg,g50L,g50a,g50b) VALUES( '$po','$snstring','$sum','$Vscore', '$sNo', '$filename','$target', 'M0',NOW(), '$date_s', '$press', '$paper', '$ink', '$cmmt', '$cdm','$mdm', '$ydm', '$kdm', '$c50dm', '$m50dm', '$y50dm', '$k50dm', '$dek00','$dec00','$dem00','$dey00','$deg','$gLm','$gam','$gbm')";
		
		//echo $query,g50L
		//$result = mysql_query($query) or die ("Error in query: $query. " . mysql_error());
		$results =  mysqli_query($conn, $query);
		}
		mysqli_close($conn);
 ?>

</form>

<table align='center'>

<?php

$FixC=$FC;
$FixM=$FM;
$FixY=$FY;

$FixC25=$FC25;
$FixM25=$FM25;
$FixY25=$FY25;
 
$FixC75=$FC75;
$FixM75=$FM75;
$FixY75=$FY75;
 
 $FC25v=round((25+$FixC25),0);
 $FM25v=round((25+$FixM25),0);
 $FY25v=round((25+$FixY25),0);
 $FK25v=round((25-$dk25*10),0);
 
  $FC25v3=round((25+$FixC25),3);
 $FM25v3=round((25+$FixM25),3);
 $FY25v3=round((25+$FixY25),3);
 $FK25v3=round((25-$dk25*10),3);

 $FC25=round((25-$FixC75),0);
 $FM25=round((25-$FixM75),0);
 $FY25=round((25-$FixY75),0);
 $FK25=round((25+$dk75*10),0);
 /*
 $FCv=round((50+$FixC),0);
 $FMv=round((50+$FixM),0);
 $FYv=round((50+$FixY),0);
 $FKv=round((50-$dk*10),0);
 */
 
  $FCv=round((50+$FixC),0);
 $FMv=round((50+$FixM),0);
 $FYv=round((50+$FixY),0);
 $FKv=round((50-$dk*10),0);
 
 
 
  $FCv3=round((50+$FixC),3);
 $FMv3=round((50+$FixM),3);
 $FYv3=round((50+$FixY),3);
 $FKv3=round((50-$dk*10),3);
 
 $FC=round((50-$FixC),0);
 $FM=round((50-$FixM),0);
 $FY=round((50-$FixY),0);
 $FK=round((50+$dk*10),0);
 
 $FC75v=round((75+$FixC75),0);
 $FM75v=round((75+$FixM75),0);
 $FY75v=round((75+$FixY75),0);
 $FK75v=round((75-$dk75*10),0);
 
  $FC75v3=round((75+$FixC75),3);
 $FM75v3=round((75+$FixM75),3);
 $FY75v3=round((75+$FixY75),3);
 $FK75v3=round((75-$dk75*10),3);
 
 $FC75=round((75-$FixC25),0);
 $FM75=round((75-$FixM25),0);
 $FY75=round((75-$FixY25),0);
 $FK75=round((75+$dk25*10),0);
 

 $nFC=round((50-$FixC),0);
 $nFM=round((50-$FixM),0);
 $nFY=round((50-$FixY),0); 
 $nFK=round((50-$dk*10),0);
//echo "fr:".$FC."--".$FM."--".$FY."--".$FK."<br>";
 // echo "fr:".$FixC."--".$FixM."--".$FixY."--".$FixK."<br>";
 // echo "fr25:".$FC25v."--".$FM25."--".$FY25."--".$FK25."<br>";
  
 
$c25=dechex($FC25*255/100);
$m25=dechex($FM25*255/100);
$y25=dechex($FY25*255/100);
$k25=dechex($FK25*255/100);
echo "<br>c25:".$c25;
$c50=dechex($FC*255/100);
$m50=dechex($FM*255/100);
$y50=dechex($FY*255/100);
$k50=dechex($FK*255/100);

$c75=dechex($FC75*255/100);
$m75=dechex($FM75*255/100);
$y75=dechex($FY75*255/100);
$k75=dechex($FK75*255/100);

// echo "c50:".$c50."--".$m50."--".$y50."--".$k50."--<br>";
// echo "c25:".$c25."--".$m25."--".$y25."--".$k75."--<br>";
//  echo "c75:".$c75."--".$m75."--".$y75."--".$k75."--<br>";
 
 
$bindata2 = pack('hhhhhhhhhhhH*hH*hhhhhhhH*hH*hH*hH*hH*hH*hH*hH*hhhhhhhH*hH*hH*hH*hH*hH*hH*hH*hhhhhhhH*hH*hH*hH*hH*hH*hH*hH*hhhhhhhH*hH*hH*hH*hH*hH*hH*hH*hhhhhhhH*hH*', 00, 04,00,06,00,02,00,00,00,00,00,'FF',00,'FF',00,05,00,00,00,00,00,$c25,00,40,00,$c50,00,'7F',00,$c75,00,'BF',00,'FF',00,'FF',00,05,00,00,00,00,00,$m25,00,40,00,$m50,00,'7F',00,$m75,00,'BF',00,'FF',00,'FF',00,05,00,00,00,00,00,$y25,00,40,00,$y50,00,'7F',00,$y75,00,'BF',00,'FF',00,'FF',00,05,00,00,00,00,00,$k25,00,40,00,$k50,00,'7F',00,$k75,00,'BF',00,'FF',00,'FF',00,02,00,00,00,00,00,'FF',00,'FF');
file_put_contents('curve/fix-'.$company."-".$dStr.$FCv.$FMv.$FYv.'_00.acv', $bindata2);


 ?>
 
  <tr>

   <td><font color="#444444">取得PhotoShop 曲線檔(.acv)</font></td>
   <td><font color="#444444"><a href="curve/fix-<?php echo $company."-".$dStr.$FCv.$FMv.$FYv;?>_00.acv">here</a></font></td> 
      
 </tr>

<?php

require_once( 'PolynomialRegression.php' );

  $data =
    array
    (
       array( 0.00, 0.0 ),
	   array( 25*255/100, $FY25v3*255/100 ), 
	   array( 50*255/100, $FYv3*255/100 ), 
	   array( 75*255/100, $FY75v3*255/100 ), 
	   array( 255, 255  )
    );
	
  // Precision digits in BC math.
  bcscale( 10 );
  
    $leastSquareRegression = new PolynomialRegression( 4 );//pupumonkey

  // Add all the data to the regression analysis.
  foreach ( $data as $dataPoint )
    {
	$leastSquareRegression->addData( $dataPoint[ 0 ], $dataPoint[ 1 ] );
	//echo "addData : " . $dataPoint[ 0 ]."-".$dataPoint[ 1 ] . "<br />\n";
	}

  // Get coefficients for the polynomial.
  $coefficients = $leastSquareRegression->getCoefficients();
 

$FY25d=$FY25v3*0.01;
$FYd=$FYv3*0.01;
$FY75d=$FY75v3*0.01;
$FM25d=$FM25v3*0.01;
$FMd=$FMv3*0.01;
$FM75d=$FM75v3*0.01;
$FC25d=$FC25v3*0.01;
$FCd=$FCv3*0.01;
$FC75d=$FC75v3*0.01;
$FK25d=$FK25v3*0.01;
$FKd=$FKv3*0.01;
$FK75d=$FK75v3*0.01;

$myFile ="curve/vcc-".$company."-".$dStr.$FCv.$FMv.$FYv."_00.vcc";                  
$fvcc = fopen($myFile, 'w') or die("can't open file");
//fwrite($fh, $p);
///////////////////////////////////////////////////////////////////////////////////////////////////////////////
$viHead='CC08
BEGIN
5
0.00000 0.00000
'.$FY25d.' 0.25000
'.$FYd.' 0.50000
'.$FY75d.' 0.75000
1.00000 1.00000
0 0';
fwrite($fvcc, $viHead."\n");

for ($i=1;$i<=255;$i++) {
$yCV="$i"." ".round(($coefficients[0]+$i*$coefficients[1]+pow($i,2)*$coefficients[2]+pow($i,3)*$coefficients[3]),0);
fwrite($fvcc, $yCV."\n");
}
fwrite($fvcc, "END\n");

///////////////////////////////////////////////////////////////
 $data =
    array
    (
       array( 0.00, 0.0 ),
	   array( 25*255/100, $FM25v3*255/100 ), 
	   array( 50*255/100, $FMv3*255/100 ), 
	   array( 75*255/100, $FM75v3*255/100 ), 
	   array( 255, 255  )
    );
	
  // Precision digits in BC math.
  bcscale( 10 );
  
    $leastSquareRegression = new PolynomialRegression( 4 );//pupumonkey

  // Add all the data to the regression analysis.
  foreach ( $data as $dataPoint )
    {
	$leastSquareRegression->addData( $dataPoint[ 0 ], $dataPoint[ 1 ] );
	//echo "addData : " . $dataPoint[ 0 ]."-".$dataPoint[ 1 ] . "<br />\n";
	}

  // Get coefficients for the polynomial.
  $coefficients = $leastSquareRegression->getCoefficients();


$viHeadM='BEGIN
5
0.00000 0.00000
'.$FM25d.' 0.25000
'.$FMd.' 0.50000
'.$FM75d.' 0.75000
1.00000 1.00000
0 0';
fwrite($fvcc, $viHeadM."\n");


for ($i=1;$i<=255;$i++) {
$mCV="$i"." ".round(($coefficients[0]+$i*$coefficients[1]+pow($i,2)*$coefficients[2]+pow($i,3)*$coefficients[3]),0);
fwrite($fvcc, $mCV."\n");
}
fwrite($fvcc, "END\n");
/////////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////
 $data =
    array
    (
       array( 0.00, 0.0 ),
	   array( 25*255/100, $FC25v3*255/100 ), 
	   array( 50*255/100, $FCv3*255/100 ), 
	   array( 75*255/100, $FC75v3*255/100 ), 
	   array( 255, 255  )
    );
	
  // Precision digits in BC math.
  bcscale( 10 );
  
    $leastSquareRegression = new PolynomialRegression( 4 );//pupumonkey

  // Add all the data to the regression analysis.
  foreach ( $data as $dataPoint )
    {
	$leastSquareRegression->addData( $dataPoint[ 0 ], $dataPoint[ 1 ] );
	//echo "addData : " . $dataPoint[ 0 ]."-".$dataPoint[ 1 ] . "<br />\n";
	}

  // Get coefficients for the polynomial.
  $coefficients = $leastSquareRegression->getCoefficients();


$viHeadC='BEGIN
5
0.00000 0.00000
'.$FC25d.' 0.25000
'.$FCd.' 0.50000
'.$FC75d.' 0.75000
1.00000 1.00000
0 0';
fwrite($fvcc, $viHeadC."\n");


for ($i=1;$i<=255;$i++) {
$cCV="$i"." ".round(($coefficients[0]+$i*$coefficients[1]+pow($i,2)*$coefficients[2]+pow($i,3)*$coefficients[3]),0);
fwrite($fvcc, $cCV."\n");
}
fwrite($fvcc, "END\n");
/////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////
 $data =
    array
    (
       array( 0.00, 0.0 ),
	   array( 25*255/100, $FK25v3*255/100 ), 
	   array( 50*255/100, $FKv3*255/100 ), 
	   array( 75*255/100, $FK75v3*255/100 ), 
	   array( 255, 255  )
    );
	
  // Precision digits in BC math.
  bcscale( 10 );
  
    $leastSquareRegression = new PolynomialRegression( 4 );//pupumonkey

  // Add all the data to the regression analysis.
  foreach ( $data as $dataPoint )
    {
	$leastSquareRegression->addData( $dataPoint[ 0 ], $dataPoint[ 1 ] );
	//echo "addData : " . $dataPoint[ 0 ]."-".$dataPoint[ 1 ] . "<br />\n";
	}

  // Get coefficients for the polynomial.
  $coefficients = $leastSquareRegression->getCoefficients();


$viHeadK='BEGIN
5
0.00000 0.00000
'.$FK25d.' 0.25000
'.$FKd.' 0.50000
'.$FK75d.' 0.75000
1.00000 1.00000
0 0';
fwrite($fvcc, $viHeadK."\n");


for ($i=1;$i<=255;$i++) {
$kCV="$i"." ".round(($coefficients[0]+$i*$coefficients[1]+pow($i,2)*$coefficients[2]+pow($i,3)*$coefficients[3]),0);
fwrite($fvcc, $kCV."\n");
}
fwrite($fvcc, "END\n");
/////////////////////////////////////////////////////////////////////////////
$viHeadn='BEGIN
2
0.00000 0.00000
1.00000 1.00000
0 0';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=255;$i++) {
$nCV="$i"." "."$i";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
$viHeadn='BEGIN
2
0.00000 0.00000
1.00000 1.00000
0 0';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=255;$i++) {
$nCV="$i"." "."$i";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
$viHeadn='BEGIN
2
0.00000 0.00000
1.00000 1.00000
0 0';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=255;$i++) {
$nCV="$i"." "."$i";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
$viHeadn='BEGIN
2
0.00000 0.00000
1.00000 1.00000
0 0';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=255;$i++) {
$nCV="$i"." "."$i";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
/////////////////////////////////////////////////////////////////////////////
$viHeadn='GENERIC_V3
10000
10000
10000
10000
0
0
0


1
206
600x600
0
40470
1
1
100
120
END';
fwrite($fvcc, $viHeadn."\n");
//////////////////////////////////////////////////////////////////////////
$viHeadn='BEGIN
1
0
255';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=34;$i++) {
$nCV="0";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
//////////////////////////////////////////////////////////////////////////
$viHeadn='BEGIN
1
0
255';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=34;$i++) {
$nCV="0";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
//////////////////////////////////////////////////////////////////////////
$viHeadn='BEGIN
1
0
255';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=34;$i++) {
$nCV="0";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
//////////////////////////////////////////////////////////////////////////
$viHeadn='BEGIN
1
0
255';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=34;$i++) {
$nCV="0";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
//////////////////////////////////////////////////////////////////////////
$viHeadn='BEGIN
1
0
255';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=34;$i++) {
$nCV="0";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
//////////////////////////////////////////////////////////////////////////
$viHeadn='BEGIN
1
0
255';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=34;$i++) {
$nCV="0";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
//////////////////////////////////////////////////////////////////////////
$viHeadn='BEGIN
1
0
255';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=34;$i++) {
$nCV="0";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");
//////////////////////////////////////////////////////////////////////////
$viHeadn='BEGIN
1
0
255';
fwrite($fvcc, $viHeadn."\n");


for ($i=1;$i<=34;$i++) {
$nCV="0";
fwrite($fvcc, $nCV."\n");
}
fwrite($fvcc, "END\n");

$viEnd='1
CC04';
fwrite($fvcc, $viEnd."\n");



fclose($fvcc);



?> 
 
 
   <tr>
   <td><font color="#444444">取得Efi vcc(.vcc)</font></td>
   <td><font color="#444444"><a href="curve/vcc-<?php echo $company."-".$dStr.$FCv.$FMv.$FYv;?>_00.vcc">here</a></font></td>   
   <td><td><td><td><td><td>
	<td><font color="#444444"><a href="curve/listvcc.php?company=<?php echo $company."&fmt=vcc&FC25=".$FixC25."&FM25=".$FixM25."&FY25=".$FixY25."&FK25=".$dk25."&FC=".$FixC."&FM=".$FixM."&FY=".$FixY."&FK=".$dk."&FC75=".$FixC75."&FM75=".$FixM75."&FY75=".$FixY75."&FK75=".$dk75;?>">堆疊</a></font></td>    
 </tr>
 
 <?php
 $myFile ="curve/CG-".$company."-".$dStr.$FCv.$FMv.$FYv."_00.txt";                  
$fCG = fopen($myFile, 'w') or die("can't open file");
//fwrite($fh, $p);
///////////////////////////////////////////////////////////////////////////////////////////////////////////////
$viHead='"File created by PBN"
LGOROWLENGTH 3
#
# PBN Run Information
#
# Run: Run 1 - Calibration
# Based On: <none>
#
# Values in this file are Wanted
#
# Gray Balance: On
#    reduced after 0%
#    until 85%
#    media white values: Measured
#    media aim points: 1.20 / -0.90
#
NUMBER_OF_FIELDS 	6
BEGIN_DATA_FORMAT
SampleID	SAMPLE_NAME	CMYK_C	CMYK_M	CMYK_Y	CMYK_K
END_DATA_FORMAT
NUMBER_OF_SETS 5
BEGIN_DATA
A0	"0.00"	0.00	0.00	0.00	0.00
A1	"25.00"	'.$FC25v.'	'.$FM25v.'	'.$FY25v.'	'.$FK25v.'
A2	"50.00"	'.$FCv.'	'.$FMv.'	'.$FYv.'	'.$FKv.'
A3	"75.00"	'.$FC75v.'	'.$FM75v.'	'.$FY75v.'	'.$FK75v.'
A4	"100.00"	100.00	100.00	100.00	100.00
END_DATA';
fwrite($fCG, $viHead."\n");
 
fclose($fCG);
 
 
 ?>
 
 
    <tr>
   <td><font color="#444444">取得CGATS(.txt)</font></td>
   <td><font color="#444444"><a href="<?php echo "curve/CG-".$company."-".$dStr.$FCv.$FMv.$FYv;?>_00.txt">here</a></font></td>      

 </tr>
 <tr>
  <td><font color="#444444">get gaychart</font></td>
  
      <td>
<a href="http://127.0.0.1/cc24/Graychart28x1.php?Gc=<?php echo round(($FCa+50),0)."&Gm=".round(($FMa+40),0)."&Gy=".round(($FYa+40),0);?>">graychart</a>
</td>
<td>
    <td>
<a href="http://127.0.0.1/cc24/Graychart28x3.php?Gc=<?php echo round(($FCa+50),0)."&Gm=".round(($FMa+40),0)."&Gy=".round(($FYa+40),0)."&Gc25=".round(($FC25a+25),0)."&Gm25=".round(($FM25a+19),0)."&Gy25=".round(($FY25a+19),0)."&Gc75=".round(($FC75a+75),0)."&Gm75=".round(($FM75a+66),0)."&Gy75=".round(($FY75a+66),0);?>">graychart 3x</a>
</td>
 </tr>
 
  </table>

-->

<tr>
<td align="center"><font size="-2"> &copy; <a href="mailto:[email protected]">Fred Kuo</a>, 2021. All rights reserved.<br><a href="http://www.fredkuo.idv.tw/wordpress/">Read more.</a><br>
</td>
</tr>

</body>


</html>