
<!--

//* -----------------------------------------------------------------------------------------------------------------------------------------------
//* function to load standard temperature (25 C) and pressure (101.325 kPa) upon page loading
function loadvalues()
{
	var f = document.IAUnits;

   	f.temp.value = "25";
   	f.tempUnits.selectedIndex = SelectIndex(f.tempUnits,"C");

   	f.press.value = "101.325";
   	f.pressUnits.selectedIndex = SelectIndex(f.pressUnits,"kPa");
}

//* -----------------------------------------------------------------------------------------------------------------------------------------------
//* function to convert from initial indoor air units to selected final indoor air units

function convert()
{
var f = document.IAUnits;

//* First pull necessary variable values from HTML form

     var coc = f.coc.options[f.coc.selectedIndex].value;

     var temp = Input(f.temp.value);
     var tempUnits = f.tempUnits.options[f.tempUnits.selectedIndex].value;

     var press = Input(f.press.value);
     var pressUnits = f.pressUnits.options[f.pressUnits.selectedIndex].value;

     var initialConc = Input(f.initialConc.value);
     var initialUnits = f.initialUnits.options[f.initialUnits.selectedIndex].value;


//* If parameter values are non-blank, then compute unit conversion
        if (coc!='empty'&temp!=''&initialConc!='') {
		var MW = cont(coc,'MW');
    		if (tempUnits == 'F') { temp = ((5/9)*(temp-32))+273.15;}
    		if (tempUnits == 'C') { temp = temp + 273.15;}

    		if (pressUnits == 'atm') { press = press*(101.325);}
	   		if (pressUnits == 'mbar') { press = press*10;}
	   		if (pressUnits == 'mmHg') { press = press*(101.325/760);}


		if (initialUnits == 'mcg/L') {
			var convConcToMcgL = initialConc;
			var convConcToMgL = initialConc * 1E-3;
			var convConcToMcgM3 = initialConc * 1E3;
			var convConcToMgM3 = initialConc;
			var convConcToPpmV = initialConc * 1    * (8.3144/MW) * (temp/press);
			var convConcToPpbV = initialConc * 1E3  * (8.3144/MW) * (temp/press);
			var convConcToPercent = convConcToPpmV / 10000; 
						}

		if (initialUnits == 'mg/L') {
			var convConcToMcgL = initialConc * 1000;
			var convConcToMgL = initialConc;
			var convConcToMcgM3 = initialConc * 1E6;
			var convConcToMgM3 = initialConc * 1000;
			var convConcToPpmV = initialConc * 1E3  * (8.3144/MW) * (temp/press);
			var convConcToPpbV = initialConc * 1E6  * (8.3144/MW) * (temp/press);
			var convConcToPercent = convConcToPpmV / 10000; 
						}

		if (initialUnits == 'mcg/m3') {
			var convConcToMcgL = initialConc / 1000;
			var convConcToMgL = initialConc / 1E6;
			var convConcToMcgM3 = initialConc;
			var convConcToMgM3 = initialConc / 1000;
			var convConcToPpmV = initialConc * 1E-3 * (8.3144/MW) * (temp/press);
			var convConcToPpbV = initialConc * 1  * (8.3144/MW) * (temp/press);
			var convConcToPercent = convConcToPpmV / 10000; 
						}

		if (initialUnits == 'mg/m3') {
			var convConcToMcgL = initialConc;
			var convConcToMgL = initialConc / 1000;
			var convConcToMcgM3 = initialConc * 1000;
			var convConcToMgM3 = initialConc;
			var convConcToPpmV = initialConc * 1    * (8.3144/MW) * (temp/press);
			var convConcToPpbV = initialConc * 1E3  * (8.3144/MW) * (temp/press);
			var convConcToPercent = convConcToPpmV / 10000; 
						}

		if (initialUnits == 'ppmV') {
			var convConcToMcgL = initialConc / (1    * (8.3144/MW) * (temp/press));
			var convConcToMgL = initialConc /  (1E3  * (8.3144/MW) * (temp/press));
			var convConcToMcgM3 = initialConc /(1E-3 * (8.3144/MW) * (temp/press));
			var convConcToMgM3 = initialConc / (1    * (8.3144/MW) * (temp/press));
			var convConcToPpmV = initialConc;
			var convConcToPpbV = initialConc * 1000;
			var convConcToPercent = convConcToPpmV / 10000; 
						}

		if (initialUnits == 'ppbV') {
			var convConcToMcgL = initialConc / (1E3  * (8.3144/MW) * (temp/press));
			var convConcToMgL =  initialConc / (1E6  * (8.3144/MW) * (temp/press));
			var convConcToMcgM3 = initialConc /(1    * (8.3144/MW) * (temp/press));
			var convConcToMgM3 = initialConc / (1E3  * (8.3144/MW) * (temp/press));
			var convConcToPpmV = initialConc / 1000;
			var convConcToPpbV = initialConc;
			var convConcToPercent = convConcToPpmV / 10000; 
						}

		if (initialUnits == 'percent') {
			var convConcToPpmV = initialConc * 10000;
			var convConcToMcgL = convConcToPpmV / (1    * (8.3144/MW) * (temp/press));
			var convConcToMgL = convConcToPpmV /  (1E3  * (8.3144/MW) * (temp/press));
			var convConcToMcgM3 = convConcToPpmV /(1E-3 * (8.3144/MW) * (temp/press));
			var convConcToMgM3 =  convConcToPpmV /(1    * (8.3144/MW) * (temp/press));
			var convConcToPpbV = convConcToPpmV * 1000;
			var convConcToPercent = initialConc; 
						}

//* Push results back to HTML form

f.convConcToMcgL.value = Num2String(convConcToMcgL,5,-20,20,-4,4);
f.convConcToMgL.value = Num2String(convConcToMgL,5,-20,20,-4,4);
f.convConcToMcgM3.value = Num2String(convConcToMcgM3,5,-20,20,-4,4);
f.convConcToMgM3.value = Num2String(convConcToMgM3,5,-20,20,-4,4);
f.convConcToPpmV.value = Num2String(convConcToPpmV,5,-20,20,-4,4);
f.convConcToPpbV.value = Num2String(convConcToPpbV,5,-20,20,-4,4);
f.convConcToPercent.value = Num2String(convConcToPercent,5,-20,20,-4,4);

						}


}

// -->
<!-- end ia_unit_conversion_1.js -->