function ProtonormTable(){
 this.writeTable = wTable;
}
function wTable(lower){
 var s = "";
 s += "<table border=\"1\" cellspacing=\"0\">\n";
	s += "<tr><th>Prot.</th><th class=\"fem\">&nbsp;Female&nbsp;</th><th class=\"male\">&nbsp; &nbsp;Male&nbsp; &nbsp;</th><th>Combined</th><th class=\"eis\">EIS</th><th class=\"gen\">I.Q.</th><th class=\"gen\">General</th></tr>\n";
 var dataObj = new Protonorms();
 var conObj = new Conversions();
 var iqObj = new IQToProp();
 var iq = 0;
 var sexCom = 0;
 var eis = 0;
 if(lower){
  for(var i = -1111; i < 0; i++){
   eis = conObj.protonormToEIS(i);
   iq = conObj.eisToIQ(eis);
   s += "<tr><td>" + i + "</td>";
   s += "<td class=\"fem\">" + 0 + "</td>";
   s += "<td class=\"male\">" + 0 + "</td>";
   s += "<td>" + 0 + "</td>";
   s += "<td class=\"eis\">" + eis + "</td>";
   s += "<td class=\"gen\">" + iq + "</td>";
   s += "<td class=\"gen\">" + iqObj.prop(iq) + "</td></tr>\n";
  }
  for(var i = 2000; i < 2222; i++){
   sexCom = dataObj.r[i].sexCombined();
   iq = conObj.eisToIQ(dataObj.r[i].eis);
   s += "<tr><td>" + (i - 2000) + "</td>";
   s += "<td class=\"fem\">" + (dataObj.r[i].female / 10000).toFixed(4) + "</td>";
   s += "<td class=\"male\">" + (dataObj.r[i].male / 10000).toFixed(4) + "</td>";
   s += "<td>" + (sexCom / 10000).toFixed(4) + "</td>";
   s += "<td class=\"eis\">" + dataObj.r[i].eis + "</td>";
   s += "<td class=\"gen\">" + iq + "</td>";
   s += "<td class=\"gen\">" + iqObj.prop(iq) + "</td></tr>\n";
  } 
 } else{
  for(var i = 2222; i < 2681; i++){
   sexCom = dataObj.r[i].sexCombined();
   iq = conObj.eisToIQ(dataObj.r[i].eis);
   s += "<tr><td>" + (i - 2000) + "</td>";
   s += "<td class=\"fem\">" + (dataObj.r[i].female / 10000).toFixed(4) + "</td>";
   s += "<td class=\"male\">" + (dataObj.r[i].male / 10000).toFixed(4) + "</td>";
   s += "<td>" + (sexCom / 10000).toFixed(4) + "</td>";
   s += "<td class=\"eis\">" + dataObj.r[i].eis + "</td>";
   s += "<td class=\"gen\">" + iq + "</td>";
   s += "<td class=\"gen\">" + iqObj.prop(iq) + "</td></tr>\n";
  } 
  for(var i = 681; i < 1112; i++){
   eis = conObj.protonormToEIS(i);
   iq = conObj.eisToIQ(eis);
   s += "<tr><td>" + i + "</td>";
   s += "<td class=\"fem\">" + 1 + "</td>";
   s += "<td class=\"male\">" + 1 + "</td>";
   s += "<td>" + 1 + "</td>";
   s += "<td class=\"eis\">" + eis + "</td>";
   s += "<td class=\"gen\">" + iq + "</td>";
   s += "<td class=\"gen\">" + iqObj.prop(iq) + "</td></tr>\n";
  }
 }
	s += "</table>\n";
	return s;
}