/*#######################################################################################
#                                                                                       #
#                               (c) 2004 dejo.nl / knoop.nl                             #
#                                                                                       #
# De formules zijn intellectueel eigendom van Dejo Metaalindustrie bv en zijn beschermd #
# op grond van de Nederlandse auteurswet, internationale verdragsbepalingen en de toe-  #
# passelijke wetten van het land waarin de formules gebruikt worden. U verbindt zich er #
# toe de formules niet te zullen veranderen, aanpassen of te vertalen, tenzij uitdruk-  #
# kelijk anders overeengekomen. U verkrijgt uitsluitend het gebruiksrecht van de        #
# formules. Dejo Metaalindustrie bv is in in geen geval aansprakelijk voor directe of   #
# indirecte schade, gevolgschade of enige vorm van incidentele of bijzondere schade,    #
# inclusiefgederfde winst of besparingen, en evenmin voor vorderingen van derden, door  #
# het gebruik van de formules.                                                          #
#                                                                                       #
#     Dejo Metaalindustrie bv         http://www.dejo.nl          info@dejo.nl          #
#                                                                                       #
# Deze software is intellectueel eigendom van Knooppunt en is beschermd op grond van de #
# Nederlandse auteurswet, internationale verdragsbepalingen en de toepasselijke wetten  #
# van het land waarin de software gebruikt wordt. U verbindt zich ertoe de software     #
# niet te zullen veranderen, aanpassen of te vertalen, tenzij uitdrukkelijk anders      #
# overeengekomen. U verkrijgt uitsluitend het gebruiksrecht van de software. Knooppunt  #
# is in in geen geval aansprakelijk voor directe of indirecte schade, gevolgschade of   #
# enige vorm van incidentele of bijzondere schade, inclusief gederfde winst of bespa-   #
# ringen, en evenmin voor vorderingen van derden, door het gebruik van de software.     #
#                                                                                       #
#    Knooppunt internetproducties    http://www.knoop.nl    E. Toering info@knoop.nl    #
#                                                                                       #
#######################################################################################*/
var f      = document.invoerform;
function opnieuw() {
	f.stand.value             = '';
  f.vulmaasw.selectedIndex  = 1;
  f.vuld.selectedIndex      = 0;
  f.draagmaasw.selectedIndex= 0;
  f.draagd.selectedIndex    = 0;
	f.luchtd.value            = '';
}

var wat = 'L';
function berekenen(wat_nieuw) {
  if (typeof(wat_nieuw) != 'undefined' ) { wat = wat_nieuw; }
	if (f.stand.value<=0 || f.stand.value>=90 || f.stand.value!=Math.floor(f.stand.value)) { f.stand.value = stand = 50 }
	else                                                                                   { stand = f.stand.value      }
	if (f.luchtd.value<=0 || f.luchtd.value>=100                                         ) { f.luchtd.value = luchtd = 50 }
	else                                                                                   { luchtd = f.luchtd.value      }
	vulmaasw   = Math.round(f.vulmaasw.options[f.vulmaasw.selectedIndex].value*100)/100;
	vuld       = Math.floor(f.vuld.options[f.vuld.selectedIndex].value);
	draagmaasw = Math.round(f.draagmaasw.options[f.draagmaasw.selectedIndex].value*100)/100;
	draagd     = Math.floor(f.draagd.options[f.draagd.selectedIndex].value);
	stand_cos  = Math.cos(stand*(Math.PI/180));

//  alert(stand_cos);

	if ( wat == 'S' ) {
		f.stand.value = stand = Math.round(Math.acos(((luchtd*vulmaasw*draagmaasw)/((draagmaasw-draagd)*100)+vuld)/vulmaasw)*(180/Math.PI));
		stand_cos = Math.cos(stand*(Math.PI/180));
		wat = 'L'; // hierna de luchtdoorlaat herberekenen....
	}
	if ( wat == 'L' ) {
		f.luchtd.value = Math.round(((stand_cos*vulmaasw-vuld)*(draagmaasw-draagd)*100)/(vulmaasw*draagmaasw)*100)/100;
	}
}