1.1 --- a/test/Tools/isac/Knowledge/polyeq-1.sml	Sat May 02 10:57:04 2020 +0200
     1.2 +++ b/test/Tools/isac/Knowledge/polyeq-1.sml	Sat May 02 11:36:13 2020 +0200
     1.3 @@ -390,9 +390,6 @@
     1.4  val fmz = ["equality (-2 +(-1)*x + 1*x^^^2 = 0)", "solveFor x","solutions L"];
     1.5  val (dI',pI',mI') = ("PolyEq",["pqFormula","degree_2","polynomial","univariate","equation"],
     1.6                       ["PolyEq","solve_d2_polyeq_pq_equation"]);
     1.7 -(*val p = e_pos'; 
     1.8 -val (mI,m) = ("Init_Proof",Init_Proof (fmz, (dI',pI',mI')));
     1.9 -val (p,_,f,nxt,_,pt) = me (mI,m) p [] EmptyPtree;*)
    1.10  val (p,_,f,nxt,_,pt) = CalcTreeTEST [(fmz, (dI',pI',mI'))];
    1.11  val (p,_,f,nxt,_,pt) = me nxt p [] pt;
    1.12  val (p,_,f,nxt,_,pt) = me nxt p [] pt; val (p,_,f,nxt,_,pt) = me nxt p [] pt;