function calclum(form,val,index)
// converts luminance, Feb.10,2002
// copyright Helge Krüger,2002-2004
{                                 //input:
if(index==0) v=val;               // cd/cm2 (base)
if(index==1) v=val/1.0e4;         // cd/m2
if(index==2) v=val/Math.PI;       // L
if(index==3) v=val*3.42626e-4;    // fL
if(index==4) v=val/6.4516;        // cd/in2
if(index==5) v=val/929.0304;      // cd/ft2
if(index==6) v=val/Math.PI/1.0e4; // asb   
                                         // output:
form.cdcm.value=ausgab(v);               // cd/cm2 (base) 
form.cdm2.value=ausgab(v*1.0e4);         // cd/m2 
form.lamb.value=ausgab(v*Math.PI);       // L     
form.ftla.value=ausgab(v/3.42626e-4);    // fL    
form.cdin.value=ausgab(v*6.4516);        // cd/in2
form.cdft.value=ausgab(v*929.0304);      // cd/ft2
form.asb.value =ausgab(v*Math.PI*1.0e4); // asb   
}

