/usr/share/doc/axiom-doc/hypertex/solvelinearequations.xhtml

<?xml version="1.0" encoding="UTF-8"?>
<html xmlns="http://www.w3.org/1999/xhtml" 
      xmlns:xlink="http://www.w3.org/1999/xlink"
      xmlns:m="http://www.w3.org/1998/Math/MathML">
 <head>
  <meta http-equiv="Content-Type" content="text/html" charset="us-ascii"/>
  <title>Axiom Documentation</title>
  <style>

   html {
     background-color: #ECEA81;
   }

   body { 
     margin: 0px;
     padding: 0px;
   }

   div.command { 
     color:red;
   }

   div.center {
     color:blue;
   }

   div.reset {
     visibility:hidden;
   }

   div.mathml { 
     color:blue;
   }

   input.subbut {
     background-color:#ECEA81;
     border: 0;
     color:green;
     font-family: "Courier New", Courier, monospace;
   }

   input.noresult {
     background-color:#ECEA81;
     border: 0;
     color:black;
     font-family: "Courier New", Courier, monospace;
   }

   span.cmd { 
     color:green;
     font-family: "Courier New", Courier, monospace;
   }

   pre {
     font-family: "Courier New", Courier, monospace;
   }
  </style>
  <script type="text/javascript">
<![CDATA[
   function indeps(i) {
    var ans="";
    for (var j = 0 ; j < i ; j++) {
     ans=ans+'x'+j
     if (j != (i - 1)) ans=ans+',';
    }
    return(ans);
   }
   function equation(i) {
    var ans="";
    for (var j = 0 ; j < i ; j++) {
     ans=ans+Math.floor(Math.random()*100)+'*x'+j;
     if (j != (i - 1)) ans=ans+'+';
    }
    ans=ans+"="+Math.floor(Math.random()*100);
    return(ans);
   }
   function byelement() {
      // find out how many rows and columns, must be positive and nonzero
    var rcnt = parseInt(document.getElementById('rowcnt').value);
    if (rcnt <= 0) {
      alert("Rows must be positive and non-zero -- defaulting to 1");
      rcnt = 1;
      document.getElementById('rowcnt').value=1;
      return(false);
    }
      // remove the question and the buttons
    var quest = document.getElementById('question');
    var clicks = document.getElementById('clicks');
    quest.removeChild(clicks);
      // write "Elements"
    var tbl = document.getElementById('form2');
    var tblsize = tbl.rows.length;
    var row = tbl.insertRow(tblsize);
    var thecell = row.insertCell(0);
    var tnode = document.createTextNode("Enter the equations:");
    thecell.appendChild(tnode);
      // create input boxes for the matrix values
    for (var i = 0 ; i < rcnt ; i++) {
     tblsize = tblsize + 1;
     row = tbl.insertRow(tblsize);
     thecell = row.insertCell(0);
     tnode = document.createTextNode('equation '+i+': ');
     thecell.appendChild(tnode);
     thecell = row.insertCell(1);
     tnode = document.createElement('input');
     tnode.type = 'text';
     tnode.name = 'a'+i;
     tnode.id = 'a'+i;
     tnode.size=50;
     tnode.value=equation(rcnt);
     tnode.tabindex=20+i;
     thecell.appendChild(tnode);
    }
      // insert the request for the unknown
    tblsize = tblsize + 1;
    row = tbl.insertRow(tblsize);
    thecell = row.insertCell(0);
    tnode = document.createTextNode("Enter the unknowns (comma separated):");
    thecell.appendChild(tnode);
    thecell = row.insertCell(1);
    tnode = document.createElement('input');
    tnode.type = 'text';
    tnode.name = 'unk';
    tnode.id = 'unk';
    tnode.size=10;
    tnode.value=indeps(rcnt);
    tnode.tabindex=2000;
    thecell.appendChild(tnode);
    tblsize = tblsize + 1;
      // insert a blank line
    row = tbl.insertRow(tblsize);
    thecell = row.insertCell(0);
    tnode = document.createTextNode("");
    thecell.appendChild(tnode);
      // insert the continue button
    var centnode = document.createElement('center');
    tbl.parentNode.appendChild(centnode);
    tnode = document.createElement('input');
    tnode.type = 'button';
    tnode.id = 'contbutton';
    tnode.value = 'Continue';
    tnode.setAttribute("onclick","makeRequest('');");
    centnode.appendChild(tnode);
    return(false);
   }
   function commandline(arg) {
     var rcnt = parseInt(document.getElementById('rowcnt').value);
     var cmdhead = 'solve(';
     var cmdtail = '])';
     var listbody = '[';
     for (var j = 0 ; j < rcnt ; j++) {
      var aj = document.getElementById('a'+j).value;
      listbody = listbody+aj;
      if (j != (rcnt - 1)) listbody = listbody+',';
     }
     listbody = listbody+']';
     cmdhead = cmdhead+listbody;
     var ans = cmdhead+',['+document.getElementById('unk').value+cmdtail;
     alert(ans);
     return(ans);
   }
]]>
// The structure returned from Axiom now is
// <div class="stepnum"></div>
// <div class="command"></div>
// <div class="algebra"></div>
// <div class="mathml"></div>
// <div class="type"></div>
// This function will format the output as a console session
<![CDATA[
 function showanswer(mathString,indiv) {
    var mystr = mathString.split("</div>");
      // first we prepare the step number
    var mystept1 = mystr[0].lastIndexOf(">");
    var mystepstr = mystr[0].substr(mystept1+1);
      // now we get the command
    var mycmdt1 = mystr[1].lastIndexOf(">");
    var mycmdstr = mystr[1].substr(mycmdt1+1);
    var myprompt = '('+mystepstr+') -> '+mycmdstr;
      // now we handle the mathml
    var mymathstr = mystr[3].concat("</div>");
      // and the type, we need to insert the string "Type: "
    var mytypet1 = mystr[4].lastIndexOf(">");
    var mytypet2 = mystr[4].substr(mytypet1+1).concat("</div>");
    var mytypestr = '<div> Type: '.concat(mytypet2);
      // bang the whole thing together
    var finaldiv='<div class="command">'+myprompt+'</div>'+mymathstr+mytypestr;
      // this turns the string into a dom fragment
    var mathRange = document.createRange();
    var mathBox=document.createElementNS('http://www.w3.org/1999/xhtml','div');
    mathRange.selectNodeContents(mathBox);
    var answer = mathRange.createContextualFragment(finaldiv);
    mathBox.appendChild(answer);
      // and we stick the result into the requested div block as a child.
    var mathAns = document.getElementById(indiv);
    mathAns.removeChild(mathAns.firstChild);
    mathAns.appendChild(mathBox);
 }
]]>
<![CDATA[
  function ignoreResponse() {}
  function resetvars() {
    http_request = new XMLHttpRequest();         
    http_request.open('POST', '127.0.0.1:8085', true);
    http_request.onreadystatechange = ignoreResponse;
    http_request.setRequestHeader('Content-Type', 'text/plain');
    http_request.send("command=)clear all");
    return(false);
  }
]]>
 function init() {
 }
 function makeRequest(arg) {
   http_request = new XMLHttpRequest();         
   var command = commandline(arg);
   //alert(command);
   http_request.open('POST', '127.0.0.1:8085', true);
   http_request.onreadystatechange = handleResponse;
   http_request.setRequestHeader('Content-Type', 'text/plain');
   http_request.send("command="+command);
   return(false);
 }
 function lispcall(arg) {
   http_request = new XMLHttpRequest();         
   var command = commandline(arg);
   //alert(command);
   http_request.open('POST', '127.0.0.1:8085', true);
   http_request.onreadystatechange = handleResponse;
   http_request.setRequestHeader('Content-Type', 'text/plain');
   http_request.send("lispcall="+command);
   return(false);
 }
 function showcall(arg) {
   http_request = new XMLHttpRequest();         
   var command = commandline(arg);
   //alert(command);
   http_request.open('POST', '127.0.0.1:8085', true);
   http_request.onreadystatechange = handleResponse;
   http_request.setRequestHeader('Content-Type', 'text/plain');
   http_request.send("showcall="+command);
   return(false);
 }
 function interpcall(arg) {
   http_request = new XMLHttpRequest();         
   var command = commandline(arg);
   //alert(command);
   http_request.open('POST', '127.0.0.1:8085', true);
   http_request.onreadystatechange = handleResponse;
   http_request.setRequestHeader('Content-Type', 'text/plain');
   http_request.send("interpcall="+command);
   return(false);
 }
 function handleResponse() {
  if (http_request.readyState == 4) {
   if (http_request.status == 200) {
    showanswer(http_request.responseText,'mathAns');
   } else
   {
     alert('There was a problem with the request.'+ http_request.statusText);
   }
  }
 }

  </script>
 </head>
 <body>
  <div align="center"><img align="middle" src="doctitle.png"/></div>
  <hr/>
 <table id="form2">
  <tr>
   <td>
    Enter the number of equations:
    <input type="text" id="rowcnt" tabindex="10" size="10" value="2"/>
   </td>
  </tr>
 </table>
 <div id="question">
  <div id="clicks">
   <center>
    <input type="button" value="Continue" onclick="byelement();"/>
   </center>
  </div>
 </div>
  <div id="mathAns"><div></div></div>
 </body>
</html>
axiom-hypertex-data 20120501-8 / usr / share / doc / axiom-doc / hypertex / solvelinearequations.xhtml
