function calculate()
{
var anionEC=document.ix.anionEC.value
var cationEC=document.ix.cationEC.value
var ECunit=document.ix.ECunit.value

var aniondensity=document.ix.aniondensity.value
var cationdensity=document.ix.cationdensity.value
var densityunit=document.ix.densityunit.value

var SF=document.ix.SF.value
var SFunit=document.ix.SFunit.value

var regentime=document.ix.regentime.value
var regentimeunit=document.ix.regentimeunit.value

//var depth=document.ix.depth.value
//var diameter=document.ix.diameter.value

if		(SFunit=="m3/h")	{SF=SF*1000}
else if	(SFunit=="l/h")		{SF=SF}	
else if	(SFunit=="m3/day")	{SF=SF*1000/24}	
else if	(SFunit=="l/day")	{SF=SF/24}	

/*if		(diameter=="1") {diamter=1}
else if (diameter=="2") {diamter=2}
else if	(diameter=="3") {diamter=3}
else if	(diameter=="4") {diamter=4}
else if	(diameter=="5") {diamter=5}

if 		(regentimeunit=="h"){regentime=regentime}
else if	(regentimeunit=="d"){regentime=regentime*24}
*/
/*
BV=depth*Math.PI*(diameter*diameter/4)
SFR=SF/BV
requiredresin=SF/SFR
area=requiredresin/depth
columns=area/(Math.PI*(diameter*diameter/4))
*/

//document.ix.BV.value=BV.toPrecision(3)
//document.ix.SFR.value=SFR.toPrecision(3)

var NO3=document.ix.NO3.value
//	NO3=parseFloat(NO3)
var NO2=document.ix.NO2.value
//	NO2=parseFloat(NO2)
var Cl=document.ix.Cl.value
//	Cl=parseFloat(Cl)
var SO4=document.ix.SO4.value
//	SO4=parseFloat(SO4)
var HCO3=document.ix.HCO3.value
//	HCO3=parseFloat(HCO3)
var F=document.ix.F.value
//	F=parseFloat(F)

var Na=document.ix.Na.value
//	Na=parseFloat(Na)
var K=document.ix.K.value
//	K=parseFloat(K)
var Ca=document.ix.Ca.value
//	Ca=parseFloat(Ca)
var Mg=document.ix.Mg.value
//	Mg=parseFloat(Mg)
var NH4=document.ix.NH4.value
//	NH4=parseFloat(NH4)
var Mn=document.ix.Mn.value
//	Mn=parseFloat(Mn)

var unitNO3=document.ix.unitNO3.value
var unitNO2=document.ix.unitNO2.value
var unitCl=document.ix.unitCl.value
var unitSO4=document.ix.unitSO4.value
var unitHCO3=document.ix.unitHCO3.value
var unitF=document.ix.unitF.value

var unitNa=document.ix.unitNa.value
var unitK=document.ix.unitK.value
var unitCa=document.ix.unitCa.value
var unitMg=document.ix.unitMg.value
var unitNH4=document.ix.unitNH4.value
var unitMn=document.ix.unitMn.value

var unitconvertNO3=document.ix.unitconvertNO3.value
var unitconvertNO2=document.ix.unitconvertNO2.value
var unitconvertCl=document.ix.unitconvertCl.value
var unitconvertSO4=document.ix.unitconvertSO4.value
var unitconvertHCO3=document.ix.unitconvertHCO3.value
var unitconvertF=document.ix.unitconvertF.value

var unitconvertNa=document.ix.unitconvertNa.value
var unitconvertK=document.ix.unitconvertK.value
var unitconvertCa=document.ix.unitconvertCa.value
var unitconvertMg=document.ix.unitconvertMg.value
var unitconvertNH4=document.ix.unitconvertNH4.value
var unitconvertMn=document.ix.unitconvertMn.value

//convert exchange capacity to eq/L
if		(ECunit=="eq/L")	{anionEC=anionEC}
else if	(ECunit=="meq/L")	{anionEC=anionEC/1000}

//convert density to kg/L
if		(densityunit=="kg/L")	{aniondensity=aniondensity}
else if (densityunit=="kg/m3")	{aniondensity=aniondensity/1000}

//convert density to kg/L
if		(densityunit=="kg/L")	{cationdensity=cationdensity}
else if (densityunit=="kg/m3")	{cationdensity=cationdensity/1000}

//convert concentrations to eq/L
if 			(unitNO3=="eq/L")	{NO3=NO3}
else if		(unitNO3=="meq/L")	{NO3=NO3/1000}		
else if		(unitNO3=="g/L")	{NO3=NO3*1/62}
else if		(unitNO3=="mg/L")	{NO3=NO3*1/(62*1000)}
else if		(unitNO3=="mol/L")	{NO3=NO3*1}
else if		(unitNO3=="mmol/L")	{NO3=NO3*1/1000}

if 			(unitNO2=="eq/L")	{NO2=NO2}
else if		(unitNO2=="meq/L")	{NO2=NO2/1000}		
else if		(unitNO2=="g/L")	{NO2=NO2*1/46.01}
else if		(unitNO2=="mg/L")	{NO2=NO2*1/(46.01*1000)}
else if		(unitNO2=="mol/L")	{NO2=NO2*1}
else if		(unitNO2=="mmol/L")	{NO2=NO2*1/1000}

if 			(unitCl=="eq/L")	{Cl=Cl}
else if		(unitCl=="meq/L")	{Cl=Cl/1000}		
else if		(unitCl=="g/L")		{Cl=Cl*1/35.45}
else if		(unitCl=="mg/L")	{Cl=Cl*1/(35.45*1000)}
else if		(unitCl=="mol/L")	{Cl=Cl*1}
else if		(unitCl=="mmol/L")	{Cl=Cl*1/1000}

if 			(unitSO4=="eq/L")	{SO4=SO4}
else if		(unitSO4=="meq/L")	{SO4=SO4/1000}		
else if		(unitSO4=="g/L")	{SO4=SO4*2/96.06}
else if		(unitSO4=="mg/L")	{SO4=SO4*2/(96.06*1000)}
else if		(unitSO4=="mol/L")	{SO4=SO4*2}
else if		(unitSO4=="mmol/L")	{SO4=SO4*2/1000}

if 			(unitHCO3=="eq/L")	{HCO3=HCO3}
else if		(unitHCO3=="meq/L")	{HCO3=HCO3/1000}		
else if		(unitHCO3=="g/L")	{HCO3=HCO3*1/61.02}
else if		(unitHCO3=="mg/L")	{HCO3=HCO3*1/(61.02*1000)}
else if		(unitHCO3=="mol/L")	{HCO3=HCO3*1}
else if		(unitHCO3=="mmol/L"){HCO3=HCO3*1}

if 			(unitF=="eq/L")		{F=F}
else if		(unitF=="meq/L")	{F=F/1000}		
else if		(unitF=="g/L")		{F=F*1/19}
else if		(unitF=="mg/L")		{F=F*1/(19*1000)}
else if		(unitF=="mol/L")	{F=F*1}
else if		(unitF=="mmol/L")	{F=F*1/1000}

if 			(unitNa=="eq/L")	{Na=Na}
else if		(unitNa=="meq/L")	{Na=Na/1000}		
else if		(unitNa=="g/L")		{Na=Na*1/22.99}
else if		(unitNa=="mg/L")	{Na=Na*1/(22.99*1000)}
else if		(unitNa=="mol/L")	{Na=Na*1}
else if		(unitNa=="mmol/L")	{Na=Na*1/1000}

if 			(unitK=="eq/L")		{K=K}
else if		(unitK=="meq/L")	{K=K/1000}		
else if		(unitK=="g/L")		{K=K*1/39.1}
else if		(unitK=="mg/L")		{K=K*1/(39.1*1000)}
else if		(unitK=="mol/L")	{K=K*1}
else if		(unitK=="mmol/L")	{K=K*1/1000}

if 			(unitCa=="eq/L")	{Ca=Ca}
else if		(unitCa=="meq/L")	{Ca=Ca/1000}		
else if		(unitCa=="g/L")		{Ca=Ca*2/40.08}
else if		(unitCa=="mg/L")	{Ca=Ca*2/(40.08*1000)}
else if		(unitCa=="mol/L")	{Ca=Ca*2}
else if		(unitCa=="mmol/L")	{Ca=Ca*2/1000}

if 			(unitMg=="eq/L")	{Mg=Mg}
else if		(unitMg=="meq/L")	{Mg=Mg/1000}		
else if		(unitMg=="g/L")		{Mg=Mg*2/24.31}
else if		(unitMg=="mg/L")	{Mg=Mg*2/(24.31*1000)}
else if		(unitMg=="mol/L")	{Mg=Mg*2}
else if		(unitMg=="mmol/L")	{Mg=Mg*2/1000}

if 			(unitNH4=="eq/L")	{NH4=NH4}
else if		(unitNH4=="meq/L")	{NH4=NH4/1000}		
else if		(unitNH4=="g/L")	{NH4=NH4*1/18.04}
else if		(unitNH4=="mg/L")	{NH4=NH4*1/(18.04*1000)}
else if		(unitNH4=="mol/L")	{NH4=NH4*1}
else if		(unitNH4=="mmol/L")	{NH4=NH4*1/1000}

if 			(unitMn=="eq/L")	{Mn=Mn}
else if		(unitMn=="meq/L")	{Mn=Mn/1000}		
else if		(unitMn=="g/L")		{Mn=Mn*2/54.94}
else if		(unitMn=="mg/L")	{Mn=Mn*2/(54.94*1000)}
else if		(unitMn=="mol/L")	{Mn=Mn*2}
else if		(unitMn=="mmol/L")	{Mn=Mn*2/1000}

//covert concentration to required unit
if 			(unitconvertNO3=="eq/L")	{convertNO3=NO3}
else if		(unitconvertNO3=="meq/L")	{convertNO3=NO3*1000}		
else if		(unitconvertNO3=="g/L")		{convertNO3=NO3/1*62}
else if		(unitconvertNO3=="mg/L")	{convertNO3=NO3/1*62*1000}
else if		(unitconvertNO3=="mol/L")	{convertNO3=NO3/1}
else if		(unitconvertNO3=="mmol/L")	{convertNO3=NO3/1*1000}

if 			(unitconvertNO2=="eq/L")	{convertNO2=NO2}
else if		(unitconvertNO2=="meq/L")	{convertNO2=NO2*1000}		
else if		(unitconvertNO2=="g/L")		{convertNO2=NO2/1*46.01}
else if		(unitconvertNO2=="mg/L")	{convertNO2=NO2/1*46.01*1000}
else if		(unitconvertNO2=="mol/L")	{convertNO2=NO2/1}
else if		(unitconvertNO2=="mmol/L")	{convertNO2=NO2/1*1000}

if 			(unitconvertCl=="eq/L")		{convertCl=Cl}
else if		(unitconvertCl=="meq/L")	{convertCl=Cl*1000}		
else if		(unitconvertCl=="g/L")		{convertCl=Cl/1*35.45}
else if		(unitconvertCl=="mg/L")		{convertCl=Cl/1*35.45*1000}
else if		(unitconvertCl=="mol/L")	{convertCl=Cl/1}
else if		(unitconvertCl=="mmol/L")	{convertCl=Cl/1*1000}

if 			(unitconvertSO4=="eq/L")	{convertSO4=SO4}
else if		(unitconvertSO4=="meq/L")	{convertSO4=SO4*1000}		
else if		(unitconvertSO4=="g/L")		{convertSO4=SO4/2*96.06}
else if		(unitconvertSO4=="mg/L")	{convertSO4=SO4/2*96.06*1000}
else if		(unitconvertSO4=="mol/L")	{convertSO4=SO4/2}
else if		(unitconvertSO4=="mmol/L")	{convertSO4=SO4/2*1000}

if 			(unitconvertHCO3=="eq/L")	{convertHCO3=HCO3}
else if		(unitconvertHCO3=="meq/L")	{convertHCO3=HCO3*1000}		
else if		(unitconvertHCO3=="g/L")	{convertHCO3=HCO3/1*61.02}
else if		(unitconvertHCO3=="mg/L")	{convertHCO3=HCO3/1*61.02*1000}
else if		(unitconvertHCO3=="mol/L")	{convertHCO3=HCO3/1}
else if		(unitconvertHCO3=="mmol/L")	{convertHCO3=HCO3/1*1000}

if 			(unitconvertF=="eq/L")		{convertF=F}
else if		(unitconvertF=="meq/L")		{convertF=F*1000}		
else if		(unitconvertF=="g/L")		{convertF=F/1*19}
else if		(unitconvertF=="mg/L")		{convertF=F/1*19*1000}
else if		(unitconvertF=="mol/L")		{convertF=F/1}
else if		(unitconvertF=="mmol/L")	{convertF=F/1*1000}

if 			(unitconvertNa=="eq/L")		{convertNa=Na}
else if		(unitconvertNa=="meq/L")	{convertNa=Na*1000}		
else if		(unitconvertNa=="g/L")		{convertNa=Na*1*22.99}
else if		(unitconvertNa=="mg/L")		{convertNa=Na*1*22.99*1000}
else if		(unitconvertNa=="mol/L")	{convertNa=Na/1}
else if		(unitconvertNa=="mmol/L")	{convertNa=Na/1*1000}

if 			(unitconvertK=="eq/L")		{convertK=K}
else if		(unitconvertK=="meq/L")		{convertK=K*1000}		
else if		(unitconvertK=="g/L")		{convertK=K/1*39.1}
else if		(unitconvertK=="mg/L")		{convertK=K/1*39.1*1000}
else if		(unitconvertK=="mol/L")		{convertK=K/1}
else if		(unitconvertK=="mmol/L")	{convertK=K/1*1000}

if 			(unitconvertCa=="eq/L")		{convertCa=Ca}
else if		(unitconvertCa=="meq/L")	{convertCa=Ca*1000}		
else if		(unitconvertCa=="g/L")		{convertCa=Ca/2*40.08}
else if		(unitconvertCa=="mg/L")		{convertCa=Ca/2*40.08*1000}
else if		(unitconvertCa=="mol/L")	{convertCa=Ca/2}
else if		(unitconvertCa=="mmol/L")	{convertCa=Ca/2*1000}

if 			(unitconvertMg=="eq/L")		{convertMg=Mg}
else if		(unitconvertMg=="meq/L")	{convertMg=Mg*1000}		
else if		(unitconvertMg=="g/L")		{convertMg=Mg/2*24.31}
else if		(unitconvertMg=="mg/L")		{convertMg=Mg/2*24.31*1000}
else if		(unitconvertMg=="mol/L")	{convertMg=Mg/2}
else if		(unitconvertMg=="mmol/L")	{convertMg=Mg/2*1000}

if 			(unitconvertNH4=="eq/L")	{convertNH4=NH4}
else if		(unitconvertNH4=="meq/L")	{convertNH4=NH4*1000}		
else if		(unitconvertNH4=="g/L")		{convertNH4=NH4/1*18.04}
else if		(unitconvertNH4=="mg/L")	{convertNH4=NH4/1*18.04*1000}
else if		(unitconvertNH4=="mol/L")	{convertNH4=NH4/1}
else if		(unitconvertNH4=="mmol/L")	{convertNH4=NH4/1*1000}

if 			(unitconvertMn=="eq/L")		{convertMn=Mn}
else if		(unitconvertMn=="meq/L")	{convertMn=Mn*1000}		
else if		(unitconvertMn=="g/L")		{convertMn=Mn/2*54.94}
else if		(unitconvertMn=="mg/L")		{convertMn=Mn/2*54.94*1000}
else if		(unitconvertMn=="mol/L")	{convertMn=Mn/2}
else if		(unitconvertMn=="mmol/L")	{convertMn=Mn/2*1000}

//alert("the converted unit is:"+convertNO3)

totalanion=NO3*1+NO2*1+Cl*1+SO4*1+HCO3*1+F*1
totalcation=Na*1+K*1+Ca*1+Mg*1+NH4*1+Mn*1

anioncycle=totalanion*SF*regentime
cationcycle=totalcation*SF*regentime

anionrequiredresin=anioncycle/anionEC
cationrequiredresin=cationcycle/cationEC

anionmass=aniondensity*anionrequiredresin
document.ix.anionmass.value=anionmass

cationmass=cationdensity*cationrequiredresin
document.ix.cationmass.value=cationmass

anionarea=anionrequiredresin/1000
cationarea=cationrequiredresin/1000

aniondiameter=Math.sqrt(4*anionarea/Math.PI)
cationdiameter=Math.sqrt(4*cationarea/Math.PI)

//velocityanion=SF/anionarea
//velocitycation=SF/cationarea

document.ix.anioncycle.value=anioncycle
document.ix.cationcycle.value=cationcycle

document.ix.anionrequiredresin.value=anionrequiredresin
document.ix.cationrequiredresin.value=cationrequiredresin

document.ix.anionarea.value=anionarea
document.ix.cationarea.value=cationarea

document.ix.aniondiameter.value=aniondiameter.toPrecision(3)
document.ix.cationdiameter.value=cationdiameter.toPrecision(3)

//document.ix.velocityanion.value=velocityanion.toPrecision(3)
//document.ix.velocitycation.value=velocitycation.toPrecision(3)

document.ix.totalanion.value=totalanion
document.ix.totalcation.value=totalcation

//document.ix.area.value=area.toPrecision(3)

//selectivity coefficients for SBA resins
selectivityNO3=4
selctivityNO2=1.1
selectivityCl=1.0
selectivitySO4=0.15
selectivityHCO3=0.4
selectivityF=0.1

// selectivity coefficients for SAC resins
selectivityNa=2.0
selectivityK=2.9
selectivityCa=5.2
selectivityMg=3.3
selectivityNH4=2.6
selectivityMn=4.1

//separation factor for SBA
factorNO3=3.2
factorNO2=1.1
factorCl=1.0
factorSO4=9.1
factorHCO3=0.27
factorF=0.07

//seperation factor for SAC
factorNa=1.0
factorK=1.67
factorCa=1.9
factorMg=1.67
factorNH4=1.3
factorMn=1.6

if		(NO3==0||NO3=="")
{
alfaNO3NO3	=""
alfaNO3NO2	=""
alfaNO3Cl	=""
alfaNO3SO4	=""
alfaNO3HCO3	=""
alfaNO3F	=""

aflaNO2NO3	=""
aflaClNO3	=""
aflaSO4NO3	=""
aflaHCO3NO3	=""
alfaFNO3	=""
qNO3		=""
mNO3		=""
pNO3		=""

document.ix.qNO3.value=qNO3
document.ix.mNO3.value=mNO3
document.ix.pNO3.value=pNO3


/*
document.ix.alfaNO3NO3.value	=alfaNO3NO3
document.ix.alfaNO3NO2.value	=alfaNO3NO2
document.ix.alfaNO3Cl.value		=alfaNO3Cl
document.ix.alfaNO3SO4.value	=alfaNO3SO4
document.ix.alfaNO3HCO3.value	=alfaNO3HCO3
document.ix.alfaNO3F.value		=alfaNO3F
*/
}
else
{
alfaNO3NO3	=1
alfaNO3NO2	=factorNO2	/	factorNO3
alfaNO3Cl	=factorCl	/	factorNO3
alfaNO3SO4	=factorSO4	/	factorNO3
alfaNO3HCO3	=factorHCO3	/	factorNO3
alfaNO3F	=factorF	/	factorNO3
qNO3		=anionEC*NO3/(alfaNO3NO3*NO3	+	alfaNO3NO2*NO2	+	alfaNO3Cl*Cl	+	alfaNO3SO4*SO4	+	alfaNO3HCO3*HCO3	+	alfaNO3F*F)
mNO3		=qNO3/NO3
pNO3		=qNO3/anionEC*100
/*
document.ix.alfaNO3NO3.value	=alfaNO3NO3.toPrecision(3)
document.ix.alfaNO3NO2.value	=alfaNO3NO2.toPrecision(3)
document.ix.alfaNO3Cl.value		=alfaNO3Cl.toPrecision(3)
document.ix.alfaNO3SO4.value	=alfaNO3SO4.toPrecision(3)
document.ix.alfaNO3HCO3.value	=alfaNO3HCO3.toPrecision(3)
document.ix.alfaNO3F.value		=alfaNO3F.toPrecision(3)
*/
document.ix.qNO3.value			=qNO3.toPrecision(3)
document.ix.mNO3.value			=mNO3.toPrecision(3)
document.ix.pNO3.value			=pNO3.toPrecision(3)
document.ix.convertNO3.value	=convertNO3
}


if		(NO2==0||NO2=="")
{
alfaNO2NO3	=""
alfaNO2NO2	=""
alfaNO2Cl	=""
alfaNO2SO4	=""
alfaNO2HCO3	=""
alfaNO2F	=""
		
alfaNO3NO2	=""
alfaClNO2	=""
alfaSO4NO2	=""
alfaHCO3NO2	=""
alfaFNO2	=""
qNO2		=""
mNO2		=""
pNO2		=""
document.ix.qNO2.value=qNO2
document.ix.mNO2.value=mNO2
document.ix.pNO2.value=pNO2
/*
document.ix.alfaNO2NO3.value	=alfaNO2NO3
document.ix.alfaNO2NO2.value	=alfaNO2NO2
document.ix.alfaNO2Cl.value		=alfaNO2Cl
document.ix.alfaNO2SO4.value	=alfaNO2SO4
document.ix.alfaNO2HCO3.value	=alfaNO2HCO3
document.ix.alfaNO2F.value		=alfaNO2F
*/
}

else
{
alfaNO2NO3	=factorNO3	/	factorNO2
alfaNO2NO2	=1
alfaNO2Cl	=factorCl	/	factorNO2
alfaNO2SO4	=factorSO4	/	factorNO2
alfaNO2HCO3	=factorHCO3	/	factorNO2
alfaNO2F	=factorF	/	factorNO2
qNO2		=anionEC*NO2/(alfaNO2NO3*NO3	+	alfaNO2NO2*NO2	+	alfaNO2Cl*Cl	+	alfaNO2SO4*SO4	+	alfaNO2HCO3*HCO3	+	alfaNO2F*F)
mNO2		=qNO2/NO2
pNO2		=qNO2/anionEC*100
/*
document.ix.alfaNO2NO3.value	=alfaNO2NO3.toPrecision(3)
document.ix.alfaNO2NO2.value	=alfaNO2NO2.toPrecision(3)
document.ix.alfaNO2Cl.value		=alfaNO2Cl.toPrecision(3)
document.ix.alfaNO2SO4.value	=alfaNO2SO4.toPrecision(3)
document.ix.alfaNO2HCO3.value	=alfaNO2HCO3.toPrecision(3)
document.ix.alfaNO2F.value		=alfaNO2F.toPrecision(3)
*/
document.ix.qNO2.value			=qNO2.toPrecision(3)
document.ix.mNO2.value			=mNO2.toPrecision(3)
document.ix.pNO2.value			=pNO2.toPrecision(3)
document.ix.convertNO2.value	=convertNO2
}


if		(Cl==0||Cl=="")	
{
alfaClNO3	=""
alfaClNO2	=""
alfaClCl	=""
alfaClSO4	=""
alfaClHCO3	=""
alfaClF		=""

alfaNO3Cl	=""
alfaNO2Cl	=""
alfaSO4Cl	=""
alfaHCO3Cl	=""
alfaFCl		=""
qCl			=""
mCl			=""
pCl			=""
document.ix.qCl.value=qCl
document.ix.mCl.value=mCl
document.ix.qCl.value=qCl

/*
document.ix.alfaClNO3.value		=alfaClNO3
document.ix.alfaClNO2.value		=alfaClNO2
document.ix.alfaClCl.value		=alfaClCl
document.ix.alfaClSO4.value		=alfaClSO4
document.ix.alfaClHCO3.value	=alfaClHCO3
document.ix.alfaClF.value		=alfaClF
*/
}
else
{
alfaClNO3	=factorNO3	/	factorCl
alfaClNO2	=factorNO2	/	factorCl
alfaClCl	=1
alfaClSO4	=factorSO4	/	factorCl
alfaClHCO3	=factorHCO3	/	factorCl
alfaClF		=factorF	/	factorCl
qCl			=anionEC*Cl/(alfaClNO3*NO3	+	alfaClNO2*NO2	+	alfaClCl*Cl		+	alfaClSO4*SO4	+	alfaClHCO3*HCO3		+	alfaClF*F)
mCl			=qCl/Cl
pCl			=qCl/anionEC*100
/*
document.ix.alfaClNO3.value		=alfaClNO3.toPrecision(3)
document.ix.alfaClNO2.value		=alfaClNO2.toPrecision(3)
document.ix.alfaClCl.value		=alfaClCl.toPrecision(3)
document.ix.alfaClSO4.value		=alfaClSO4.toPrecision(3)
document.ix.alfaClHCO3.value	=alfaClHCO3.toPrecision(3)
document.ix.alfaClF.value		=alfaClF.toPrecision(3)
*/

document.ix.qCl.value			=qCl.toPrecision(3)
document.ix.mCl.value			=mCl.toPrecision(3)
document.ix.pCl.value			=pCl.toPrecision(3)
document.ix.convertCl.value		=convertCl
}


if		(SO4==0||SO4=="")
{
alfaSO4NO3	=""
alfaSO4NO2	=""
alfaSO4Cl	=""
alfaSO4SO4	=""
alfaSO4HCO3	=""
alfaSO4F	=""

alfaNO3SO4	=""
alfaNO2SO4	=""
alfaClSO4	=""
alfaHCO3SO4	=""
alfaFSO4	=""
qSO4		=""
mSO4		=""
pSO4		=""
document.ix.qSO4.value			=qSO4
document.ix.mSO4.value			=mSO4
document.ix.pSO4.value			=pSO4
/*
document.ix.alfaSO4NO3.value	=alfaSO4NO3
document.ix.alfaSO4NO2.value	=alfaSO4NO2
document.ix.alfaSO4Cl.value		=alfaSO4Cl
document.ix.alfaSO4SO4.value	=alfaSO4SO4
document.ix.alfaSO4HCO3.value	=alfaSO4HCO3
document.ix.alfaSO4F.value		=alfaSO4F
*/
}
else
{
alfaSO4NO3	=factorNO3	/	factorSO4
alfaSO4NO2	=factorNO2	/	factorSO4
alfaSO4Cl	=factorCl	/	factorSO4
alfaSO4SO4	=1
alfaSO4HCO3	=factorHCO3	/	factorSO4
alfaSO4F	=factorF	/	factorSO4
qSO4		=anionEC*SO4/(alfaSO4NO3*NO3	+	alfaSO4NO2*NO2	+	alfaSO4Cl*Cl	+	alfaSO4SO4*SO4	+	alfaSO4HCO3*HCO3	+	alfaSO4F*F)
mSO4		=qSO4/SO4
pSO4		=qSO4/anionEC*100
/*
document.ix.alfaSO4NO3.value	=alfaSO4NO3.toPrecision(3)
document.ix.alfaSO4NO2.value	=alfaSO4NO2.toPrecision(3)
document.ix.alfaSO4Cl.value		=alfaSO4Cl.toPrecision(3)
document.ix.alfaSO4SO4.value	=alfaSO4SO4.toPrecision(3)
document.ix.alfaSO4HCO3.value	=alfaSO4HCO3.toPrecision(3)
document.ix.alfaSO4F.value		=alfaSO4F.toPrecision(3)
*/
document.ix.qSO4.value			=qSO4.toPrecision(3)
document.ix.mSO4.value			=mSO4.toPrecision(3)
document.ix.pSO4.value			=pSO4.toPrecision(3)
document.ix.convertSO4.value	=convertSO4
}


if		(HCO3==0||HCO3=="")
{
alfaHCO3NO3	=""
alfaHCO3NO2	=""
alfaHCO3Cl	=""
alfaHCO3SO4	=""
alfaHCO3HCO3=""
alfaHCO3F	=""
		
alfaNO3HCO3	=""
alfaNO2HCO3	=""
alfaClHCO3	=""
alfaSO4HCO3	=""
alfaFHCO3	=""
qHCO3		=""
mHCO3		=""
pHCO3		=""
document.ix.qHCO3.value			=qHCO3
document.ix.mHCO3.value			=mHCO3
document.ix.pHCO3.value			=pHCO3


/*
document.ix.alfaHCO3NO3.value	=alfaHCO3NO3
document.ix.alfaHCO3NO2.value	=alfaHCO3NO2
document.ix.alfaHCO3Cl.value	=alfaHCO3Cl
document.ix.alfaHCO3SO4.value	=alfaHCO3SO4
document.ix.alfaHCO3HCO3.value	=alfaHCO3HCO3
document.ix.alfaHCO3F.value		=alfaHCO3F
*/
}
else
{
alfaHCO3NO3	=factorNO3	/	factorHCO3
alfaHCO3NO2	=factorNO2	/	factorHCO3
alfaHCO3Cl	=factorCl	/	factorHCO3
alfaHCO3SO4	=factorSO4	/	factorHCO3
alfaHCO3HCO3=1
alfaHCO3F	=factorF	/	factorHCO3
qHCO3		=anionEC*HCO3/(alfaHCO3NO3*NO3+	alfaHCO3NO2*NO2	+	alfaHCO3Cl*Cl	+	alfaHCO3SO4*SO4	+	alfaHCO3HCO3*HCO3	+	alfaHCO3F*F)
mHCO3		=qHCO3/HCO3
pHCO3		=qHCO3/anionEC*100
/*
document.ix.alfaHCO3NO3.value	=alfaHCO3NO3.toPrecision(3)
document.ix.alfaHCO3NO2.value	=alfaHCO3NO2.toPrecision(3)
document.ix.alfaHCO3Cl.value	=alfaHCO3Cl.toPrecision(3)
document.ix.alfaHCO3SO4.value	=alfaHCO3SO4.toPrecision(3)
document.ix.alfaHCO3HCO3.value	=alfaHCO3HCO3.toPrecision(3)
document.ix.alfaHCO3F.value		=alfaHCO3F.toPrecision(3)
*/
document.ix.qHCO3.value			=qHCO3.toPrecision(3)
document.ix.mHCO3.value			=mHCO3.toPrecision(3)
document.ix.pHCO3.value			=pHCO3.toPrecision(3)
document.ix.convertHCO3.value	=convertHCO3



}


if		(F==0||F=="")
{
alfaFNO3	=""
alfaFNO2	=""
alfaFCl		=""
alfaFSO4	=""
alfaFHCO3	=""
alfaFF		=""
		
alfaNO3F	=""
alfaNO2F	=""
alfaClF		=""
alfaSO4F	=""
alfaHCO3F	=""
qF			=""
mF			=""
pF			=""
document.ix.qF.value			=qF
document.ix.mF.value			=mF
document.ix.pF.value			=pF

/*
document.ix.alfaFNO3.value		=alfaFNO3
document.ix.alfaFNO2.value		=alfaFNO2
document.ix.alfaFCl.value		=alfaFCl
document.ix.alfaFSO4.value		=alfaFSO4
document.ix.alfaFHCO3.value		=alfaFHCO3
document.ix.alfaFF.value		=alfaFF
*/
}
else
{
alfaFNO3	=factorNO3	/	factorF
alfaFNO2	=factorNO2	/	factorF
alfaFCl		=factorCl	/	factorF
alfaFSO4	=factorSO4	/	factorF
alfaFHCO3	=factorHCO3	/	factorF
alfaFF		=1
qF			=anionEC*F/(alfaFNO3*NO3		+	alfaFNO2*NO2	+	alfaFCl*Cl		+	alfaFSO4*SO4	+	alfaFHCO3*HCO3		+	alfaFF*F)
mF			=qF/F
pF			=qF/anionEC*100
/*
document.ix.alfaFNO3.value		=alfaFNO3.toPrecision(3)
document.ix.alfaFNO2.value		=alfaFNO2.toPrecision(3)
document.ix.alfaFCl.value		=alfaFCl.toPrecision(3)
document.ix.alfaFSO4.value		=alfaFSO4.toPrecision(3)
document.ix.alfaFHCO3.value		=alfaFHCO3.toPrecision(3)
document.ix.alfaFF.value		=alfaFF.toPrecision(3)
*/
document.ix.qF.value			=qF.toPrecision(3)
document.ix.mF.value			=mF.toPrecision(3)
document.ix.pF.value			=pF.toPrecision(3)
document.ix.convertF.value		=convertF
}

if		(Na==0||Na=="")
{
alfaNaNa	=""
alfaNaK		=""
alfaNaCa	=""
alfaNaMg	=""
alfaNaNH4	=""
alfaNaMn	=""

alfaKNa		=""
alfaCaNa	=""
alfaMgNa	=""
alfaNH4Na	=""
alfaMnNa	=""
qNa			=""
mNa			=""
pNa			=""
document.ix.qNa.value			=qNa
document.ix.mNa.value			=mNa
document.ix.pNa.value			=pNa

/*
document.ix.alfaNaNa.value		=alfaNaNa
document.ix.alfaNaK.value		=alfaNaK
document.ix.alfaNaCa.value		=alfaNaCa
document.ix.alfaNaMg.value		=alfaNaMg
document.ix.alfaNaNH4.value		=alfaNaNH4
document.ix.alfaNaMn.value		=alfaNaMn
*/
}
else
{
alfaNaNa	=1
alfaNaK		=factorK	/	factorNa
alfaNaCa	=factorCa	/	factorNa
alfaNaMg	=factorMg	/	factorNa
alfaNaNH4	=factorNH4	/	factorNa
alfaNaMn	=factorMn	/	factorNa
qNa			=cationEC*Na/(alfaNaNa*Na		+	alfaNaK*K	+	alfaNaCa*Ca		+	alfaNaMg*Mg	+	alfaNaNH4*NH4	+	alfaNaMn*Mn)
mNa			=qNa/Na
pNa			=qNa/cationEC*100
/*
document.ix.alfaNaNa.value		=alfaNaNa.toPrecision(3)
document.ix.alfaNaK.value		=alfaNaK.toPrecision(3)
document.ix.alfaNaCa.value		=alfaNaCa.toPrecision(3)
document.ix.alfaNaMg.value		=alfaNaMg.toPrecision(3)
document.ix.alfaNaNH4.value		=alfaNaNH4.toPrecision(3)
document.ix.alfaNaMn.value		=alfaNaMn.toPrecision(3)
*/
document.ix.qNa.value			=qNa.toPrecision(3)
document.ix.mNa.value			=mNa.toPrecision(3)
document.ix.pNa.value			=pNa.toPrecision(3)
document.ix.convertNa.value	=convertNa
}


if		(K==0||K=="")	
{
alfaKNa		=""
alfaKK		=""
alfaKCa		=""
alfaKMg		=""
alfaKNH4	=""
alfaKMn		=""

alfaNaK		=""
alfaCaK		=""
alfaMgK		=""
alfaNH4K	=""
alfaMnK		=""
qK			=""
mK			=""
pK			=""
document.ix.qK.value			=qK
document.ix.mK.value			=mK
document.ix.pK.value			=pK
/*
document.ix.alfaKNa.value		=alfaKNa
document.ix.alfaKK.value		=alfaKK
document.ix.alfaKCa.value		=alfaKCa
document.ix.alfaKMg.value		=alfaKMg
document.ix.alfaKNH4.value		=alfaKNH4
document.ix.alfaKMn.value		=alfaKMn
*/
}
else
{
alfaKNa		=factorNa	/	factorK
alfaKK		=1
alfaKCa		=factorCa	/	factorK
alfaKMg		=factorMg	/	factorK
alfaKNH4	=factorNH4	/	factorK
alfaKMn		=factorMn	/	factorK
qK			=cationEC*K/(alfaKNa*Na		+	alfaKK*K	+	alfaKCa*Ca		+	alfaKMg*Mg	+	alfaKNH4*NH4	+	alfaKMn*F)
mK			=qK/K
pK			=qK/cationEC*100
/*
document.ix.alfaKNa.value		=alfaKNa.toPrecision(3)
document.ix.alfaKK.value		=alfaKK.toPrecision(3)
document.ix.alfaKCa.value		=alfaKCa.toPrecision(3)
document.ix.alfaKMg.value		=alfaKMg.toPrecision(3)
document.ix.alfaKNH4.value		=alfaKNH4.toPrecision(3)
document.ix.alfaKMn.value		=alfaKMn.toPrecision(3)
*/
document.ix.qK.value			=qK.toPrecision(3)
document.ix.mK.value			=mK.toPrecision(3)
document.ix.pK.value			=pK.toPrecision(3)
document.ix.convertK.value		=convertK
}


if		(Ca==0||Ca=="")	
{
alfaCaNa	=""
alfaCaK		=""
alfaCaCa	=""
alfaCaMg	=""
alfaCaNH4	=""
alfaCaMn	=""

alfaNaCa	=""
alfaKCa		=""
alfaMgCa	=""
alfaNH4Ca	=""
alfaMnCa	=""
qCa			=""
mCa			=""
pCa			=""
document.ix.qCa.value			=qCa
document.ix.mCa.value			=mCa
document.ix.pCa.value			=pCa
/*
document.ix.alfaCaNa.value		=alfaCaNa
document.ix.alfaCaK.value		=alfaCaK
document.ix.alfaCaCa.value		=alfaCaCa
document.ix.alfaCaMg.value		=alfaCaMg
document.ix.alfaCaNH4.value		=alfaCaNH4
document.ix.alfaCaMn.value		=alfaCaMn
*/
}
else
{
alfaCaNa	=factorNa	/	factorCa
alfaCaK		=factorK	/	factorCa
alfaCaCa	=1
alfaCaMg	=factorMg	/	factorCa
alfaCaNH4	=factorNH4	/	factorCa
alfaCaMn	=factorMn	/	factorCa
qCa			=cationEC*Ca/(alfaCaNa*Na		+	alfaCaK*K	+	alfaCaCa*Ca		+	alfaCaMg*Mg	+	alfaCaNH4*NH4	+	alfaCaMn*F)
mCa			=qCa/Ca
pCa			=qCa/cationEC*100
/*
document.ix.alfaCaNa.value		=alfaCaNa.toPrecision(3)
document.ix.alfaCaK.value		=alfaCaK.toPrecision(3)
document.ix.alfaCaCa.value		=alfaCaCa.toPrecision(3)
document.ix.alfaCaMg.value		=alfaCaMg.toPrecision(3)
document.ix.alfaCaNH4.value		=alfaCaNH4.toPrecision(3)
document.ix.alfaCaMn.value		=alfaCaMn.toPrecision(3)
*/
document.ix.qCa.value			=qCa.toPrecision(3)
document.ix.mCa.value			=mCa.toPrecision(3)
document.ix.pCa.value			=pCa.toPrecision(3)
document.ix.convertCa.value		=convertCa
}

if		(Mg==0||Mg=="")
{
alfaMgNa	=""
alfaMgK		=""
alfaMgCa	=""
alfaMgMg	=""
alfaMgNH4	=""
alfaMgMn	=""

alfaNaMg	=""
alfaKMg		=""
alfaCaMg	=""
alfaNH4Mg	=""
alfaMnMg	=""
qMg			=""
mMg			=""
pMg			=""
document.ix.qMg.value			=qMg
document.ix.mMg.value			=mMg
document.ix.pMg.value			=pMg

/*
document.ix.alfaMgNa.value		=alfaMgNa
document.ix.alfaMgK.value		=alfaMgK
document.ix.alfaMgCa.value		=alfaMgCa
document.ix.alfaMgMg.value		=alfaMgMg
document.ix.alfaMgNH4.value		=alfaMgNH4
document.ix.alfaMgMn.value		=alfaMgMn
*/
}
else
{
alfaMgNa	=factorNa	/	factorMg
alfaMgK		=factorK	/	factorMg
alfaMgCa	=factorCa	/	factorMg
alfaMgMg	=1
alfaMgNH4	=factorNH4	/	factorMg
alfaMgMn	=factorMn	/	factorMg
qMg			=cationEC*Mg/(alfaMgNa*Na		+	alfaMgK*K	+	alfaMgCa*Ca		+	alfaMgMg*Mg	+	alfaMgNH4*NH4	+	alfaMgMn*F)
mMg			=qMg/Mg
pMg			=qMg/cationEC*100
/*
document.ix.alfaMgNa.value		=alfaMgNa.toPrecision(3)
document.ix.alfaMgK.value		=alfaMgK.toPrecision(3)
document.ix.alfaMgCa.value		=alfaMgCa.toPrecision(3)
document.ix.alfaMgMg.value		=alfaMgMg.toPrecision(3)
document.ix.alfaMgNH4.value		=alfaMgNH4.toPrecision(3)
document.ix.alfaMgMn.value		=alfaMgMn.toPrecision(3)
*/
document.ix.qMg.value			=qMg.toPrecision(3)
document.ix.mMg.value			=mMg.toPrecision(3)
document.ix.pMg.value			=pMg.toPrecision(3)
document.ix.convertMg.value		=convertMg
}


if		(NH4==0||NH4=="")
{
alfaNH4Na	=""
alfaNH4K	=""
alfaNH4Ca	=""
alfaNH4Mg	=""
alfaNH4NH4	=""
alfaNH4Mn	=""

alfaNaNH4	=""
alfaKNH4	=""
alfaCaNH4	=""
alfaMgNH4	=""
alfaMnNH4	=""
qNH4		=""
mNH4		=""
pNH4		=""
document.ix.qNH4.value			=qNH4
document.ix.mNH4.value			=mNH4
document.ix.pNH4.value			=pNH4
/*
document.ix.alfaNH4Na.value		=alfaNH4Na
document.ix.alfaNH4K.value		=alfaNH4K
document.ix.alfaNH4Ca.value		=alfaNH4Ca
document.ix.alfaNH4Mg.value		=alfaNH4Mg
document.ix.alfaNH4NH4.value	=alfaNH4NH4
document.ix.alfaNH4Mn.value		=alfaNH4Mn
*/
}
else
{
alfaNH4Na	=factorNa	/	factorNH4
alfaNH4K	=factorK	/	factorNH4
alfaNH4Ca	=factorCa	/	factorNH4
alfaNH4Mg	=factorMg	/	factorNH4
alfaNH4NH4	=1
alfaNH4Mn	=factorMn	/	factorNH4
qNH4		=cationEC*NH4/(alfaNH4Na*Na	+	alfaNH4K*K	+	alfaNH4Ca*Ca	+	alfaNH4Mg*Mg+	alfaNH4NH4*NH4	+	alfaNH4Mn*F)
mNH4		=qNH4/NH4
pNH4		=qNH4/cationEC*100
/*
document.ix.alfaNH4Na.value		=alfaNH4Na.toPrecision(3)
document.ix.alfaNH4K.value		=alfaNH4K.toPrecision(3)
document.ix.alfaNH4Ca.value		=alfaNH4Ca.toPrecision(3)
document.ix.alfaNH4Mg.value		=alfaNH4Mg.toPrecision(3)
document.ix.alfaNH4NH4.value	=alfaNH4NH4.toPrecision(3)
document.ix.alfaNH4Mn.value		=alfaNH4Mn.toPrecision(3)
*/
document.ix.qNH4.value			=qNH4.toPrecision(3)
document.ix.mNH4.value			=mNH4.toPrecision(3)
document.ix.pNH4.value			=pNH4.toPrecision(3)
document.ix.convertNH4.value	=convertNH4
}


if		(Mn==0||Mn=="")
{
alfaMnNa	=""
alfaMnK		=""
alfaMnCa	=""
alfaMnMg	=""
alfaMnNH4	=""
alfaMnMn	=""

alfaNaMn	=""
alfaKMn		=""
alfaCaMn	=""
alfaMgMn	=""
alfaNH4Mn	=""
qMn			=""
mMn			=""
pMn			=""
document.ix.qMn.value			=qMn
document.ix.mMn.value			=mMn
document.ix.pMn.value			=pMn
/*
document.ix.alfaMnNa.value		=alfaMnNa
document.ix.alfaMnK.value		=alfaMnK
document.ix.alfaMnCa.value		=alfaMnCa
document.ix.alfaMnMg.value		=alfaMnMg
document.ix.alfaMnNH4.value		=alfaMnNH4
document.ix.alfaMnMn.value		=alfaMnMn
*/
}
else
{
alfaMnNa	=factorNa	/	factorMn
alfaMnK		=factorK	/	factorMn
alfaMnCa	=factorCa	/	factorMn
alfaMnMg	=factorMg	/	factorMn
alfaMnNH4	=factorNH4	/	factorMn
alfaMnMn	=1
qMn			=cationEC*Mn/(alfaMnNa*Na		+	alfaMnK*K	+	alfaMnCa*Ca		+	alfaMnMg*Mg	+	alfaMnNH4*NH4	+	alfaMnMn*F)
mMn			=qMn/Mn
pMn			=qMn/cationEC*100
/*
document.ix.alfaMnNa.value		=alfaMnNa.toPrecision(3)
document.ix.alfaMnK.value		=alfaMnK.toPrecision(3)
document.ix.alfaMnCa.value		=alfaMnCa.toPrecision(3)
document.ix.alfaMnMg.value		=alfaMnMg.toPrecision(3)
document.ix.alfaMnNH4.value		=alfaMnNH4.toPrecision(3)
document.ix.alfaMnMn.value		=alfaMnMn.toPrecision(3)
*/
document.ix.qMn.value			=qMn.toPrecision(3)
document.ix.mMn.value			=mMn.toPrecision(3)
document.ix.pMn.value			=pMn.toPrecision(3)
document.ix.convertMn.value		=convertMn
}

qanion=qNO3*1+qNO2*1+qCl*1+qSO4*1+qHCO3*1+qF*1
qcation=qNa*1+qK*1+qCa*1+qMg*1+qNH4*1+qMn*1

panion=pNO3*1+pNO2*1+pCl*1+pSO4*1+pHCO3*1+pF*1
pcation=pNa*1+pK*1+pCa*1+pMg*1+pNH4*1+pMn*1

document.ix.qanion.value=qanion
document.ix.qcation.value=qcation
document.ix.panion.value=panion.toPrecision(3)
document.ix.pcation.value=pcation.toPrecision(3)

/*
//give values to fileds cations
document.ix.alfaNO3NO3.value	=alfaNO3NO3.toPrecision(3)
document.ix.alfaNO3NO2.value	=alfaNO3NO2.toPrecision(3)
document.ix.alfaNO3Cl.value		=alfaNO3Cl.toPrecision(3)
document.ix.alfaNO3SO4.value	=alfaNO3SO4.toPrecision(3)
document.ix.alfaNO3HCO3.value	=alfaNO3HCO3.toPrecision(3)
document.ix.alfaNO3F.value		=alfaNO3F.toPrecision(3)

document.ix.alfaNO2NO3.value	=alfaNO2NO3.toPrecision(3)
document.ix.alfaNO2NO2.value	=alfaNO2NO2.toPrecision(3)
document.ix.alfaNO2Cl.value		=alfaNO2Cl.toPrecision(3)
document.ix.alfaNO2SO4.value	=alfaNO2SO4.toPrecision(3)
document.ix.alfaNO2HCO3.value	=alfaNO2HCO3.toPrecision(3)
document.ix.alfaNO2F.value		=alfaNO2F.toPrecision(3)

document.ix.alfaClNO3.value		=alfaClNO3.toPrecision(3)
document.ix.alfaClNO2.value		=alfaClNO2.toPrecision(3)
document.ix.alfaClCl.value		=alfaClCl.toPrecision(3)
document.ix.alfaClSO4.value		=alfaClSO4.toPrecision(3)
document.ix.alfaClHCO3.value	=alfaClHCO3.toPrecision(3)
document.ix.alfaClF.value		=alfaClF.toPrecision(3)

document.ix.alfaSO4NO3.value	=alfaSO4NO3.toPrecision(3)
document.ix.alfaSO4NO2.value	=alfaSO4NO2.toPrecision(3)
document.ix.alfaSO4Cl.value		=alfaSO4Cl.toPrecision(3)
document.ix.alfaSO4SO4.value	=alfaSO4SO4.toPrecision(3)
document.ix.alfaSO4HCO3.value	=alfaSO4HCO3.toPrecision(3)
document.ix.alfaSO4F.value		=alfaSO4F.toPrecision(3)

document.ix.alfaHCO3NO3.value	=alfaHCO3NO3.toPrecision(3)
document.ix.alfaHCO3NO2.value	=alfaHCO3NO2.toPrecision(3)
document.ix.alfaHCO3Cl.value	=alfaHCO3Cl.toPrecision(3)
document.ix.alfaHCO3SO4.value	=alfaHCO3SO4.toPrecision(3)
document.ix.alfaHCO3HCO3.value	=alfaHCO3HCO3.toPrecision(3)
document.ix.alfaHCO3F.value		=alfaHCO3F.toPrecision(3)

document.ix.alfaFNO3.value		=alfaFNO3.toPrecision(3)
document.ix.alfaFNO2.value		=alfaFNO2.toPrecision(3)
document.ix.alfaFCl.value		=alfaFCl.toPrecision(3)
document.ix.alfaFSO4.value		=alfaFSO4.toPrecision(3)
document.ix.alfaFHCO3.value		=alfaFHCO3.toPrecision(3)
document.ix.alfaFF.value		=alfaFF.toPrecision(3)

//give values to fields anions
document.ix.alfaNaNa.value		=alfaNaNa.toPrecision(3)
document.ix.alfaNaK.value		=alfaNaK.toPrecision(3)
document.ix.alfaNaCa.value		=alfaNaCa.toPrecision(3)
document.ix.alfaNaMg.value		=alfaNaMg.toPrecision(3)
document.ix.alfaNaNH4.value		=alfaNaNH4.toPrecision(3)
document.ix.alfaNaMn.value		=alfaNaMn.toPrecision(3)

document.ix.alfaKNa.value		=alfaKNa.toPrecision(3)
document.ix.alfaKK.value		=alfaKK.toPrecision(3)
document.ix.alfaKCa.value		=alfaKCa.toPrecision(3)
document.ix.alfaKMg.value		=alfaKMg.toPrecision(3)
document.ix.alfaKNH4.value		=alfaKNH4.toPrecision(3)
document.ix.alfaKMn.value		=alfaKMn.toPrecision(3)

document.ix.alfaCaNa.value		=alfaCaNa.toPrecision(3)
document.ix.alfaCaK.value		=alfaCaK.toPrecision(3)
document.ix.alfaCaCa.value		=alfaCaCa.toPrecision(3)
document.ix.alfaCaMg.value		=alfaCaMg.toPrecision(3)
document.ix.alfaCaNH4.value		=alfaCaNH4.toPrecision(3)
document.ix.alfaCaMn.value		=alfaCaMn.toPrecision(3)

document.ix.alfaMgNa.value		=alfaMgNa.toPrecision(3)
document.ix.alfaMgK.value		=alfaMgK.toPrecision(3)
document.ix.alfaMgCa.value		=alfaMgCa.toPrecision(3)
document.ix.alfaMgMg.value		=alfaMgMg.toPrecision(3)
document.ix.alfaMgNH4.value		=alfaMgNH4.toPrecision(3)
document.ix.alfaMgMn.value		=alfaMgMn.toPrecision(3)

document.ix.alfaNH4Na.value		=alfaNH4Na.toPrecision(3)
document.ix.alfaNH4K.value		=alfaNH4K.toPrecision(3)
document.ix.alfaNH4Ca.value		=alfaNH4Ca.toPrecision(3)
document.ix.alfaNH4Mg.value		=alfaNH4Mg.toPrecision(3)
document.ix.alfaNH4NH4.value	=alfaNH4NH4.toPrecision(3)
document.ix.alfaNH4Mn.value		=alfaNH4Mn.toPrecision(3)

document.ix.alfaMnNa.value		=alfaMnNa.toPrecision(3)
document.ix.alfaMnK.value		=alfaMnK.toPrecision(3)
document.ix.alfaMnCa.value		=alfaMnCa.toPrecision(3)
document.ix.alfaMnMg.value		=alfaMnMg.toPrecision(3)
document.ix.alfaMnNH4.value		=alfaMnNH4.toPrecision(3)
document.ix.alfaMnMn.value		=alfaMnMn.toPrecision(3)
*/
}

function sturen(form)
{
var missingField = false
var liformName = ""
var liformCountry = ""
var liformPhone = ""
var liformEmail = ""
var str =form.formEmail.value
var filter=/^.+@.+\..{2,3}$/

	if (form.formName.value == "") {liformName = "\n * Name"; missingField = true}
	if (form.formCountry.value == "") {liformCountry = "\n * Country"; missingField = true}
	if (form.formPhone.value == "") {liformPhone = "\n * Phone"; missingField = true}
	if (form.formEmail.value == "") {liformEmail = "\n * Email"; missingField = true}
	if (!filter.test(str) && form.formEmail.value!="") {alert("Please enter a valid email address.")}	
	else if (missingField==true || form.formEmail.value=="") {
		var message = "For proper contact registration at Lenntech, please fill out all the required fields:\t\n"+liformName+liformCountry+liformEmail+liformPhone
		alert(message)
	}
	else
	{form.submit()}
}