
<!-- vieux browsers
var strElement = "";
var temp = "";
var formule = "";
var varmamol = 0;
var nombreelements = "";
var erreurdon = false;


var ajMM = "";
var ajGramme ="";
var modpourcent;var ajmole = ""
nombreatomes = new Array(0,0,0,0,0,0,0,0,0,0);
natdeat = new Array(0,0,0,0,0,0,0,0,0,0);
pourcentmasse = new Array(0,0,0,0,0,0,0,0,0,0);
function cmpd(nombreatomes,natdeat,MMM,printString) {
	this.nombreatomes = nombreatomes;
	this.natdeat = natdeat;
	this.MMM = MMM;
	this.printString = printString;
};

compound = new cmpd(nombreatomes,natdeat,varmamol);

function Parseformule(formule)  {
	var c=0;
	x=0;
	y=0;
	c1=0;
	marker1=0;
	marker2=-1;
	loopCount=0;
	erreurdon = false;
	multiplier=1;
	a1 = new Array(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0);
	a2 = new Array(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0);
	while (c <= formule.length - 1 && !erreurdon){
		na = trouvena(formule.substring(c,c+2));
		if (na == -1){
			na = trouvena(formule.substring(c,c+1));
			y=1;
		}
		else y=2;
		if (na > -1){
			marker2=-1
			for (var c2=0; c2<=11; c2++)  {
				if (a2[c2] == na) {
 					marker2 = c2; break
				}
			}
			if (marker2>=0) {
				marker1=marker2;
				loopCount-=1;
			}
			 else marker1=loopCount;
			c += y;
			a2[marker1] = na;
			var OK = true;
			var c3 = 0;
			while (OK && c+c3 <= formule.length-1)  {
				na = trouveNum(formule.substring(c+c3, c+c3+1));
				if (na >= 0) c3++; else OK = false;
			}
			if (c3>0) {
				if (marker2>=0) a1[marker1] += parseInt(formule.substring(c, c+c3))*multiplier;
				else a1[marker1] = parseInt(formule.substring(c, c+c3))*multiplier
			}
			else {
				if (marker2>=0) a1[marker1] += 1*multiplier; else a1[marker1] = 1*multiplier
 			}
			c += c3;
			loopCount++
		}
		else {
			na="[]().".indexOf(formule.substring(c,c+1));
			if (na==-1) {
				erreurdon=true;
				break;
			}
			if (na==0 || na==2){
				if (na==2) {
					var zz=0
					for (x=c;x<=formule.length-1;x++){
						if (formule.substring(x,x+1)==")"){zz=x; break}
					}
				}
				else{
					for (x=c;x<=formule.length-1;x++){
						if (formule.substring(x,x+1)=="]"){zz=x; break}
					}
				}
				var c4=1;OK=true
				while (OK && zz+c4 <= formule.length-1) {
					var AN1 = trouveNum(formule.substring(zz+c4, zz+c4+1));
					if (AN1 >= 0) c4++; else OK = false;
					}
				if (c4>1) {
					var z=parseInt(formule.substring(1+zz, c4+zz));
					multiplier=multiplier*z
				}
				c++
			}
			if (na==1 || na==3){
				var c5=1;OK=true
				while (OK && c+c5 <= formule.length-1)  {
					var AN1 = trouveNum(formule.substring(c+c5, c+c5+1));
					if (AN1 >= 0) c5++;
					 else OK = false;
				}
				if (c5>1){
					multiplier=Math.round(multiplier/parseInt(formule.substring(c+1, c+c5)));
				}
				c+=c5
			}
			if (na==4){
				var c6=1;OK=true
				while (OK && c+c6 <= formule.length-1)  {
					var AN1 = trouveNum(formule.substring(c+c6, c+c6+1));
					if (AN1 >= 0) c6++;
					else OK = false;
				}
				if (c6>1) {
					multiplier *= parseInt(formule.substring(c+1, c+c6));
				}
				c+=c6
			}
		}
	}
	nombreelements = loopCount-1;
	for (var i=0; i<=nombreelements; i++)  {
		nombreatomes[i] = a1[i];
		natdeat[i] = a2[i];
	}
}

function trouvena(aSym)  {
	var na = 0;
	if (aSym.length == 1) aSym +="*";
	var x = strElement.indexOf(aSym);
	na = (x == -1) ?  x : (x/2) + 1;
	return na;	}
	function trouveNum(ch)  {
	var numstring = "0123456789";
	var x = numstring.indexOf(ch);
	return x;
}

function calculmasse()  {
	MMM = 0;
	for (var c=0; c<=nombreelements; c++)  {
		var x =natdeat[c];
		MMM += a[x]["mass"]*nombreatomes[c]
	}
}

function Element(symbole, mass,chisigni)  {
	this.symbole = symbole;
	this.mass = mass;
	this.chisigni = chisigni;
}

function makeArray(arraySize)  {
	this.length = arraySize;
	for (var c=0; c <= arraySize; c++)  {
		this[c] = 0;
	}
	return this;
}

a = new makeArray(109);
a[1] = new Element("H","1.00794",5);
a[2] = new Element("He","4.002602",6);
a[3] = new Element("Li","6.941",3);
a[4] = new Element("Be","9.012182",6);
a[5] = new Element("B","10.811",3);
a[6] = new Element("C","12.0107",4);
a[7] = new Element("N","14.00674",5);
a[8] = new Element("O","15.9994",4);
a[9] = new Element("F","18.9984032",7);
a[10] = new Element("Ne","20.1797",4);
a[11] = new Element("Na","22.98976928",8);
a[12] = new Element("Mg","24.3050",4);
a[13] = new Element("Al","26.9815386",7);
a[14] = new Element("Si","28.0855",4);
a[15] = new Element("P","30.973762",6);
a[16] = new Element("S","32.066",3);
a[17] = new Element("Cl","35.4527",4);
a[18] = new Element("Ar","39.948",3);
a[19] = new Element("K","39.0983",4);
a[20] = new Element("Ca","40.078",3);
a[21] = new Element("Sc","44.955912",6);
a[22] = new Element("Ti","47.867",3);
a[23] = new Element("V","50.9415",4);
a[24] = new Element("Cr","51.9961",4);
a[25] = new Element("Mn","54.938045",6);
a[26] = new Element("Fe","55.845",3);
a[27] = new Element("Co","58.933195",6);
a[28] = new Element("Ni","58.6934",4);
a[29] = new Element("Cu","63.546",3);
a[30] = new Element("Zn","65.409",3);
a[31] = new Element("Ga","69.723",3);
a[32] = new Element("Ge","72.64",2);
a[33] = new Element("As","74.92160",5);
a[34] = new Element("Se","78.96",2);
a[35] = new Element("Br","79.904",3);
a[36] = new Element("Kr","83.798",3);
a[37] = new Element("Rb","85.4678",4);
a[38] = new Element("Sr","87.62",2);
a[39] = new Element("Y","88.90585",5);
a[40] = new Element("Zr","91.224",3);
a[41] = new Element("Nb","92.90638",5);
a[42] = new Element("Mo","95.94",2);
a[43] = new Element("Tc","98",0);
a[44] = new Element("Ru","101.07",2);
a[45] = new Element("Rh","102.90550",5);
a[46] = new Element("Pd","106.42",2);
a[47] = new Element("Ag","107.8682",4);
a[48] = new Element("Cd","112.411",3);
a[49] = new Element("In","114.818",3);
a[50] = new Element("Sn","118.710",3);
a[51] = new Element("Sb","121.760",3);
a[52] = new Element("Te","127.60",2);
a[53] = new Element("I","126.90447",5);
a[54] = new Element("Xe","131.293",3);
a[55] = new Element("Cs","132.9054519",7);
a[56] = new Element("Ba","137.327",3);
a[57] = new Element("La","138.90547",6);
a[58] = new Element("Ce","140.116",3);
a[59] = new Element("Pr","140.90765",5);
a[60] = new Element("Nd","144.242",3);
a[61] = new Element("Pm","145",0);
a[62] = new Element("Sm","150.36",2);
a[63] = new Element("Eu","151.964",3);
a[64] = new Element("Gd","157.25",2);
a[65] = new Element("Tb","158.92535",5);
a[66] = new Element("Dy","162.500",3);
a[67] = new Element("Ho","164.93032",5);
a[68] = new Element("Er","167.259",3);
a[69] = new Element("Tm","168.93421",5);
a[70] = new Element("Yb","173.04",2);
a[71] = new Element("Lu","174.967",3);
a[72] = new Element("Hf","178.49",2);
a[73] = new Element("Ta","180.9488",4);
a[74] = new Element("W","183.84",2);
a[75] = new Element("Re","186.207",3);
a[76] = new Element("Os","190.23",2);
a[77] = new Element("Ir","192.217",3);
a[78] = new Element("Pt","195.084",3);
a[79] = new Element("Au","196.966569",5);
a[80] = new Element("Hg","200.59",2);
a[81] = new Element("Tl","204.3833",4);
a[82] = new Element("Pb","207.2",2);
a[83] = new Element("Bi","208.98040",5);
a[84] = new Element("Po","209",0);
a[85] = new Element("At","210",0);
a[86] = new Element("Rn","222",0);
a[87] = new Element("Fr","223",0);
a[88] = new Element("Ra","226.0254",4);
a[89] = new Element("Ac","227",0);
a[90] = new Element("Th","232.03808",5);
a[91] = new Element("Pa","213.03588",5);
a[92] = new Element("U","238.02891",5);
a[93] = new Element("Np","237.0482",4);
a[94] = new Element("Pu","239.1",1);
a[95] = new Element("Am","243",0);
a[96] = new Element("Cm","247",0);
a[97] = new Element("Bk","247",0);
a[98] = new Element("Cf","251",0);
a[99] = new Element("Es","252",0);
a[100] = new Element("Fm","257",0);
a[101] = new Element("Md","258",0);
a[102] = new Element("No","259",0);
a[103] = new Element("Lr","260",0);
a[104] = new Element("Rf","261",0);
a[105] = new Element("Db","262",0);
a[106] = new Element("Sg","263",0);
a[107] = new Element("Bh","262",0);
a[108] = new Element("Hs","265",0);
a[109] = new Element("Mt","266",0);

function makestrElement()  {
	for (var c=1; c <= a.length; c++)  {
	strElement += a[c]["symbole"];
	if (a[c]["symbole"].length == 1) strElement += "*";
	}
return strElement;
}

// Sortie du calculateur
function calcul()  {
	makestrElement();
	formule = document.forms[0].formchim.value;
	if(formule ==""){
		document.forms[0].varmamol.value= "Enter a formula";
		document.forms[0].Gramme.value= "below and";
		document.forms[0].Signi.value ="click on Calculate";
	}
	else {
		Parseformule(formule);
		if (!erreurdon) { calculmasse();
		Presorted = new Array("","","","","","","","","","","","");
		document.forms[0].cell1.value = "";
		document.forms[0].cell2.value = "";
		document.forms[0].cell3.value = "";
		document.forms[0].cell4.value = "";
		document.forms[0].cell5.value = "";
		document.forms[0].cell6.value = "";
		document.forms[0].cell7.value = "";
		document.forms[0].cell8.value = "";
		document.forms[0].cell9.value = "";
		document.forms[0].cell10.value = "";


		c1=5;
		var ajAMA="";
		var chisigni = 8;
		for (var c=0; c<=nombreelements; ++c) {
			 if(a[natdeat[c]]["symbole"]=="H" || a[natdeat[c]]["symbole"]=="B" || a[natdeat[c]]["symbole"]=="C" || a[natdeat[c]]["symbole"]=="N" || a[natdeat[c]]["symbole"]=="F" || a[natdeat[c]]["symbole"]=="P" || a[natdeat[c]]["symbole"]=="S" || a[natdeat[c]]["symbole"]=="K" || a[natdeat[c]]["symbole"]=="V" || a[natdeat[c]]["symbole"]=="Y" || a[natdeat[c]]["symbole"]=="I" || a[natdeat[c]]["symbole"]=="U" || a[natdeat[c]]["symbole"]=="O"){
				a[natdeat[c]]["symbole"]=a[natdeat[c]]["symbole"]+" "};
			if (nombreatomes[c]<10){
				nombreatomes[c]=" "+nombreatomes[c]};
			pourcentmasse[c]  =  Math.round((parseFloat(a[natdeat[c]]["mass"])*nombreatomes[c]*100/MMM)*100)/100;
			if ((pourcentmasse[c]*10)%10==0){modpourcent=".00"}
				else if ((pourcentmasse[c]*100)%10==0){modpourcent="0"}
					else modpourcent="";
			if (pourcentmasse[c]==100){pourcentmasse[c]=" "+pourcentmasse[c]+"%"}
				else if (pourcentmasse[c]<1.0){pourcentmasse[c]=" 0"+pourcentmasse[c]+modpourcent+"%"}
					else if (pourcentmasse[c]<10.0){pourcentmasse[c]=" "+pourcentmasse[c]+modpourcent+"%"}
						else pourcentmasse[c]=pourcentmasse[c]+modpourcent+"%";;;
			if(parseFloat(a[natdeat[c]]["mass"])<10){ajAMA="  "}
			else if(parseFloat(a[natdeat[c]]["mass"])<100){ajAMA=" "}
			else ajAMA="";
			Presorted[c]=pourcentmasse[c]+" "+a[natdeat[c]]["symbole"]+" "+nombreatomes[c]+" "+ ajAMA + a[natdeat[c]]["mass"];
			 if(a[natdeat[c]]["chisigni"] == 0){chisigni=0}
			else  if(a[natdeat[c]]["chisigni"] == 1){if(chisigni>1){chisigni=1}}
			else  if(a[natdeat[c]]["chisigni"] == 2){if(chisigni>2){chisigni=2}}
			else  if(a[natdeat[c]]["chisigni"] == 3){if(chisigni>3){chisigni=3}}
			else  if(a[natdeat[c]]["chisigni"] == 4){if(chisigni>4){chisigni=4}}
			else  if(a[natdeat[c]]["chisigni"] == 5){if(chisigni>5){chisigni=5}}
			else  if(a[natdeat[c]]["chisigni"] == 6){if(chisigni>6){chisigni=6}}
			else  if(a[natdeat[c]]["chisigni"] == 7){if(chisigni>7){chisigni=7}}
			else  if(a[natdeat[c]]["chisigni"] > 7){if(chisigni>7){chisigni=8}};
			c1++;		}
		var debgramme ="";
		var leadMole = "";
		if(1000/MMM<1&& parseInt((1000/MMM)*10)%10>0 ){debgramme="0"};
		if(parseInt(MMM/100)%10>0 && MMM/1000<1){leadMole="0"};
		var ajGrammeA=""
		var ajmamol=""
		var ajMoleA=""
		if(chisigni==0){
			ajmamol = Math.round(MMM);
			ajGrammeA="1 gram = "+Math.round(1000/MMM/1000)+" mole";
		}
		else if(chisigni==1){
			ajMM = Math.round(MMM*10)/10;
			if (ajMM*10%10==0){
				ajmamol =  ajMM+".0";
			}
			else ajmamol =  ajMM;

			ajGramme = Math.round(10000/MMM/1000)/10;
			if (ajGramme*10%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+".0 mole";
			}
			else ajGrammeA = "1 gram = "+ debgramme+ajGramme+" mole";

		}
		else if(chisigni==2){
			ajMM = Math.round(MMM*100)/100;
			if (ajMM*10%10==0){
				ajmamol =  ajMM+".00";
			}
			else if (ajMM*100%10==0){
				ajmamol =  ajMM+"0";
			}
			else ajmamol =   ajMM;

			ajGramme = Math.round(100000/MMM/1000)/100;
			if (ajGramme*10%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+".00 mole";
			}
			if (ajGramme*100%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0 mole";
			}
			else ajGrammeA = "1 gram = "+ debgramme+ajGramme+" mole";
		}

		else if(chisigni==3){
			ajMM = Math.round(MMM*1000)/1000;
			if (ajMM*10%10==0){
				ajmamol = ajMM+".000";
			}
			else if (ajMM*100%10==0){
				ajmamol = ajMM+"00";
			}
			else if (ajMM*1000%10==0){
				ajmamol = ajMM+"0";
			}
			else ajmamol = ajMM;

			ajGramme = Math.round(1000000/MMM/1000)/1000;
			if (ajGramme*10%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+".000 mole";
			}
			if (ajGramme*100%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"00 mole";
			}
			if (ajGramme*1000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0 mole";
			}
			else ajGrammeA = "1 gram = "+ debgramme+ajGramme+" mole";
		}
		else if(chisigni==4){
			ajMM = Math.round(MMM*10000)/10000;
			if (ajMM*10%10==0){
				ajmamol = ajMM+".0000";
			}
			else if (ajMM*100%10==0){
				ajmamol = ajMM+"000";
			}
			else if (ajMM*1000%10==0){
				ajmamol = ajMM+"00";
			}
			else if (ajMM*10000%10==0){
				ajmamol = ajMM+"0";
			}
			else ajmamol = ajMM;
			ajGramme = Math.round(10000000/MMM/1000)/10000;
			if (ajGramme*10%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+".0000 mole";
			}
			if (ajGramme*100%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"000 mole";
			}
			if (ajGramme*1000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"00 mole";
			}
			if (ajGramme*10000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0 mole";
			}
			else ajGrammeA = "1 gram = "+ debgramme+ajGramme+" mole";

		}
		else if(chisigni==5){
			ajMM = Math.round(MMM*100000)/100000;
			if (ajMM*10%10==0){
				ajmamol = ajMM+".00000";
			}
			else if (ajMM*100%10==0){
				ajmamol = ajMM+"0000";
			}
			else if (ajMM*1000%10==0){
				ajmamol = ajMM+"000";
			}
			else if (ajMM*10000%10==0){
				ajmamol = ajMM+"00";
			}
			else if (ajMM*100000%10==0){
				ajmamol = ajMM+"0";
			}
			else ajmamol =  ajMM;
			ajGramme = Math.round(100000000/MMM/1000)/100000;
			if (ajGramme*10%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+".00000 mole";
			}
			if (ajGramme*100%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0000 mole";
			}
			if (ajGramme*1000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"000 mole";
			}
			if (ajGramme*10000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"00 mole";
			}
			if (ajGramme*100000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0 mole";
			}
			else ajGrammeA = "1 gram = "+ debgramme+ajGramme+" mole";
		}
		else if(chisigni==6) {
			ajMM = Math.round(MMM*1000000)/1000000;
			if (ajMM*10%10==0){
				ajmamol = ajMM+".000000";
			}
			else if (ajMM*100%10==0){
				ajmamol = ajMM+"00000";
			}
			else if (ajMM*1000%10==0){
				ajmamol = ajMM+"0000";
			}
			else if (ajMM*10000%10==0){
				ajmamol = ajMM+"000";
			}
			else if (ajMM*100000%10==0){
				ajmamol = ajMM+"00";
			}
			else if (ajMM*1000000%10==0){
				ajmamol = ajMM+"0";
			}
			else ajmamol =  ajMM;
			ajGramme = Math.round(1000000000/MMM/1000)/1000000;
			if (ajGramme*10%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+".000000 mole";
			}
			if (ajGramme*100%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"00000 mole";
			}
			if (ajGramme*1000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0000 mole";
			}
			if (ajGramme*10000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"000 mole";
			}
			if (ajGramme*100000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"00 mole";
			}
			if (ajGramme*1000000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0 mole";
			}
			else ajGrammeA = "1 gram = "+ debgramme+ajGramme+" mole";
		}
		else if(chisigni==7) {
			ajMM = Math.round(MMM*10000000)/10000000;
			if (ajMM*10%10==0){
				ajmamol = ajMM+".0000000";
			}
			else if (ajMM*100%10==0){
				ajmamol = ajMM+"000000";
			}
			else if (ajMM*1000%10==0){
				ajmamol = ajMM+"00000";
			}
			else if (ajMM*10000%10==0){
				ajmamol = ajMM+"0000";
			}
			else if (ajMM*100000%10==0){
				ajmamol = ajMM+"000";
			}
			else if (ajMM*1000000%10==0){
				ajmamol = ajMM+"00";
			}
			else if (ajMM*10000000%10==0){
				ajmamol = ajMM+"0";
			}
			else ajmamol =  ajMM;
			ajGramme = Math.round(10000000000/MMM/1000)/10000000;
			if (ajGramme*10%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+".0000000 mole";
			}
			if (ajGramme*100%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"000000 mole";
			}
			if (ajGramme*1000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"00000 mole";
			}
			if (ajGramme*10000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0000 mole";
			}
			if (ajGramme*100000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"000 mole";
			}
			if (ajGramme*1000000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"00 mole";
			}
			if (ajGramme*10000000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0 mole";
			}
			else ajGrammeA = "1 gram = "+ debgramme+ajGramme+" mole";
		}
		else if(chisigni>7) {ajMM = Math.round(MMM*10000000000)/10000000000;
			if (ajMM*10%10==0){
				ajmamol = ajMM+".00000000";
			}
			else if (ajMM*100%10==0){
				ajmamol = ajMM+"0000000";
			}
			else if (ajMM*1000%10==0){
				ajmamol = ajMM+"000000";
			}
			else if (ajMM*10000%10==0){
				ajmamol = ajMM+"00000";
			}
			else if (ajMM*100000%10==0){
				ajmamol = ajMM+"0000";
			}
			else if (ajMM*1000000%10==0){
				ajmamol = ajMM+"000";
			}
			else if (ajMM*10000000%10==0){
				ajmamol = ajMM+"00";
			}
			else if (ajMM*10000000%10==0){
				ajmamol = ajMM+"0";
			}
			else ajmamol =  ajMM;
			ajGramme = Math.round(100000000000/MMM/1000)/100000000;
			if (ajGramme*10%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+".00000000 mole";
			}
			if (ajGramme*100%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0000000 mole";
			}
			if (ajGramme*1000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"000000 mole";
			}
			if (ajGramme*10000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"00000 mole";
			}
			if (ajGramme*100000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0000 mole";
			}
			if (ajGramme*1000000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"000 mole";
			}
			if (ajGramme*10000000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"00 mole";
			}
			if (ajGramme*100000000%10==0){
				ajGrammeA ="1 gram = "+ debgramme+ajGramme+"0 mole";
			}
			else ajGrammeA = "1 gram = "+ debgramme+ajGramme+" mole";
		};
	for(i=0;i<nombreelements;i++){
		for(j=0;j<nombreelements-i;j++){
			if (Presorted[j]<Presorted[j+1]){
				temp=Presorted[j];
				Presorted[j]=Presorted[j+1];
				Presorted[j+1]=temp;
			}
		}
	}

		document.forms[0].varmamol.value="1 mole  = "+ajmamol+"g";
		document.forms[0].Gramme.value=ajGrammeA;
		document.forms[0].Signi.value ="decimal digits = "+chisigni;
		document.forms[0].cell1.value = Presorted[0];
		document.forms[0].cell2.value = Presorted[1];
		document.forms[0].cell3.value = Presorted[2];
		document.forms[0].cell4.value = Presorted[3];
		document.forms[0].cell5.value = Presorted[4];
		document.forms[0].cell6.value = Presorted[5];
		document.forms[0].cell7.value = Presorted[6];
		document.forms[0].cell8.value = Presorted[7];
		document.forms[0].cell9.value = Presorted[8];
		document.forms[0].cell10.value = Presorted[9];

	}
	else erreurformule();
	}
};

function erreurformule() {
	document.forms[0].varmamol.value= "Error!";
	document.forms[0].Gramme.value= "Rewrite";
	document.forms[0].Signi.value ="the formula!";
	document.forms[0].cell1.value ="";
	document.forms[0].cell2.value = "";
	document.forms[0].cell3.value ="";
	document.forms[0].cell4.value = "";
	document.forms[0].cell5.value = "";
	document.forms[0].cell6.value = "";
	document.forms[0].cell7.value = "";
	document.forms[0].cell8.value = "";
	document.forms[0].cell9.value = "";
	document.forms[0].cell10.value = "";

};

function Prepare()  {
	document.forms[0].formchim.value = "KMg3AlSi3O10(OH)2";
	calcul();
};

function effacer(){
	document.forms[0].formchim.value ="";
	document.forms[0].varmamol.value="";
	document.forms[0].Gramme.value="";
	document.forms[0].Signi.value ="";
	document.forms[0].cell1.value ="";
	document.forms[0].cell2.value = "";
	document.forms[0].cell3.value ="";
	document.forms[0].cell4.value = "";
	document.forms[0].cell5.value = "";
	document.forms[0].cell6.value = "";
	document.forms[0].cell7.value = "";
	document.forms[0].cell8.value = "";
	document.forms[0].cell9.value = "";
	document.forms[0].cell10.value = "";

};
// fin cache -->