function obese(ht,wt)
{
  var bmi;
  bmi=wt*10000/(ht*ht);
  return bmi;
}

function basalee(gender,wt,ht,age)
{
       if(gender=="female")
       {
          bee=655+9.6*wt+1.8*ht-4.7*age;
       }
       else
       {
          bee=66+13.7*wt+5*ht-6.8*age;
       }
       return bee;
}


function weight(bmi,ht)
{
 var wt;
 wt=bmi*ht*ht/10000;
 return wt;
}      
function pregnancy(x1,x2,x3,b) {

b=parseInt(b,10);
z=parseInt(x1,10);
/*alert(z);*/
y=document.preg.T2.value;
y=parseInt(y,10);
c=parseInt(x3,10);
k=c%4;
if (k==0)
{
	 con=1;
	/* alert ("k is leap");*/
}
else
	{
		 con=0;
	}
if  ((k==0)&&(y==2))
   {	                    
     days=29;
   }
else
   {
     days=28;
   }
	       
	 if (y==1)
	 {
	 days=31;
	 /*alert("for jan day is" +days);*/
	 /*alert("value of y is"+ y);*/
	 }
               else if (y==3)
	{
 	days=31;
	 }
	 else if (y==4)
	 {
	 days=30;
	 }
	 else if (y==5)
 	{
	 days=31;
	 }
	 else if (y==6)
 	{
	 days=30;
	 }
	 else if (y==7)
	 {
	 days=31;
	 }
	 else if (y==8)
	 {
	 days=31;
	 }
 	else if (y==9)
 	{
	 days=30;
	 }
 	else if (y==10)
	 {
	 days =31;
	 }
	 else if (y==11)
 	{
 	days=30;
	 }
 	else if (y==12)
	 {
	 days=31;
	 }
 
          /*    else  if ((k==0)&&(y==2)) */
          /*	  {               */
         /* 	 days=29;    */
       /*	 }        */
         /*alert(days);*/
   acd= z+ parseInt(b-28,10)+ parseInt(7);
     /*alert("acd is "+acd);*/
       acd=parseInt(acd,10);
       /*alert("acvlsue is: "+ acd);*/
       /*alert("con is " + con);*/
       acd =acd +parseInt(con,10);
       acd=parseInt(acd,10);
       /*alert("acd is  " +acd);*/
       /*alert( "current month is " + y);*/
      	 if (acd>parseInt(days,10))
         	{
          	acd=acd-days;
         	/*	 alert("actual acd is " +acd);*/
           	y=parseInt(y,10)+1;
            
                        if (y > 12)
                                {
                                y=parseInt(y,10)-12;
                                 c=parseInt(c)+1;
                                }
             }
             else 
             {
             acd=parseInt(acd,10);
             y=parseInt(y,10);
             }
             /*alert ("y is " + y);*/
            y=parseInt(y,10)+parseInt(9,10);
            if (y>12)
             {
              y=parseInt(y,10)-12;
              c=parseInt(c,10)+1;
              }
              else 
              {
               y=parseInt(y,10);
               c=parseInt(c,10);
               }
  k1=c%4;       // changes made from here  due to p0003 

   if (((k==0)|(k1==0))&&(y==2))
     {
     days=29;
    }
   else 
        {
          days=28;
       }
if (y==1)
	 {
	 days=31;
	 /*alert("for jan day is" +days);*/
	 /*alert("value of y is"+ y);*/
	 }
               else if (y==3)
	{
 	days=31;
	 }
	 else if (y==4)
	 {
	 days=30;
	 }
	 else if (y==5)
 	{
	 days=31;
	 }
	 else if (y==6)
 	{
	 days=30;
	 }
	 else if (y==7)
	 {
	 days=31;
	 }
	 else if (y==8)
	 {
	 days=31;
	 }
 	else if (y==9)
 	{
	 days=30;
	 }
 	else if (y==10)
	 {
	 days =31;
	 }
	 else if (y==11)
 	{
 	days=30;
	 }
 	else if (y==12)
	 {
	 days=31;
	 }
                            // changes made upto here  due to p0003

     if (acd>parseInt(days,10))
         {
          acd=acd-days;
         /* alert("actual acd is " +acd);*/
           y=parseInt(y,10)+1;
         }

             /*  alert(" the delivery is during " + y);*/
               if (y==1)
               {
                month="January,";
                }
                else if (y==2)
                {
                month="Febraury,";
                }
                else if (y==3)
                {
                month="March,";
                }
                else if (y==4)
                {
                month="April,";
                }
                else if (y==5)
                {
                month="May,";
                }
                else if (y==6)
                {
                month="June,";
                }
                else if (y==7)
                {
                month="July,";
                }
                else if (y==8)
                {
                month="August,";
                }
                else if (y==9)
                {
                month="September,";
                }
                else if (y==10)
                {
                month="October,";
                }
                else if (y==11)
                {
                month="November,";
                }
                else if (y==12)
                {
                month="December,";
                }
                if (acd==0){acd=1;}
                acd=acd.toString();
                
                
               if ((acd.lastIndexOf(4)==1)||(acd.lastIndexOf(5)==1)||(acd.lastIndexOf(6)==1)||(acd.lastIndexOf(7)==1)||(acd.lastIndexOf(8)==1)||(acd.lastIndexOf(9)==1)||(acd.lastIndexOf(0)==1)||((acd.lastIndexOf(1)==1)&&(acd.indexOf(1)==0)))               
                {
                acd=acd+"th,";
                }
                else if ((acd=="2")||((acd.lastIndexOf(2)==1)&&(acd.indexOf(2)==0)))
                {
                        acd=acd+"nd,";
                        
                        }
                        else if ((acd=="4")||(acd=="5")||(acd=="6")||(acd=="7")||(acd=="8")||(acd=="9")||(acd=="10")||(acd.lastIndexOf(4)==1)||(acd.lastIndexOf(5)==1)||(acd.lastIndexOf(6)==1)||(acd.lastIndexOf(7)==1)||(acd.lastIndexOf(8)==1)||(acd.lastIndexOf(9)==1)||((acd.lastIndexOf(2)==1)&&(acd.indexOf(1)==0)))
                        {
                        acd=acd+"th,";
                        
                        }
                        else if (((acd.lastIndexOf(3)==1)&&(acd.indexOf(2)==0))||(acd=="3"))
                        {
                                        acd=acd+"rd,";
                        }
                                        
                        else if ((acd.lastIndexOf(3)==1)&&(acd.indexOf(1)==0))
                        {
                        acd=acd+ "th,";
                        }                                       
                        else if (acd=="1")
                        {
                        acd=acd + "st ,";
                        }
                        else if ((acd.lastIndexOf(2)==0)&&(acd.indexOf(1)==1))
                        {
                        acd=acd+ "st ,";
                        }
                        else if((acd.lastIndexOf(3)==0)&&(acd.lastIndexOf(1)==1))
                        {
                        acd=acd+ "st ,";
                        }
                                                        
          
          expectdeldate=acd.toString()+month.toString()+c.toString();
          document.preg.edd.value=expectdeldate;
          return true;
}
function fertility(x1,x2,x3)
{b=document.fert.cyctime.value;
b=parseInt(b,10);
z=parseInt(x1,10);
c=parseInt(x3,10);
y=parseInt(x2,10);

if (x1=="")
{
alert("Enter the Date");
document.fert.T1.focus();
document.fert.edd.value="";document.fert.edd1.value="";
return false;
}
else if (x2=="")
{
alert("enter the Month");
document.fert.T2.focus();
document.fert.edd.value="";document.fert.edd1.value="";
return false;
}
else if (x3=="")
{
alert("enter the Year");
document.fert.T3.focus();
document.fert.edd.value=="";document.fert.edd1.value="";
return false;
}
else if (b=="")
{
alert("enter the cycle time");
document.fert.cyctime.focus();
document.fert.edd.value="";document.fert.edd1.value="";
return false;
}
else
{
x1=document.fert.T1.value;
x2=document.fert.T2.value;
x3=document.fert.T3.value;
b=document.fert.cyctime.value;
}
y=document.fert.T2.value;
y=parseInt(y,10);
c=parseInt(x3,10); 
 z=z+parseInt(b-14,10);
z=parseInt(z,10);
k=c%4;
if  ((k==0)&&(y==2))
   {	                    
     days=29;
   }
else
   {
     days=28;
   }
if (y==1)
 {
 days=31;
 /*alert("for jan day is" +days);*/
 /*alert("value of y is"+ y);*/
 }
 else if (y==2)
 {
 days=28;
 }
 else if (y==3)
 {
 days=31;
 }
 else if (y==4)
 {
 days=30;
 }
 else if (y==5)
 {
 days=31;
 }
 else if (y==6)
 {
 days=30;
 }
 else if (y==7)
 {
 days=31;
 }
 else if (y==8)
 {
 days=31;
 }
 else if (y==9)
 {
 days=30;
 }
 else if (y==10)
 {
 days =31;
 }
 else if (y==11)
 {
 days=30;
 }
 else if (y==12)
 {
 days=31;
 }
 
 else if ((k==0)&&(y==2))
     {
     days=29;
    }
if (z>days)
{
y=y+1;
; 
if (y>12)
    {
    y=y-12;
    c=c+1;
    }
    z=z-days;
}
else
{
z=z;
y=y;
}

edate=z;
 emonth=y;
/*alert("emonth is "+ emonth);*/
eyear=c;
/*alert("z is edate"+edate);*/

/*alert("entering");*/
emonth1=emonth;
/*alert("emonth1 is **" +emonth);*/
eyear1=eyear;
mindate=edate-3;
/*alert(mindate);*/
if (mindate<1)
{
 mindate=mindate+days;
 /*alert("mindate is " +mindate);*/
 emonth1=parseInt(emonth1,10)-1;
 /*alert("emonth1 is "+emonth1);*/
	if (emonth1<1)
	   {
	   emonth1=12;
	   eyear1=eyear-1;
	   }
	   else
	   {
	   emonth1=parseInt(emonth1,10);
	   eyear1=eyear1;
	   }
}
else
{
mindate=mindate;
}
/*alert("eyear1 is "+eyear1);*/
/*alert("entering maxdate");*/
emonth2=parseInt(emonth,10);
/*alert("emonth2"+emonth2);*/
eyear2=parseInt(eyear,10);
maxdate=edate+3;
/*alert("max date is " +maxdate);*/
if (maxdate>days)
{
/*alert("entering monthincerementing");*/
 maxdate=maxdate-days;
 /*alert("emonth2 before"+ emonth2);*/
 emonth2=emonth2+1;
/*alert("emonth2 after"+emonth2);*/
 emonth2=parseInt(emonth2,10);
		  if (emonth2==13)
			{
				emonth2=parseInt(emonth2,10)-12;
				/*alert("emonth2 is "+ emonth2);*/
				eyear2=parseInt(eyear2,10)+1;
			}
			else
			{
			 emonth2=emonth2;
			 eyear2=eyear2;
			 }
}			 
	else
	{
	maxdate=maxdate;
	}
	mindate=mindate.toString();
	maxdate=maxdate.toString();
	minmonth=parseInt(emonth1,10);
	/*alert("emonth1 is" +emonth1); */
	minmonth=minmonth.toString();
	/*alert("minmonth is" +minmonth);*/
	maxmonth=parseInt(emonth2,10);
	/*alert("emonth2 is " +emonth2);*/
	maxmonth=maxmonth.toString();
	minyear=parseInt(eyear1,10);
	minyear=minyear.toString();
	maxyear=parseInt(eyear2,10);
	maxyear=maxyear.toString();
	
mferdays= ""+ mindate + "/" + minmonth + "/" +minyear;
mferdays=mferdays.toString();
mferdays1=""+ maxdate + "/" + maxmonth + "/" + maxyear;
mferdays1=mferdays1.toString();
document.fert.edd.focus;
document.fert.edd.value=mferdays;
document.fert.edd1.value=mferdays1;
return true;
}
function water(wt,factor)
{
      tbw=wt*factor;
      ttbw=""+tbw;
      icf=2*tbw/3;
      iicf=""+icf;
      no=iicf.indexOf('.');
      if(no>-1)
      icf=iicf.substring(0,no+3);
      else icf=iicf;
      ecf=tbw-icf;
      eecf=""+ecf
      no=eecf.indexOf('.');
      if(no>-1)
      eecf=eecf.substring(0,no+3);
      else ecf=eecf;
      iifv=0.75*ecf;
      ifv=""+iifv;
      no=ifv.indexOf('.');
      if(no>-1)
      ifv=ifv.substring(0,no+3);
      ppv=ecf-iifv;
      pv=""+ppv;
      no=pv.indexOf('.');
      if(no>-1)
      pv=pv.substring(0,no+3);
      no=ttbw.indexOf('.');
      if(no>-1)
      tbw=ttbw.substring(0,no+3);
      document.water.tbw.value=tbw;
      document.water.icf.value=icf;
      document.water.ecf.value=eecf;
      document.water.ifv.value=ifv;
      document.water.pv.value=pv;
      return true;
}

function creatinine(wt,factor,age,sc)
{
  cl=factor*wt*(140-age)/(72*sc);
  return cl;
}
function surfacearea(wt,ht)
{
      var wet;
      var het;
      wet=Math.pow(wt,0.425);
      het=Math.pow(ht,0.725);
      res=wet*het*71.84/10000;
      document.area.avg.value=1.73;
      return res;
}