function isNum(args)
{
	args = args.toString();

	if (args.length == 0)
	return false;

	for (var i = 0;  i<args.length;  i++)
	{
		if ((args.substring(i,i+1) < "0" || args.substring(i, i+1) > "9") && args.substring(i, i+1) != "." && args.substring(i, i+1) != "-" && args.substring(i, i+1) != "e" && args.substring(i, i+1) != "E")
		{
			return false;
		}
	}

	return true;
}

function grpmcheck(p)
{
   var r = document.grpm.radium.value;
   var m = document.grpm.rpm.value;
   var g = document.grpm.gforce.value;
   
	if (p == "1" && !isNum(r))
	{
		r = r.substring(0,r.length-1);	
		document.grpm.radium.value = r;		
	}

	if (p == "2" && !isNum(m))
	{
		m = m.substring(0,m.length-1);	
		document.grpm.rpm.value = m;		
	}

	if (p == "3" && !isNum(g))
	{
		g = g.substring(0,g.length-1);	
		document.grpm.gforce.value = g;		
	}
}


function grpmverifyall()
{
	var rname = document.rotorsearch.rname.value;
	var rmachine = document.rotorsearch.rmachine.value;

	var minrL = document.rotorsearch.minrL.value;
	var minrH = document.rotorsearch.minrH.value;

	var maxrL = document.rotorsearch.maxrL.value;
	var maxrH = document.rotorsearch.maxrH.value;

	var maxrpmL = document.rotorsearch.maxrpmL.value;
	var maxrpmH = document.rotorsearch.maxrpmH.value;

	var maxgL = document.rotorsearch.maxgL.value;
	var maxgH = document.rotorsearch.maxgH.value;

    if (minrL / minrH > 1) 
	{
	    alert ("Min radius should not >=" + minrL + " while <=" + minrH);
		document.rotorsearch.minrL.focus();
		return false;
	}
   else if (maxrL / maxrH > 1) 
	{
	    alert ("Max radius should not >=" + maxrL + " while <=" + maxrH);
		return false;
	 }
    else if (maxrpmL / maxrpmH > 1) 
	{
	    alert ("Max RPM should not >=" + maxrpmL + " while <=" + maxrpmH);
		return false;
	 }
   else if (maxgL / maxgH > 1) 
	{
	    alert ("Max RCF should not >=" + maxgL + " while <=" + maxgH);
		return false;
	 }
	 return true;
}

function rpmreset(ii)
{
    if (ii == "1")
	{
	   document.rotorsearch.rname.value = "all";
       document.rotorsearch.rmachine.value = "all";
	}
    if (ii == "2")
	{
	   document.rotorsearch.minrL.value = "0";
	   document.rotorsearch.minrH.value = "100";		
	}
    if (ii == "3")
	{
	   document.rotorsearch.maxrL.value = "0";
	   document.rotorsearch.maxrH.value = "100";			
	}
    if (ii == "4")
	{
	   document.rotorsearch.maxrpmL.value = "0";
	   document.rotorsearch.maxrpmH.value = "100000000";			
	}
    if (ii == "5")
	{
	   document.rotorsearch.maxgL.value = "0";
	   document.rotorsearch.maxgH.value = "100000000";			
	}
}

function checklegaldigit(ii)
{	
	if (ii=="1")
	{
	    var rval = document.rotorsearch.minrL.value;
		
		if (rval / 100 > 1)
		{
		   alert("Min rotor value too high!")
		   document.rotorsearch.minrL.value = "0";
		}
		else if (!isNum(rval))
		{
		    //alert("contain illegal char");
			//alert(cchar);
			rval = rval.substring(0,rval.length-1);	
			//alert(cchar);
			document.rotorsearch.minrL.value = rval;		
		}
	}
	if (ii=="2")
	{
	    var rval = document.rotorsearch.minrH.value;
		
		if (rval / 100> 1)
		{
		   alert("Min rotor value too high!")
		   document.rotorsearch.minrH.value = "";
		}
		else if (!isNum(rval))
		{
		    //alert("contain illegal char");
			//alert(cchar);
			rval = rval.substring(0,rval.length-1);	
			//alert(cchar);
			document.rotorsearch.minrH.value = rval;		
		}
	}
	if (ii=="3")
	{
	    var rval = document.rotorsearch.maxrL.value;
		
		if (rval / 100> 1)
		{
		   alert("Max rotor value too high!")
		   document.rotorsearch.maxrL.value = "0";
		}
		else if (!isNum(rval))
		{
		    //alert("contain illegal char");
			//alert(cchar);
			rval = rval.substring(0,rval.length-1);	
			//alert(cchar);
			document.rotorsearch.maxrL.value = rval;		
		}
	}
	if (ii=="4")
	{
	    var rval = document.rotorsearch.maxrH.value;
		
		if (rval / 100> 1)
		{
		   alert("Max rotor value too high!")
		   document.rotorsearch.maxrH.value = "";
		}
		else if (!isNum(rval))
		{
		    //alert("contain illegal char");
			//alert(cchar);
			rval = rval.substring(0,rval.length-1);	
			//alert(cchar);
			document.rotorsearch.maxrH.value = rval;		
		}
	}
	if (ii=="5")
	{
	    var rval = document.rotorsearch.maxrpmL.value;
		
		if (rval / 10000000> 1)
		{
		   alert("Max RPM value too high!")
		   document.rotorsearch.maxrpmL.value = "0";
		}
		else if (!isNum(rval))
		{
		    //alert("contain illegal char");
			//alert(cchar);
			rval = rval.substring(0,rval.length-1);	
			//alert(cchar);
			document.rotorsearch.maxrpmL.value = rval;		
		}
	}
	if (ii=="6")
	{
	    var rval = document.rotorsearch.maxrpmH.value;
		
		if (rval / 10000000> 1)
		{
		   alert("Max RPM value too high!")
		   document.rotorsearch.maxrpmH.value = "";
		}
		else if (!isNum(rval))
		{
		    //alert("contain illegal char");
			//alert(cchar);
			rval = rval.substring(0,rval.length-1);	
			//alert(cchar);
			document.rotorsearch.maxrpmH.value = rval;		
		}
	}
	if (ii=="7")
	{
	    var rval = document.rotorsearch.maxgL.value;
		
		if (rval / 10000000> 1)
		{
		   alert("Max RCF value too high!")
		   document.rotorsearch.maxgL.value = "0";
		}
		else if (!isNum(rval))
		{
		    //alert("contain illegal char");
			//alert(cchar);
			rval = rval.substring(0,rval.length-1);	
			//alert(cchar);
			document.rotorsearch.maxgL.value = rval;		
		}
	}
	if (ii=="8")
	{
	    var rval = document.rotorsearch.maxgH.value;
		
		if (rval / 10000000> 1)
		{
		   alert("Max RCF value too high!")
		   document.rotorsearch.maxgH.value = "";
		}
		else if (!isNum(rval))
		{
		    //alert("contain illegal char");
			//alert(cchar);
			rval = rval.substring(0,rval.length-1);	
			//alert(cchar);
			document.rotorsearch.maxgH.value = rval;		
		}
	}
}

/*
function isNum(args)
{
	args = args.toString();

	if (args.length == 0)
	return false;

	for (var i = 0;  i<args.length;  i++)
	{
		if ((args.substring(i,i+1) < "0" || args.substring(i, i+1) > "9") && args.substring(i, i+1) != ".")
			{
			return false;
			}
	}

	return true;
}
*/

function clearForm(tranform)
{
    tranform.value = "";
    tranform.focus();	
}
//function clearGForm(this.form.radium)"
//{

//}
function getselectedbutton(buttongroup)
	{
	 for (var i=0; i <buttongroup.length;i++)
		{
		if (buttongroup[i].checked)
			{
			return buttongroup[i].value;
			break;
			}
		}
	alert("you must select a value from the radio buttons");
	return(false);
	}

function CheckRadius(ii)
{
  document.grpm.radium.value = ii;
  document.grpm.radium.focus();
}	
function calgrpm(ii,c)
{
    //alert("worked");
    var radius = document.grpm.radium.value;
    var rpmval = document.grpm.rpm.value;
    var gforceval = document.grpm.gforce.value;
    //alert("worked");
	
	if (radius == "") return (false);
	
   radius= radius.replace(/,/g,"");
   rpmval= rpmval.replace(/,/g,"");
   gforceval = gforceval.replace(/,/g,"");
	
	//rpm input, need to convert ot gforce
	if (c == "1")
	{
	    if (isNum(rpmval))
		{
            gforceval = Math.round(1.118 * radius * rpmval * rpmval * 0.00001);		
	        document.grpm.gforce.value = gforceval;
		}
		else
		{
				rpmval = rpmval.substring(0,rpmval.length-1);
				document.grpm.rpmval.value = rpmval;		
		}
	}
	else
	{
	    if (isNum(gforceval))
		{
		    rpmval = Math.round(Math.sqrt(gforceval * 100000/(1.118 * radius)));
	        document.grpm.rpm.value = rpmval;		
		}
		else
		{
				rpmval=rpmval.substring(0,rpmval.length-1);
				document.grpm.rpm.value = rpmval;		
		}		
	}
}

function numsort()
{
    var direc = getselectedbutton(document.ns.NAtype); 
	alert(direc);

}
	
function odcal(ii,c)
{
    var od260 = document.od.lengthA.value;
	var concentration = document.od.lengthB.value;
	
   od260= od260.replace(/,/g,"");
   concentration= concentration.replace(/,/g,"");
	
	//var eff = 50;
	
	var eff=getselectedbutton(document.od.NAtype); 
	//		return (k * form.OD.value);
	
	if (c == "1")
	{
	    if (isNum(od260))
		{
	        document.od.lengthB.value = od260 * eff;
		}
		else
		{
				od260 = od260.substring(0,od260.length-1);
				document.od.lengthA.value = od260;		
		}
	}
	else
	{
	    if (isNum(concentration))
		{
	        document.od.lengthA.value = concentration/eff;
		
		}
		else
		{
				concentration=concentration.substring(0,concentration.length-1);
				document.od.lengthB.value = concentration;		
		}
		
	}
}


function odpro(ii,c)
{
    var od280 = document.od.lengthA.value;
    var od260 = document.od.lengthB.value;
	var concpure = document.od.lengthC.value;
	var conccontam = document.od.lengthD.value;
	//var eff = 50;
	
	//var eff=getselectedbutton(document.od.NAtype); 
	//		return (k * form.OD.value);
	
	if (c == "1")
	{
	    if (isNum(od280))
		{
			concpure = od280;
			if (od260 != "") 
			  conccontam = od280 * 1.55 - od260 * 0.76;
		}
		else
		{
			od280 = od280.substring(0,od280.length-1);
		}
	}
	if (c == "2")
	{
	    if (isNum(od260))
		{
			if (od280 != "") 
			  conccontam = od280 * 1.55 - od260 * 0.76;
		}
		else
		{
			od260 = od260.substring(0,od260.length-1);
		}
	}
	else if (c=="3")
	{
	    if (isNum(concpure))
		{
			od280 = concpure;
			if (od260 != "") 
			  conccontam = od280 * 1.55 - od260 * 0.76;
		}
		else
		{
			concpure = concpure.substring(0,concpure.length-1);
		}
	}
	
    document.od.lengthA.value = od280;
    document.od.lengthB.value = od260;
	document.od.lengthC.value = concpure;
	document.od.lengthD.value = conccontam;	
}



function transformcal(ii,c)
{
	var vecc = document.transformeff.lengthA.value;
	var vecu = document.transformeff.lengthB.value;
	var volLig = document.transformeff.lengthC.value;
	var volTrans = document.transformeff.lengthD.value;
	var volSOC = document.transformeff.lengthE.value;
	var volPlate = document.transformeff.lengthF.value;
	var CLNum = document.transformeff.lengthG.value;
	var te = document.transformeff.lengthH.value;
	
	if (c == "1")
	{
	   if (isNum(vecc) && isNum(vecu) && isNum(volLig) && isNum(volTrans) && isNum(volSOC) && isNum(volPlate) && isNum(CLNum))
	   {
	       te = 1000 * (CLNum * (volLig/volTrans) * (volSOC/volPlate)) / (vecu * vecc)
		   document.transformeff.lengthH.value = te;
       }
       else
	   {
	        if (!isNum(vecc))
			{
				vecc = vecc.substring(0,vecc.length-1);
				document.transformeff.lengthA.value = vecc;
			}
	   }	   
	}
	else if (c =="2")
	{
	   if (isNum(vecc) && isNum(vecu) && isNum(volLig) && isNum(volTrans) && isNum(volSOC) && isNum(volPlate) && isNum(CLNum))
	   {
	       te = 1000 * (CLNum * (volLig/volTrans) * (volSOC/volPlate)) / (vecu * vecc)
		   document.transformeff.lengthH.value = te;
       }
       else
	   {
	        if (!isNum(vecu))
			{
				vecu = vecu.substring(0,vecu.length-1);
				document.transformeff.lengthB.value = vecu;
			}
	   }	   	
	}
	else if (c =="3")
	{
	   if (isNum(vecc) && isNum(vecu) && isNum(volLig) && isNum(volTrans) && isNum(volSOC) && isNum(volPlate) && isNum(CLNum))
	   {
	       te = 1000 * (CLNum * (volLig/volTrans) * (volSOC/volPlate)) / (vecu * vecc)
		   document.transformeff.lengthH.value = te;
       }
       else
	   {
	        if (!isNum(volLig))
			{
				volLig = volLig.substring(0,volLig.length-1);
				document.transformeff.lengthC.value = volLig;
			}
	   }	
	}
    else if (c == "4")
    {
	   if (isNum(vecc) && isNum(vecu) && isNum(volLig) && isNum(volTrans) && isNum(volSOC) && isNum(volPlate) && isNum(CLNum))
	   {
	       te = 1000 * (CLNum * (volLig/volTrans) * (volSOC/volPlate)) / (vecu * vecc)
		   document.transformeff.lengthH.value = te;
       }
       else
	   {
	        if (!isNum(volTrans))
			{
				volTrans = volTrans.substring(0,volTrans.length-1);
				document.transformeff.lengthD.value = volTrans;
			}
	   }		
    }
    else if (c == "5")
    {
	   if (isNum(vecc) && isNum(vecu) && isNum(volLig) && isNum(volTrans) && isNum(volSOC) && isNum(volPlate) && isNum(CLNum))
	   {
	       te = 1000 * (CLNum * (volLig/volTrans) * (volSOC/volPlate)) / (vecu * vecc)
		   document.transformeff.lengthH.value = te;
       }
       else
	   {
	        if (!isNum(volSOC))
			{
				volSOC = volSOC.substring(0,volSOC.length-1);
				document.transformeff.lengthE.value = volSOC;
			}
	   }			
    }
    else if (c == "6")
    {
	   if (isNum(vecc) && isNum(vecu) && isNum(volLig) && isNum(volTrans) && isNum(volSOC) && isNum(volPlate) && isNum(CLNum))
	   {
	       te = 1000 * (CLNum * (volLig/volTrans) * (volSOC/volPlate)) / (vecu * vecc)
		   document.transformeff.lengthH.value = te;
       }
       else
	   {
	        if (!isNum(volPlate))
			{
				volPlate = volPlate.substring(0,volPlate.length-1);
				document.transformeff.lengthF.value = volPlate;
			}
	   }		
	
    }
    else if (c == "7")
    {
	   if (isNum(vecc) && isNum(vecu) && isNum(volLig) && isNum(volTrans) && isNum(volSOC) && isNum(volPlate) && isNum(CLNum))
	   {
	       te = 1000 * (CLNum * (volLig/volTrans) * (volSOC/volPlate)) / (vecu * vecc)
		   document.transformeff.lengthH.value = te;
       }
       else
	   {
	        if (!isNum(CLNum))
			{
				CLNum = CLNum.substring(0,CLNum.length-1);
				document.transformeff.lengthG.value = CLNum;
			}
	   }		
	
    }
}

///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////Dilution Calculator ** Dilution Calculator ** Dilution Calculator //////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
function dilutecal(p)
{
     //alert("begin");
	 //alert(p);
     var osel =document.dilution.origsel.value;
     var fsel =document.dilution.finalsel.value;
	 
	 var oconc = document.dilution.origconc.value;
	 var fconc = document.dilution.finalconc.value;
	 
	 var ovol = document.dilution.origvol.value;
	 var fvol = document.dilution.finalvol.value;
	  
	if (p == "1" && !isNum(oconc))
	{
		  oconc = oconc.substring(0,oconc.length-1);
		  document.dilution.origconc.value = oconc;
		  return;	   
	}
	if (p == "2" && !isNum(ovol))
	{
		  ovol = ovol.substring(0,ovol.length-1);
		  document.dilution.origvol.value = ovol;
		  return;	   
	}
	if (p == "3" && !isNum(fconc))
	{
		  fconc = fconc.substring(0,fconc.length-1);
		  document.dilution.finalconc.value = fconc;
		  return;	   
	}
	if (p == "4" && !isNum(fvol))
	{
		  fvol = fvol.substring(0,fvol.length-1);
		  document.dilution.finalvol.value = fvol;
		  return;	   
	}
	
     var flag = 0;
     if (oconc == "") flag =flag + 1;
     if (ovol == "") flag = flag + 1;
     if (fconc == "") flag = flag + 1;
     if (fvol == "") flag = flag + 1;

     if (flag > 1) return;

/*	 
	if (p == "1")
	{
	
	    if (
		     isNum(fconc)
		     && isNum(fvol)
		   )
		{
			ovol = fconc * fvol * fsel /(oconc * osel);
			document.dilution.origvol.value = ovol;
			return;
		}
	    else if (
		     isNum(ovol)
		     && isNum(fconc)
		   )
		{
			fvol = oconc * osel * ovol /(fconc * fsel);
			document.dilution.finalvol.value = fvol;
			return;
		}
	    else if (
		     isNum(ovol)
		     && isNum(fvol)
		   )
		{
			fconc = oconc * osel * ovol /(fvol * fsel);
			document.dilution.finalconc.value = fconc;
			return;
		}
	}
	else if (p == "2")
	{
	
	    if (
		     isNum(fconc)
		     && isNum(fvol)
		   )
		{
			oconc = fconc * fvol * fsel /(ovol * osel);
			document.dilution.origconc.value = oconc;
			return;
		}
	    else if (
		     isNum(oconc)
		     && isNum(fconc)
		   )
		{
			fvol = oconc * osel * ovol /(fconc * fsel);
			document.dilution.finalvol.value = fvol;
			return;
		}
	    else if (
		     isNum(oconc)
		     && isNum(fvol)
		   )
		{
			fconc = oconc * osel * ovol /(fvol * fsel);
			document.dilution.finalconc.value = fconc;
			return;
		}
	}
	else if (p == "3")
	{
	
	    if (
		     isNum(oconc)
		     && isNum(fvol)
		   )
		{
			ovol = fconc * fvol * fsel /(oconc * osel);
			document.dilution.origvol.value = ovol;
			return;
		}
        else if (
		     isNum(oconc)
		     && isNum(ovol)
		   )
		{
			fvol = oconc * ovol * osel /(fconc * fsel);
			document.dilution.finalvol.value = fvol;
			return;
		}
	    else if (
		     isNum(ovol)
		     && isNum(fvol)
		   )
		{
			oconc = fconc * fsel * fvol /(ovol * osel);
			document.dilution.origconc.value = oconc;
			return;
		}
	}
	else if (p == "4")
	{
	    if (
		     isNum(oconc)
		     && isNum(fconc)
		   )
		{
			ovol = fconc * fvol * fsel /(oconc* osel);
			//alert(ovol);
			document.dilution.origvol.value = ovol;
			return;
		}
	
	    else if (
		     isNum(oconc)
		     && isNum(ovol)
		   )
		{
			fconc = oconc * ovol * osel /(fvol * fsel);
			document.dilution.finalconc.value = fconc;
			return;
		}
	    else if (
		     isNum(ovol)
		     && isNum(fconc)
		   )
		{
			oconc = fconc * fsel * fvol /(ovol * osel);
			document.dilution.origconc.value = oconc;
			return;
		}
	}
	else if (p=="5")
	{
	    if (
		     isNum(ovol)
		     && isNum(oconc)
		     && isNum(fconc)
		     && isNum(fvol)
		   )
		{
		     ovol = fconc * fvol * fsel/(oconc * osel);
			 document.dilution.origvol.value = ovol;
			 return;
		}
	}
	else if (p=="6")
	{
	    //alert("6");
	    if (
		     isNum(ovol)
		     && isNum(oconc)
		     && isNum(fconc)
		     && isNum(fvol)
		   )
		{
		     ovol = fconc * fvol * fsel/(oconc * osel);
			 document.dilution.origvol.value = ovol;
			 return;
		}
	}
	
	else if (p == "100")
*/
    if (p == "100")
	{
	    //alert("100");
	    if (!isNum(ovol))
		{
			ovol = fconc * fvol * fsel /(oconc * osel);
			document.dilution.origvol.value = ovol;
			return;
		}
	    else if (!isNum(oconc))
		{
			oconc = fconc * fsel * fvol /(ovol * osel);
			document.dilution.origconc.value = oconc;
			return;
		}
	    else if (!isNum(fconc))
		{
			fconc = oconc * osel * ovol /(fvol * fsel);
			document.dilution.finalconc.value = fconc;
			return;
		}		
	    else if (!isNum(fvol))
		{
			fvol = oconc * osel * ovol /(fconc * fsel);
			document.dilution.finalvol.value = fvol;
			return;
		}
	}
}

function liquidcheck(p)
{
//alert("good");
    var liqconc1 =document.dilution.liqconc1.value;
//alert("good");
    var liqvol1 = document.dilution.liqvol1.value;
    var liqconc2 = document.dilution.liqconc2.value;
    var liqvol2 = document.dilution.liqvol2.value;
	  
	if (p == "1" && !isNum(liqconc1))
	{
		  liqconc1 = liqconc1.substring(0,liqconc1.length-1);
		  document.dilution.liqconc1.value = liqconc1;
		  return;	   
	}
	if (p == "2" && !isNum(liqvol1))
	{
		  liqvol1 = liqvol1.substring(0,liqvol1.length-1);
		  document.dilution.liqvol1.value = liqvol1;
		  return;	   
	}
	if (p == "3" && !isNum(liqconc2))
	{
		  liqconc2 = liqconc2.substring(0,liqconc2.length-1);
		  document.dilution.liqconc2.value = liqconc2;
		  return;	   
	}
	if (p == "4" && !isNum(liqvol2))
	{
		  liqvol2 = liqvol2.substring(0,liqvol2.length-1);
		  document.dilution.liqvol2.value = liqvol2;
		  return;	   
	}
}

function solidcheck(p)
{
//alert("good");
    var solidconc1 =document.dilution.solidconc1.value;
//alert("good");
    var solidvol1 = document.dilution.solidvol1.value;
    var solidconc2 = document.dilution.solidconc2.value;
    var solidvol2 = document.dilution.solidvol2.value;
	  
	if (p == "1" && !isNum(solidconc1))
	{
		  solidconc1 = solidconc1.substring(0,solidconc1.length-1);
		  document.dilution.solidconc1.value = solidconc1;
		  return;	   
	}
	if (p == "2" && !isNum(solidvol1))
	{
		  solidvol1 = solidvol1.substring(0,solidvol1.length-1);
		  document.dilution.solidvol1.value = solidvol1;
		  return;	   
	}
	if (p == "3" && !isNum(solidconc2))
	{
		  solidconc2 = solidconc2.substring(0,solidconc2.length-1);
		  document.dilution.solidconc2.value = solidconc2;
		  return;	   
	}
	if (p == "4" && !isNum(solidvol2))
	{
		  solidvol2 = solidvol2.substring(0,solidvol2.length-1);
		  document.dilution.solidvol2.value = solidvol2;
		  return;	   
	}
}

function clearliquid()
{
    document.dilution.liqconc1.value ="";
    document.dilution.liqvol1.value ="";
    document.dilution.liqconc2.value ="";
    document.dilution.liqvol2.value ="";
    //document.dilution.liqsel11.value ="";
    //document.dilution.liqsel12.value ="";
    //document.dilution.liqsel21.value ="";
    //document.dilution.liqsel22.value ="";
}

function clearsolid()
{
    document.dilution.solidconc1.value ="";
    document.dilution.solidvol1.value ="";
    document.dilution.solidconc2.value ="";
    document.dilution.solidvol2.value ="";
    //document.dilution.solidsel11.value ="";
    //document.dilution.solidsel12.value ="";
    //document.dilution.solidsel21.value ="";
    //document.dilution.solidsel22.value ="";
}