function Fmt(x) { 
var v
if(x>=0) { v=''+(x+0.00005) } else { v=''+(x-0.00005) }
return v.substring(0,v.indexOf('.')+3) 
}

function compute(form) { 
if((form.insulin.value==null)||(form.insulin.value=="")||(isNaN(form.insulin.value))){
alert('Please enter the total daily insulin dose.');
return false;
}

 
form.basal.value= Fmt((.01667*form.insulin.value));
form.bolus.value= Fmt((.13333*form.insulin.value));
   if(form.intype[0].checked)form.sensitivity.value= Fmt((1800/form.insulin.value));
   if(form.intype[1].checked)form.sensitivity.value= Fmt((1500/form.insulin.value));
form.senmol.value=Fmt(form.sensitivity.value/18);
   if(form.intype[0].checked)form.carbratio.value= Fmt((500/form.insulin.value));
 if(form.intype[1].checked)form.carbratio.value= Fmt((450/form.insulin.value));


	 }



function compute2(form) {  

form.grams.value= Fmt((form.carb.value/form.insulin.value));
form.extrainsulin.value= Fmt((1/form.grams.value)*form.extragrams.value)+" units of insulin should cover " + form.extragrams.value + " grams carbohydrate." ;	
 }

function computepre(form) {
if((form.insulin4.value==null)||(form.insulin4.value=="")||(isNaN(form.insulin4.value))){
alert('Please enter the total daily insulin dose.');
return false;
}
if((form.sugar4.value==null)||(form.sugar4.value=="")||(isNaN(form.sugar4.value))){
alert('Please enter the premeal blood sugar.');
return false;
}

if((form.carb4.value==null)||(form.carb4.value=="")||(isNaN(form.carb4.value))){
alert('Please enter the grams carbohydrate to be eaten.');
return false;
}
if((form.targsugar4.value==null)||(form.targsugar4.value=="")||(isNaN(form.targsugar4.value))){
alert('Please enter the postmeal target blood sugar.');
return false;
}



if(form.intype4[0].checked)var sbolus =(form.sugar4.value-1*(form.targsugar4.value))/(1800/form.insulin4.value);
if(form.intype4[1].checked)var sbolus =(form.sugar4.value-1*(form.targsugar4.value))/(1500/form.insulin4.value);

if(form.intype4[0].checked)var carbolus =(form.carb4.value)/(500/form.insulin4.value);
if(form.intype4[1].checked)var carbolus =(form.carb4.value)/(450/form.insulin4.value);
 


form.bolus4.value= Fmt(sbolus + carbolus);


	 }