var prob = new Array(7)
var solution = new Array(7)
var sol = new Array(7)
prob[1]="x^"
prob[2]="x^{-1}"
prob[3]="\\sin(x)"
prob[4]="\\cos(x)"
prob[5]="e^x"
prob[6]="\\frac{1}{\\sqrt{1-x^2}}"
prob[7]="\\frac{1}{1+x^2}"
solution[1]="\\frac{x^"
solution[2]="\\ln(x)"
solution[3]="[-\\cos(x)]"
solution[4]="\\sin(x)"
solution[5]="e^x"
solution[6]="\\sin^{-1}(x)"
solution[7]="\\tan^{-1}(x)"
sol[2]="\\ln("
sol[4]="\\sin("
sol[6]="\\sin^{-1}("
sol[7]="\\tan^{-1}("
var aVar = 1
var bVar = 2
var cVar = 3
var dVar = 4
var eVar = 5
var fVar = 6
var gVar = 7
var hVar = 8
var uVar = 2
var lVar = 1
var step = 0
var poly = "\\int_1^2\\,4x^7\\,+\\,5x^{-1}\\,+\\,6\\sin(x)\\,dx"
var string1 = "Test"
var string2
var string3
var string4
var endString ="\\end{array}"
var string0 = string1+endString

function writeNewEqn(){
   with(Math){
     aVar = round(6*random()+1)
     bVar = aVar
     while(bVar==aVar){
      bVar = round(6*random()+1)
     }
     cVar = aVar
     while((cVar==aVar)||(cVar==bVar)){
      cVar = round(6*random()+1)
     }
     dVar = round(8*random()+1)
     eVar = round(8*random()+1)
     fVar = round(8*random()+1)
     gVar = round(8*random()+1)
     hVar = gVar+1
     if((aVar==2)||(bVar==2)||(cVar==2)){
       lVar = round(4*random()+1)
     } else {
       lVar = round(10*random()-5)
     }
     uVar = lVar+round(4*random()+1)
     if((aVar==6)||(bVar==6)||(cVar==6)){
       lVar = lVar/10
       uVar = uVar/10
     }
   }
   poly="\\int_{"+lVar+"}^{"+uVar+"}\\,"+dVar+prob[aVar]
   if(aVar==1){
    poly=poly+gVar
   }
   poly=poly+"\\,+\\,"+eVar+prob[bVar]
   if(bVar==1){
    poly=poly+gVar
   }
   poly=poly+"\\,+\\,"+fVar+prob[cVar]
   if(cVar==1){
    poly=poly+gVar
   }
   poly=poly+"\\,dx"
   step=0
}
function writeEqn(){
   if (step == 0){
     string1 = "\\begin{array}{rcl}&&"+poly+"\\\\"
     string0 = string1+endString
     step = 1
   }
   else { if (step == 1){
     string4 = "\\frac{x^"+hVar+"}{"+hVar+"}"
     string3 = "&=&\\left. "+dVar+"\\,"
     if(aVar==1){
      string3 = string3+string4
     } else {
      string3 = string3+solution[aVar]
     }
     string3 = string3+"\\,+\\,"+eVar+"\\,"
     if(bVar==1){
      string3 = string3+string4
     } else {     
      string3 = string3+solution[bVar]
     }
     string3 = string3+"\\,+\\,"+fVar+"\\,"
     if(cVar==1){
      string3 = string3+string4
     } else {     
      string3 = string3+solution[cVar]
     }
     string3 = string3+"\\,\\right|_{"+lVar+"}^{"+uVar+"}\\\\"
     string0 = string1+string3+endString
     step=2
   }
   else { if (step == 2){
     if(uVar<0){
      string6 = "\\frac{("+uVar+")^"+hVar+"}{"+hVar+"}"
     } else {
      string6 = "\\frac{"+uVar+"^"+hVar+"}{"+hVar+"}"
     }
     if(lVar<0){
      string8 = "\\frac{("+lVar+")^"+hVar+"}{"+hVar+"}"
     } else {
      string8 = "\\frac{"+lVar+"^"+hVar+"}{"+hVar+"}"
     }
     string5 = "&=&\\left["+dVar+"\\,"
     string7 = "&&-\\,\\left["+dVar+"\\,"
     if(aVar==1){
      string5 = string5+string6
      string7 = string7+string8
     } else {
     if(aVar==3){
      string5 = string5+"[-\\cos("+uVar+")]"
      string7 = string7+"[-\\cos("+lVar+")]"
     } else {
     if(aVar==5){
      string5 = string5+"e^{"+uVar+"}"
      string7 = string7+"e^{"+lVar+"}"
     } else {
      string5 = string5+sol[aVar]+uVar+")"
      string7 = string7+sol[aVar]+lVar+")"
     }}}
     string5 = string5+"\\,+\\,"+eVar+"\\,"
     string7 = string7+"\\,+\\,"+eVar+"\\,"
     if(bVar==1){
      string5 = string5+string6
      string7 = string7+string8
     } else {
     if(bVar==3){
      string5 = string5+"[-\\cos("+uVar+")]"
      string7 = string7+"[-\\cos("+lVar+")]"
     } else {
     if(bVar==5){
      string5 = string5+"e^{"+uVar+"}"
      string7 = string7+"e^{"+lVar+"}"
     } else {
      string5 = string5+sol[bVar]+uVar+")"
      string7 = string7+sol[bVar]+lVar+")"
     }}}
     string5 = string5+"\\,+\\,"+fVar+"\\,"
     string7 = string7+"\\,+\\,"+fVar+"\\,"
     if(cVar==1){
      string5 = string5+string6
      string7 = string7+string8
     } else {
     if(cVar==3){
      string5 = string5+"[-\\cos("+uVar+")]"
      string7 = string7+"[-\\cos("+lVar+")]"
     } else {
     if(cVar==5){
      string5 = string5+"e^{"+uVar+"}"
      string7 = string7+"e^{"+lVar+"}"
     } else {
      string5 = string5+sol[cVar]+uVar+")"
      string7 = string7+sol[cVar]+lVar+")"
     }}}
     string5 = string5+"\\,\\right]\\\\"
     string7 = string7+"\\,\\right]\\\\"
     string0 = string1+string3+string5+string7+endString
     step=3
     document.solution.Continue.value="Done!"
   }
   }}
}