<!-- Author: Brian Mackenzie -->
<!-- Date: 11th March 2004 -->
<!-- Version: 1.0 -->

<!-- Function:  Astrand 6 minute cycle test -->

<!-- Required by: cycle6min.htm -->

<!-- Copyright Brian Mackenzie 2007 -->


function cycle6()
{

var gender = document.fat.gender.options[document.fat.gender.selectedIndex].value;
var wtunits = document.fat.wtunits.options[document.fat.wtunits.selectedIndex].value;
var wt = document.fat.wt.value;
var pr = document.fat.pr.value;
var kg = document.fat.kg.value;

 var v=0;
 
  if (wtunits == "pounds")
    {
        wt = wt/2.205;
    }
	
  kg=kg*6;
  v=0;
  
    if (gender == "male")
    {
     if ((kg >= 450) && (kg < 750))
	 {
		 r1 = 15.614286 + (pr*-0.148869) + (pr*pr*0.0003869);
		 r2 = 17.9 + (pr*-0.164167) + (pr*pr*0.0004167);
		 v = r1+(((r2-r1)/300) * (kg-450));
	 }
	 
	 if ((kg>=750) && (kg<=900))
	 {
		 r2 = 17.142857 + (pr*-0.143274) + (pr*pr*0.0003274);
		 r1 = 17.9 + (pr*-0.164167) + (pr*pr*0.0004167);
		 v = r1+(((r2-r1)/150) * (kg-750));
	 }
	}

 
   if (gender == "female")
    {
     if ((kg>=300) && (kg<=600))
	 {
		 r1 = 15.754286 + (pr*-0.154577) + (pr*pr*0.0004077);
		 r2 = 25.235714 + (pr*-0.265089) + (pr*pr*0.0007589);
		 v = r1+(((r2-r1)/300) * (kg-300));
	 }
	  if ((kg>=600) && (kg<=750))
	 {
		 r2 = 25.371429 + (pr*-0.251845) + (pr*pr*0.0006845);
		 r1 = 25.235714 + (pr*-0.265089) + (pr*pr*0.0007589);
		 v = r1+(((r2-r1)/150) * (kg-600));
	 }
    }
	
  document.fat.vo2.value = nt2dp(v,2);
  document.fat.vo2m.value = nt2dp(v*1000/wt,2);
}


function vclear()
{
  document.fat.vo2.value = "";
  document.fat.vo2m.value = "";
}

function nt2dp(num,dp)
{
<!-- rounds num to dp decimal places -->
  num=num*1+(0.55/Math.pow(10,dp));
  if (dp>0) dp=dp+1;
  b=Math.floor(num).toString().length+dp;
  return num.toString().substr(0,b);
}