<!--

// Vadim de http://www.liste-paramoteur.fr.st ou http://perso.club-internet.fr/volavu/index.html
// Ce javascript est sous copyright et il est libre de droit . 
// Et la demande de Kurt Mayer, il faut laisser les lignes ci-dessous, merci.
// Meteorology calculator javascript is copyright (c) 1996 by Kurt Mayer.
// Drop me a line if you choose to do so. Thanks.

// Values corrected from the Handbook of chemistry and physics 60eme edition
// some minors modification by Dominique Stussi ISM november 1999

var Temp;
var speed;

function computec(obj) {
   if (obj.cel.value == "")  { 
   obj.cel.value = Math.round(((eval(obj.fahr.value)-32)*5/9)*10.)/10;}
   else  {
   if (obj.fahr.value == "")  {
   obj.fahr.value = Math.round(((eval(obj.cel.value)*9/5)+32)*10.)/10;}
}
}   

function resetc(obj) {
obj.fahr.value="";
obj.cel.value="";
}

function computemft(obj) {
   if (obj.feet.value == "")  { 
   obj.feet.value = Math.round((eval(obj.meter.value)*3.2808399)*10.)/10;}
   else  {
   if (obj.meter.value == "")  {
   obj.meter.value = Math.round((eval(obj.feet.value)*0.3048)*10.)/10;}
}
}   

function resetmft(obj) {
obj.feet.value="";
obj.meter.value="";
}

function computep(obj) {
   if (obj.mmHg.value == "" && obj.inHg.value == "")  { 
   obj.mmHg.value = Math.round((eval(obj.hPa.value)*0.75006)*10.)/10;
   obj.inHg.value = Math.round((eval(obj.hPa.value)*0.02953)*100.)/100;
   }
   else 
   if (obj.hPa.value == "" && obj.inHg.value == "")  { 
   obj.hPa.value = Math.round((eval(obj.mmHg.value)*1.33322)*10.)/10;
   obj.inHg.value = Math.round((eval(obj.mmHg.value)*0.03937)*100.)/100;
   }
   else 
   if (obj.hPa.value == "" && obj.mmHg.value == "")  { 
   obj.hPa.value = Math.round((eval(obj.inHg.value)*33.8653)*10.)/10;
   obj.mmHg.value = Math.round((eval(obj.inHg.value)*25.4)*10.)/10;
   }
}   

function resetp(obj) {
obj.mmHg.value="";
obj.inHg.value="";
obj.hPa.value="";
}


function computews(obj) {
   if (obj.knots.value == "" && obj.mph.value == "" && obj.kph.value == "" && obj.bf.value == "")  
   { 
   obj.knots.value = Math.round((eval(obj.mps.value)*1.943846172)*10.)/10;
   obj.mph.value = Math.round((eval(obj.mps.value)*2.2369363)*10.)/10;
   obj.kph.value = Math.round((eval(obj.mps.value)*3.6)*10.)/10;
   computebf(obj.knots.value) 
   }
   else
   if (obj.knots.value == "" && obj.mps.value == "" && obj.kph.value == "" && obj.bf.value == "")
   { 
   obj.knots.value = Math.round((eval(obj.mph.value)*0.86897624)*10.)/10;
   obj.mps.value = Math.round((eval(obj.mph.value)*0.44704)*10.)/10; 
   obj.kph.value = Math.round((eval(obj.mph.value)*1.609344)*10.)/10;
   computebf(obj.knots.value) 
  }
   else  
   if (obj.mph.value == "" && obj.mps.value == "" && obj.kph.value == "" && obj.bf.value == "")  
   { 
   obj.mph.value = Math.round((eval(obj.knots.value)*1.1507794)*10.)/10;
   obj.mps.value = Math.round((eval(obj.knots.value)*0.514444)*10.)/10; 
   obj.kph.value = Math.round((eval(obj.knots.value)*1.852)*10.)/10;
   computebf(obj.knots.value) 
   }
   else  
   if (obj.mph.value == "" && obj.mps.value == "" && obj.knots.value == "" && obj.bf.value == "")  
   { 
   obj.mph.value = Math.round((eval(obj.kph.value)*0.62137119)*10.)/10;
   obj.mps.value = Math.round((eval(obj.kph.value)*0.27777777)*10.)/10; 
   obj.knots.value = Math.round((eval(obj.kph.value)*0.53995680)*10.)/10;
   computebf(obj.knots.value) 
   }
   else
   if (obj.mph.value == "" && obj.mps.value == "" && obj.knots.value == "" && obj.kph.value == "")  
   {
   
   if (obj.bf.value == 0)
   {
   obj.mph.value = "< 1";
   obj.mps.value = "0 - 0.2"; 
   obj.kph.value = "< 1";
   obj.knots.value = "< 1";
   }  
   if (obj.bf.value == 1)
   {
   obj.mph.value = "1 - 3";
   obj.mps.value = "0.3 - 1.5"; 
   obj.kph.value = "1 - 5";
   obj.knots.value = "1 - 3";
   }
   if (obj.bf.value == 2)
   {
   obj.mph.value = "4 - 7";
   obj.mps.value = "1.6 - 3.3"; 
   obj.kph.value = "6 - 11";
   obj.knots.value = "4 - 6";
   }
   if (obj.bf.value == 3)
   {
   obj.mph.value = "8 - 12";
   obj.mps.value = "3.4 - 5.4"; 
   obj.kph.value = "12 - 19";
   obj.knots.value = "7 - 10";
   }
   if (obj.bf.value == 4)
   {
   obj.mph.value = "13 - 18";
   obj.mps.value = "5.5 - 7.9"; 
   obj.kph.value = "20 - 28";
   obj.knots.value = "11 - 16";
   }
   if (obj.bf.value == 5)
   {
   obj.mph.value = "19 - 24";
   obj.mps.value = "8.0 - 10.7"; 
   obj.kph.value = "29 - 38";
   obj.knots.value = "17 - 21";
   }
   if (obj.bf.value == 6)
   {
   obj.mph.value = "25 - 31";
   obj.mps.value = "10.8 - 13.8"; 
   obj.kph.value = "39 - 49";
   obj.knots.value = "22 - 27";
   }
   if (obj.bf.value == 7)
   {
   obj.mph.value = "32 - 38";
   obj.mps.value = "13.9 - 17.1"; 
   obj.kph.value = "50 - 61";
   obj.knots.value = "28 - 33";
   }
   if (obj.bf.value == 8)
   {
   obj.mph.value = "39 - 46";
   obj.mps.value = "17.2 - 20.7"; 
   obj.kph.value = "62 - 74";
   obj.knots.value = "34 - 40";
   }
   if (obj.bf.value == 9)
   {
   obj.mph.value = "47 - 54";
   obj.mps.value = "20.8 - 24.4"; 
   obj.kph.value = "75 - 88";
   obj.knots.value = "41 - 47";
   }
   if (obj.bf.value == 10)
   {
   obj.mph.value = "55 - 63";
   obj.mps.value = "24.5 - 28.4"; 
   obj.kph.value = "89 - 102";
   obj.knots.value = "48 - 55";
   }
   if (obj.bf.value == 11)
   {
   obj.mph.value = "64 - 72";
   obj.mps.value = "28.5 - 32.6"; 
   obj.kph.value = "103 - 117";
   obj.knots.value = "56 - 63";
   }
   if (obj.bf.value == 12)
   {
   obj.mph.value = "> 72";
   obj.mps.value = "> 32.6"; 
   obj.kph.value = "> 117";
   obj.knots.value = "> 63";
   }
   if (obj.bf.value > 12 || obj.bf.value < 0)
   {
         window.alert('L\'échelle beaufort va de 0 à 12! \n Veuillez introduire une valeur correcte.');

   }
   }
}   

function resetws(obj) {
obj.knots.value="";
obj.mps.value="";
obj.mph.value="";
obj.kph.value="";
obj.bf.value="";
}

function computebf(speed) {
   if (speed < 1) {document.evalform3.bf.value = (eval(0));}
   if (speed >= 1  && speed < 3.5){document.evalform3.bf.value = (eval(1));}
   if (speed >= 3.5  && speed < 6.5){document.evalform3.bf.value = (eval(2));}
   if (speed >= 6.5  && speed < 10.5){document.evalform3.bf.value = (eval(3));}
   if (speed >= 10.5  && speed < 16.5){document.evalform3.bf.value = (eval(4));}
   if (speed >= 16.5  && speed < 21.5){document.evalform3.bf.value = (eval(5));}
   if (speed >= 21.5  && speed < 27.5){document.evalform3.bf.value = (eval(6));}
   if (speed >= 27.5  && speed < 33.5){document.evalform3.bf.value = (eval(7));}
   if (speed >= 33.5  && speed < 40.5){document.evalform3.bf.value = (eval(8));}
   if (speed >= 40.5  && speed < 47.5){document.evalform3.bf.value = (eval(9));}
   if (speed >= 47.5  && speed < 55.5){document.evalform3.bf.value = (eval(10));}
   if (speed >= 55.5  && speed < 63.5){document.evalform3.bf.value = (eval(11));}
   if (speed >= 63.5){document.evalform3.bf.value = (eval(12));}
}

function computewc(obj) {
if (obj.corf2[0].checked)  {
var t=5*(obj.Temp.value-32)/9;
}
if (obj.corf2[1].checked)  {
var t=5*(obj.Temp.value)/5;
}
if (obj.corf[0].checked)  {
var w=obj.Wind.value*.44704;
}
if (obj.corf[1].checked)  {
var w=(obj.Wind.value/1.609)*.44704;
}
var h=(10.45+10*Math.pow(w,.5)-w)*(33-t);
var WC=33-h/22.04;
if (obj.corf2[0].checked)  {
    obj.Windchill.value=Math.round((WC*9/5+32)*10.)/10;
}
if (obj.corf2[1].checked)  {
    obj.Windchill.value=Math.round(WC*10.)/10;
}
}

function windChill(form) {
	wind=eval(form.wind.value);
	temp=eval(form.temp.value);
	chill=(13.12+0.6215*temp-11.37*Math.pow(wind,0.16)+0.3965*temp*Math.pow(wind,0.16));
	chill=Math.round(chill);
	if ( ( wind < 5 ) || ( wind > 100 ) || ( temp < -50 ) || ( temp > 5) ) {
		form.windchill.value = "N/A";
	}
	else {
		form.windchill.value = chill;
	}
}

function resetwc(obj) {
obj.Windchill.value="";
obj.Temp.value="";
obj.Wind.value="";
}


function computerh(obj) {
if (obj.corf[0].checked)  {
var TMP=5*(obj.Temp.value-32)/9+273.16;
var DWP=5*(obj.Dewp.value-32)/9+273.16;
}
if (obj.corf[1].checked)  {
var TMP=5*(obj.Temp.value)/5 + 273.16;
var DWP=5*(obj.Dewp.value)/5 + 273.16;
}
TMP=(Math.log(1013.25)/Math.LN10-7.90298*(373.16/TMP-1)+5.02808*Math.log(373.16/TMP)/Math.LN10)-(1.3816e-7*(Math.pow(10,(11.334*(1-TMP/373.16)))-1))+8.1328e-3*(Math.pow(10,(-3.49149*(373.16/TMP-1)))-1);
DWP=(Math.log(1013.25)/Math.LN10-7.90298*(373.16/DWP-1)+5.02808*Math.log(373.16/DWP)/Math.LN10)-(1.3816e-7*(Math.pow(10,(11.334*(1-DWP/373.16)))-1))+8.1328e-3*(Math.pow(10,(-3.49149*(373.16/DWP-1)))-1);
obj.Relh.value=Math.round(100*Math.exp((DWP-TMP)*Math.LN10));
}

function reseth(obj) {
obj.Relh.value="";
obj.Temp.value="";
obj.Dewp.value="";
}


function computehi1(obj) {
if (obj.bullet[0].checked==1)  {
var TMP=5*(obj.Temp.value-32)/9+273.16;
var DWP=5*(obj.Dewp.value-32)/9+273.16;
}
if (obj.bullet[1].checked)  {
var TMP=5*(obj.Temp.value)/5 + 273.16;
var DWP=5*(obj.Dewp.value)/5 + 273.16;
}
TMP=(Math.log(1013.25)/Math.LN10-7.90298*(373.16/TMP-1)+5.02808*Math.log(373.16/TMP)/Math.LN10)-(1.3816e-7*(Math.pow(10,(11.334*(1-TMP/373.16)))-1))+8.1328e-3*(Math.pow(10,(-3.49149*(373.16/TMP-1)))-1);
DWP=(Math.log(1013.25)/Math.LN10-7.90298*(373.16/DWP-1)+5.02808*Math.log(373.16/DWP)/Math.LN10)-(1.3816e-7*(Math.pow(10,(11.334*(1-DWP/373.16)))-1))+8.1328e-3*(Math.pow(10,(-3.49149*(373.16/DWP-1)))-1);
var RH=100*Math.exp((DWP-TMP)*Math.LN10);
obj.Relh.value=Math.round(RH);
if (obj.bullet[0].checked==1)  {
var TMP=5*(obj.Temp.value)/5
}
if (obj.bullet[1].checked)  {
var TMP=9*(obj.Temp.value)/5+32;
}
obj.Heat.value=Math.round((-42.379+2.04901523*TMP+10.14333127*RH-.22475541*TMP*RH-.00683783*TMP*TMP-.05481717*RH*RH+.00122874*TMP*TMP*RH+.00085282*TMP*RH*RH-.00000199*TMP*TMP*RH*RH)*10.)/10;
if (obj.bullet[1].checked)  {
obj.Heat.value=Math.round((5*(obj.Heat.value-32)/9)*10.)/10;
}
}

function resethi1(obj) {
obj.Dewp.value="";
obj.Temp.value="";
obj.Relh.value="";
obj.Heat.value="";
}


function computehi2(obj) {
if (obj.bullet[0].checked==1)  {
var TMP=5*(obj.Temp.value)/5
}
if (obj.bullet[1].checked)  {
var TMP=9*(obj.Temp.value)/5+32;
}
obj.Heat.value=Math.round((-42.379+2.04901523*TMP+10.14333127*obj.Relh.value-.22475541*TMP*obj.Relh.value-.00683783*TMP*TMP-.05481717*obj.Relh.value*obj.Relh.value+.00122874*TMP*TMP*obj.Relh.value+.00085282*TMP*obj.Relh.value*obj.Relh.value-.00000199*TMP*TMP*obj.Relh.value*obj.Relh.value)*10.)/10;
if (obj.bullet[1].checked)  {
obj.Heat.value=Math.round((5*(obj.Heat.value-32)/9)*10.)/10.;
}
}

function resethi2(obj) {
obj.Temp.value="";
obj.Heat.value="";
obj.Relh.value="";
}

function computeTp(obj) {
with (Math)
{
   var R1 = (eval(obj.alt_p.value)-eval(obj.alt_neu.value))*0.03418;
   var R2 = 288.15 - (eval(obj.alt_neu.value)*0.00325);
   var R3 = (eval(obj.alt_neu.value)*0.03418)/R2;
   var R4 = eval(obj.T_mit.value)+273.15;
   var R5 = round((exp(R3))*10000)/10000;
   obj.QFE_neu.value = round((exp(R1/R4)*eval(obj.QFE.value))*10)/10;
   obj.QNH_neu.value = round((obj.QFE_neu.value * R5)*10)/10;
}
}
function resetTp(obj) {
	obj.QFE.value="";
	obj.alt_p.value="";
	obj.alt_neu.value="";
	obj.T_mit.value="";
	obj.QFE_neu.value="";
	obj.QNH_neu.value="";
}

// -->