//
//      -- (C) Andrew Scott, 2006
//	http://www.andrew-scott.co.uk/
//
var maxd=6;var dp=3;var focus=null;
function findo(name){cells=gbt("td");
  var a=new Array(0);for(var i=0;i<cells.length;i++)
  if(cells[i].className==name)a.push(cells[i]);return a;} 
function select(event){if(!event)event=window.event;
  if(document.all)t=event.srcElement;else t=event.target;o=findo("c");
  for(var i=0;i<o.length;i++){o[i].bgColor="#ddddff";rot(o[i],"0");}
  if(t&&t.className=="c"){t.bgColor="#ffffff";focus=t;}}
function key(e){if(!focus)return false;if(!e)e=window.event;s=focus.innerHTML;
  if(!s)return false;if(e.keyCode==8){if(s.length>1)s=s.substr(0,s.length-1);
  else s="0";}else{if(s.length>=maxd||e.keyCode<48||e.keyCode>57)return false;
  if(s=="0")s="";s+=(e.keyCode-48);}v=s/focus.id.split("_")[1];o=findo("c");
  for(var i=0;i<o.length;i++)rot(o[i],
  com((v*o[i].id.split("_")[1]).toFixed(dp)));rot(focus,s);return false;}
var u=new Array(104,116,116,112,58,47,47,119,119,119,46,97,110,100,114,101,119,
   45,115,99,111,116,116,46,99,111,46,117,107,47);
function ice(s){r=dce("tr");c=dce("td");if(s!="*"){a=eval(s);txt(c,s+":");
  c.style.fontWeight="bold";apc(r,c);for(var col=0;col<a.length;col+=2){
  c=dce("td");c.className="c";c.width="160px";c.bgColor="#ddddff";c.id="v_"+
  a[col+1];c.style.textAlign="right"; txt(c,"0");apc(r,c);c=dce("td");
  c.className="n";c.style.textAlign="left";txt(c,a[col]);apc(r,c);}}else{
  c.innerHTML="&nbsp;";apc(r,c);}return r;} 
function ctable(){cDiv=gbi("ctable");cTab=dce("table");cBdy=dce("tbody");for(
  var i=0;i<rows.length;i++)apc(cBdy,ice(rows[i]));apc(cTab,cBdy);apc(cDiv,
  cTab);nDiv=dce("div");txt(nDiv,"Results to "+dp+" dp");apc(cDiv,nDiv);
  d=dce("div");us="";for(var i=0;i<u.length;i++)us+=String.fromCharCode(u[i]);
  a=dce("a");a.href=us;t=ctn(us);apc(a,t);apc(d,a);d.style.textAlign="center";
  d.style.fontSize="8pt";apc(cDiv,d);document.onclick=select;document.onkeydown=
  key;}
function rdy(){if(window.loaded)ctable();else setTimeout("rdy()",1000);}rdy();