var prob = new Array(11)
var solution = new Array(11)
prob[1]="x^"
prob[2]="x^{-1}"
prob[3]="\\sin(x)"
prob[4]="\\cos(x)"
prob[5]="\\sec^2(x)"
prob[6]="\\csc^2(x)"
prob[7]="\\sec(x)\\,\\tan(x)"
prob[8]="\\csc(x)\\,\\cot(x)"
prob[9]="e^x"
prob[10]="\\frac{1}{\\sqrt{1-x^2}}"
prob[11]="\\frac{1}{1+x^2}"
solution[1]="\\frac{x^"
solution[2]="\\ln(|x|)"
solution[3]="[-\\cos(x)]"
solution[4]="\\sin(x)"
solution[5]="\\tan(x)"
solution[6]="[-\\cot(x)]"
solution[7]="\\sec(x)"
solution[8]="[-\\csc(x)]"
solution[9]="e^x"
solution[10]="\\sin^{-1}(x)"
solution[11]="\\tan^{-1}(x)"
var aVar = 1
var bVar = 2
var cVar = 3
var dVar = 4
var eVar = 5
var fVar = 6
var gVar = 7
var step = 0
var poly = "\\int\\,4x^7\\,+\\,5x^{-1}\\,+\\,6\\sin(x)\\,dx"
var string1 = "Test"
var string2
var string3
var endString ="\\end{array}"
var string0 = string1+endString

function writeNewEqn(){
   with(Math){
     aVar = round(10*random()+1)
     bVar = aVar
     while(bVar==aVar){
      bVar = round(10*random()+1)
     }
     cVar = aVar
     while((cVar==aVar)||(cVar==bVar)){
      cVar = round(10*random()+1)
     }
     dVar = round(8*random()+1)
     eVar = round(8*random()+1)
     fVar = round(8*random()+1)
     gVar = round(8*random()+1)
   }
   poly="\\int\\,"+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"
}
function writeEqn(){
   string1 = "$\\displaystyle{"+poly+"}$\\\\"
   string2 = "\\altLink{$\\displaystyle{=\\int\\,"+dVar+prob[aVar]
     if(aVar==1){
      string2 = string2+gVar
     }
     string2 = string2+"\\,dx\\,+\\,\\int\\,"+eVar+prob[bVar]             
     if(bVar==1){
      string2 = string2+gVar
     }
     string2 = string2+"\\,dx\\,+\\,\\int\\,"+fVar+prob[cVar]     
     if(cVar==1){
      string2 = string2+gVar
     }
     string2 = string2+"\\,dx}$}{Step 1.}\n\n"
     string5 = "\\altLink{$\\displaystyle{="+dVar+"\\int\\,"+prob[aVar]
     if(aVar==1){
      string5 = string5+gVar
     }
     string5 = string5+"\\,dx\\,+\\,"+eVar+"\\int\\,"+prob[bVar]
     if(bVar==1){
      string5 = string5+gVar
     }
     string5 = string5+"\\,dx\\,+\\,"+fVar+"\\int\\,"+prob[cVar]
     if(cVar==1){
      string5 = string5+gVar
     }
     string5 = string5+"\\,dx}$}{Step 2.}\n\n"
     hVar=gVar+1
     string4 = "\\frac{x^"+hVar+"}{"+hVar+"}"
     string3 = "\\altLink{$="+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+"\\,+\\,C\\\\$}{Step 3.}"
     string0 = string1+string2+string5+string3
   }
