atw=new Array(new Array(90,70),new Array(75,65),new Array(70,55),new Array(55,45))
atd=new Array(10,15,18,20,22,24)
var dtxdt, prepinac=0;
function norm(h) { d=h.indexOf(","); return parseFloat((d<0)?h:h.substring(0,d)+"."+h.substring(d+1,h.length)) }
function s(tw1x,tw2x,tdx) { return ''+tw1x+'/'+tw2x+'/'+tdx }
function fdtxdt(tw1,tw2,td,tw1x,tw2x,tdx) {
 if (((tw2x-tdx)/(tw1x-tdx))<0.7) {dt=(tw1-tw2)/(Math.log((tw1-td)/(tw2-td))); dtx=(tw1x-tw2x)/(Math.log((tw1x-tdx)/(tw2x-tdx)))}
 else {dt=(tw1+tw2)/2-td; dtx=(tw1x+tw2x)/2-tdx}
 dtxdt=dtx/dt
}
function f(QT,n) { return Math.round(QT*Math.pow(dtxdt,n)) }

function DOM() {
// if ((!document.getElementById) && (!document.all) && !(document.layers)) {
//  alert("Funguje pouze v novějších prohlížečích!"); return 1}
 var appName=navigator.appName
 var appVer=parseFloat(navigator.appVersion.substring(0,4))
 if (!((appName.indexOf("Microsoft")>-1)&&(appVer>=4))) {
  alert("Přepočet funguje pouze pro Internet Explorer 4 a více!"); return 1}
}

function kontrola(tw1x,tw2x,tdx) {
 if ((tw1x<=tw2x) || (tw2x<=tdx)) {alert("Chyba v zadání teplot teplotního spádu!"); return 1}
}
function prepni() {
 if (DOM()) return;
 var retez
 prepinac=!prepinac
 if (prepinac) {
  var jtwx=atw[T_gobj('twx').selectedIndex], jtdx=atd[T_gobj('tdx').selectedIndex];
  T_gobj('ts').innerHTML='<input name="itw1x" value="'+jtwx[0]+'" size="1"></input><input name="itw2x" value="'+jtwx[1]+'" size="1"></input><input name="itdx" value="'+jtdx+'" size="1"></input>'
 }
 else {
  var i,prvni=true,retez='<select name="twx" size="1">'
  for (i=0;i<atw.length;i++) {
    retez+='<option'; if ( prvni && ((atw[i][0]<=parseInt(T_gobj('itw1x').value)) || (i==atw.length-1)) ) {retez+=' selected';prvni=false;}
	retez+='>'+atw[i][0]+'/'+atw[i][1]+'</option>'
  }
  retez+='</select><select name="tdx" size="1">'
  prvni=true
  for (i=0;i<atd.length;i++) {
    retez+='<option'; if ( prvni && ((atd[i]>=parseInt(T_gobj('itdx').value)) || (i==atd.length-1)) ) {retez+=' selected';prvni=false;}
	retez+='>'+atd[i]+'</option>'
  }
  retez+='</select>'
  T_gobj('ts').innerHTML=retez
 }
}