var calk=new Array();
var idx=-1;
idx++; calkdef(idx, "", "");
idx++; calkdef(idx, "Nadelholz", "0,13");
idx++; calkdef(idx, "Laubholz", "0,17");
idx++; calkdef(idx, "Spanplatten und OSB-Platten", "0,13");
idx++; calkdef(idx, "Sperrholz", "0,15");
idx++; calkdef(idx, "Standard-Putz", "0,90");
idx++; calkdef(idx, "Wärmedämm-Putz", "0,15");
idx++; calkdef(idx, "Gipskartonplatten DIN 18180 900 kg/m³", "0,25");
idx++; calkdef(idx, "Wandbauplatten aus Gips 18163, 900 [kg/m³]", "0,41");
idx++; calkdef(idx, "Wandbauplatten aus Gips 18163, 1200 [kg/m³]", "0,58");
idx++; calkdef(idx, "Wandbauplatten aus Gips 18163, 900 [kg/m³]", "0,41");
idx++; calkdef(idx, "Standard-Mauerwerk)", "1,00");
idx++; calkdef(idx, "Kalksandstein DIN 106 mit NM/DM, 1200 [kg/m³]", "0,56");
idx++; calkdef(idx, "Kalksandstein DIN 106 mit NM/DM, 1400 [kg/m³]", "0,70");
idx++; calkdef(idx, "Kalksandstein DIN 106 mit NM/DM, 1600 [kg/m³]", "0,79");
idx++; calkdef(idx, "Kalksandstein DIN 106 mit NM/DM, 1800 [kg/m³]", "0,99");
idx++; calkdef(idx, "Kalksandstein DIN 106 mit NM/DM, 2000 [kg/m³]", "1,10");
idx++; calkdef(idx, "Kalksandstein DIN 106 mit NM/DM, 2000 [kg/m³]", "1,10");
idx++; calkdef(idx, "Kalksandstein DIN 106 mit NM/DM, 2200 [kg/m³]", "1,30");
idx++; calkdef(idx, "Mauerwerk aus Hüttensteinen DIN 398, 1000 [kg/m³]", "0,47");
idx++; calkdef(idx, "Mauerwerk aus Hüttensteinen DIN 398, 1200 [kg/m³]", "0,52");
idx++; calkdef(idx, "Mauerwerk aus Hüttensteinen DIN 398, 1400 [kg/m³]", "0,58");
idx++; calkdef(idx, "Mauerwerk aus Hüttensteinen DIN 398, 1600 [kg/m³]", "0,64");
idx++; calkdef(idx, "Mauerwerk aus Hüttensteinen DIN 398, 1800 [kg/m³]", "0,70");
idx++; calkdef(idx, "Mauerwerk aus Hüttensteinen DIN 398, 2000 [kg/m³]", "0,76");
idx++; calkdef(idx, "Mauerwerk aus Betonst. DIN18152 Vbl S-W NM, 450 [kg/m³]", "0,18");
idx++; calkdef(idx, "Mauerwerk aus Betonst. DIN18152 Vbl S-W NM, 500 [kg/m³]", "0,20");
idx++; calkdef(idx, "Mauerwerk aus Betonst. DIN18152 Vbl S-W NM, 550 [kg/m³]", "0,21");
idx++; calkdef(idx, "Mauerwerk aus Betonst. DIN18152 Vbl S-W NM, 600 [kg/m³]", "0,22");
idx++; calkdef(idx, "Mauerwerk aus Betonst. DIN18152 Vbl S-W NM, 650 [kg/m³]", "0,23");
idx++; calkdef(idx, "Mauerwerk aus Betonst. DIN18152 Vbl S-W NM, 700 [kg/m³]", "0,25");
idx++; calkdef(idx, "Mauerwerk aus Betonst. DIN18152 Vbl S-W NM, 800 [kg/m³]", "0,27");
idx++; calkdef(idx, "Mauerwerk aus Betonst. DIN18152 Vbl S-W NM, 900 [kg/m³]", "0,30");
idx++; calkdef(idx, "Mauerwerk aus Betonst. DIN18152 Vbl S-W NM, 1000 [kg/m³]", "0,32");
idx++; calkdef(idx, "Leichtziegelmauerwerk", "0,160");
idx++; calkdef(idx, "Voll-, Hochlochziegel DIN 105 mit NM/DM 1600 [kg/m³]", "0,68");
idx++; calkdef(idx, "Voll-, Hochlochziegel DIN 105 mit NM/DM 1800 [kg/m³]", "0,81");
idx++; calkdef(idx, "Voll-, Hochlochziegel DIN 105 mit NM/DM 2000 [kg/m³]", "0,96");
idx++; calkdef(idx, "Leichthochlochziegel-Mauerwerk, 900 [kg/m³]", "0,42");
idx++; calkdef(idx, "Leichthochlochziegel-Mauerwerk, 800 [kg/m³]", "0,33");
idx++; calkdef(idx, "Gasbeton-Mauerwerk, 600 [kg/m³]", "0,24");
idx++; calkdef(idx, "Porenbeton nach DIN 4223-1 600 [kg/m³]", "0,19");
idx++; calkdef(idx, "Porenbeton nach DIN 4223-1 1000 [kg/m³]", "0,31");
idx++; calkdef(idx, "Verblend-und Klinkermauerwerk 1600 [kg/m³]", "0,680");
idx++; calkdef(idx, "Beton nach DIN 206, mittlere Rohdichte 2200 [kg/m³]", "1,65");
idx++; calkdef(idx, "Beton nach DIN 206, hohe Rohdichte 2400 [kg/m³]", "2,00");
idx++; calkdef(idx, "Beton nach DIN 206, armiert 1% Stahl 2400 [kg/m³]", "2,30");
idx++; calkdef(idx, "Beton nach DIN 206, armiert 2% Stahl 2400 [kg/m³]", "2,50");
idx++; calkdef(idx, "Sparren / Fachwerk aus Nadelholz", "0,13");
idx++; calkdef(idx, "Holzfaserdämmstoff WF DIN EN 13171 0,035", "0,035");
idx++; calkdef(idx, "Holzfaserdämmstoff WF DIN EN 13171 0,040", "0,040");
idx++; calkdef(idx, "Holzfaserdämmstoff WF DIN EN 13171 0,050", "0,050");
idx++; calkdef(idx, "Holzfaserdämmstoff WF DIN EN 13171 0,060", "0,060");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 060", "0,060");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 065", "0,065");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 070", "0,070");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 080", "0,080");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 085", "0,085");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 090", "0,090");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 095", "0,095");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 100", "0,100");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 110", "0,110");
idx++; calkdef(idx, "Holzwolle-Platten WW DIN EN 13168 120", "0,120");
idx++; calkdef(idx, "Blähperlit EPB DIN EN 13169 045", "0,045");
idx++; calkdef(idx, "Blähperlit EPB DIN EN 13169 050", "0,050");
idx++; calkdef(idx, "Blähperlit EPB DIN EN 13169 055", "0,055");
idx++; calkdef(idx, "Blähperlit EPB DIN EN 13169 065", "0,065");
idx++; calkdef(idx, "Blähperlit EPB DIN EN 13169 070", "0,070");
idx++; calkdef(idx, "Blähperlit EPB DIN EN 13169 078", "0,078");
idx++; calkdef(idx, "Mineralwolle MW DIN EN 13162 035", "0,035");
idx++; calkdef(idx, "Mineralwolle MW DIN EN 13162 040", "0,040");
idx++; calkdef(idx, "Mineralwolle MW DIN EN 13162 045", "0,045");
idx++; calkdef(idx, "Trittschalldämmung WLS 040", "0,040");
idx++; calkdef(idx, "Gußasphaltestrich, Dicke => 15mm", "0.900");
idx++; calkdef(idx, "Polystyrol (Styropor) WLS 040", "0,040");
idx++; calkdef(idx, "Polystyrol (Styropor) WLS 035", "0,035");
idx++; calkdef(idx, "allpir® Polystyrol (Styropor) WLS 040", "0,040");
idx++; calkdef(idx, "allpir® Polystyrol (Styropor) WLS 035", "0,035");
idx++; calkdef(idx, "allpir® Polystyrol (Styropor) WLS 032", "0,032");
idx++; calkdef(idx, "allpir® Polystyrol (Styropor) WLS 030", "0,030");
idx++; calkdef(idx, "allpir® PUR-Hartschaum, WLS 030", "0,030");
idx++; calkdef(idx, "allpir® PUR-Hartschaum, WLS 028", "0,028");
idx++; calkdef(idx, "allpir® PUR-Hartschaum, WLS 025", "0,025");
idx++; calkdef(idx, "allpir® PUR-Hartschaum, WLS 024", "0,024");
idx++; calkdef(idx, "Standard-Wärmedämmung WLS 040", "0,040");
idx++; calkdef(idx, "Bitumendachbahnen DIN 52128", "0.170");
idx++; calkdef(idx, "Kunststoffdachbahn PVC", "0.230");

var anz=7;

function calkdef(idx, bezeichnung, lambda) {
 calk[idx]=new Array();
 calk[idx]["bez"]=bezeichnung;
 calk[idx]["lambda"]=lambda;
}


function formulardef() {
 var lge=calk.length-1;
 for(var i=1; i<=anz; i++) {
  var feld = eval("document.uwert.s"+i);
  for(var j=1; j<=lge; j++) {
   feld.options[feld.length] = new Option(calk[j]["bez"]);
  }
 }
 berechnen();
}

function laX(schicht) {
  var fldMat=eval("document.uwert.s"+schicht);
  var idx=fldMat.selectedIndex;
  var lambda=calk[idx]["lambda"];
  var fldLambda=eval("document.uwert.s"+schicht+"_lambda");
  fldLambda.value=lambda;
  var fldDicke=eval("document.uwert.s"+schicht+"_dicke");
  fldDicke.focus();
  berechnen();
}

function berechnen() {
 var summeGl=0; var summeDicke=0;
 for(var i=1; i<=anz; i++) {
  var glStr="";
  var fldDicke=eval("document.uwert.s"+i+"_dicke");
  var wert=fldDicke.value;
  wert=wert.replace(/\,/g, ".");
  var dicke=parseFloat(wert);
  if (isNaN(dicke)) dicke=0;
  if(dicke > 0) {
   var fldLambda=eval("document.uwert.s"+i+"_lambda");
   var wert=fldLambda.value;
   wert=wert.replace(/\,/g, ".");
   var lambda=parseFloat(wert);
   if (isNaN(lambda)) lambda=0;
   if(lambda > 0) {
    var gl=Math.round(dicke/lambda)/1000;
    glStr=gl;
    summeGl=summeGl+gl;
    summeDicke=summeDicke+dicke;
   } //endIf
  } //endIf
  document.getElementById("s"+i+"_gl").firstChild.nodeValue=glStr;
 } //endFor
 var wert=document.uwert.wuk.value;
 wert=wert.replace(/\,/g, ".");
 var wuk=parseFloat(wert);
 summeGl=Math.round((summeGl+wuk)*100)/100;
 document.getElementById("summe_dicke").firstChild.nodeValue=summeDicke;
 document.getElementById("summe_gl").firstChild.nodeValue=summeGl;
 var u=Math.round(1/summeGl*100)/100;
 document.getElementById("ergebnis").firstChild.nodeValue=u;
}

