//Check if the Tank is needed
function Any2ccpermin( dAnyFlow, dStdD, dD,volUnit){
        var dccpermin ;
        if (volUnit=="mm3/min")
            dccpermin=dAnyFlow/1000.0;
        else if (volUnit=="cc/min")
            dccpermin=dAnyFlow;
        else if (volUnit=="L/min")
            dccpermin=dAnyFlow*1000.0;
        else if (volUnit=="Gal/min")
            dccpermin=dAnyFlow*3785.412;
        else if (volUnit=="mm3/sec")
            dccpermin=dAnyFlow/1000.0*60.0;    
        else if (volUnit=="cc/sec")
            dccpermin=dAnyFlow*60.0;
        else if (volUnit=="L/sec")
            dccpermin=dAnyFlow*1000.0*60.0;
        else if (volUnit=="Gal/sec")
            dccpermin=dAnyFlow*3785.412*60.0;
        else if (volUnit=="mm3/hr")
            dccpermin=dAnyFlow/1000.0/60.0;    
        else if (volUnit=="cc/hr")
            dccpermin=dAnyFlow/60.0;
        else if (volUnit=="L/hr")
            dccpermin=dAnyFlow*1000.0/60.0;
        else if (volUnit=="Gal/hr")
            dccpermin=dAnyFlow*3785.412/60.0;
            
        else if (volUnit=="ug/min")
            dccpermin=dAnyFlow/1000.0/dD;
        else if (volUnit=="mg/min")
            dccpermin=dAnyFlow/dD;
        else if (volUnit=="g/min")
            dccpermin=dAnyFlow*1000.0/dD;
            
        else if (volUnit=="ug/sec")
            dccpermin=dAnyFlow/1000.0/dD*60.0;
        else if (volUnit=="mg/sec")
            dccpermin=dAnyFlow/dD*60.0;
        else if (volUnit=="g/sec")
            dccpermin=dAnyFlow*1000.0/dD*60.0;
            
        else if (volUnit=="ug/hr")
            dccpermin=dAnyFlow/1000.0/60.0/dD;    
        else if (volUnit=="mg/hr")
            dccpermin=dAnyFlow/60.0/dD;
        else if (volUnit=="g/hr")
            dccpermin=dAnyFlow*1000.0/60.0/dD;
            
        else if (volUnit=="std.cc/sec")
           dccpermin=dAnyFlow/dD*60.0;
        else if (volUnit=="std.cc/min")
            dccpermin=dAnyFlow/dD;
            
        else if (volUnit=="std.L/sec")
            dccpermin=dAnyFlow/dD*60.0*1000.0;
        else if (volUnit=="std.L/min")
            dccpermin=dAnyFlow/dD*1000.0;
            
        else if (volUnit=="std.cc/secE-3")
            dccpermin=dAnyFlow/dD*60.0/1000.0;
        else if (volUnit=="std.cc/secE-4")
            dccpermin=dAnyFlow/dD*60.0/10000.0;
        else
            dccpermin=dAnyFlow;
            
        return dccpermin;
        }

//Convert antthing to kPa
function Any2kPa(danyPres,presUnit){
        var dkPa=0.0;
        
        if (presUnit=="kPa")
            dkPa=danyPres;
        else if (presUnit=="psia")
            dkPa=danyPres*6.894757;
        else if (presUnit=="inH2O")
            dkPa=danyPres*0.24884*0.999189;  
        else if (presUnit=="psig")
            dkPa=(danyPres+14.696)*6.894757;
        else if (presUnit=="bar")
            dkPa=danyPres*100.0;
        else
            dkPa=danyPres; 
 
        return dkPa;
        }


//Density calcultion of the air   
function calcDensity(dkPa,dDegC){
        var dDen
        var dR =287.0

        dDen  = dkPa *1000 / (dDegC + 273.15) / dR;
        return dDen;
     }


function CheckNeedInletTank(testpressure,presunit,leakrate,leakunit){
	var lr
	var kPa
	var den
	var stdDen

	kPa=Any2kPa(testpressure,presunit);
	den=calcDensity(kPa,25.0);
	stdden=calcDensity(101.3183,21.2222);
  	lr=Any2ccpermin(leakrate,stdden,den,leakunit);

	if (lr>=3.00) 
		return false;
	else
		return true;
		
  }