test/Tools/isac/Knowledge/polyminus.sml
changeset 60329 0c10aeff57d7
parent 60325 a7c0e6ab4883
child 60330 e5e9a6c45597
     1.1 --- a/test/Tools/isac/Knowledge/polyminus.sml	Fri Jul 16 07:45:06 2021 +0200
     1.2 +++ b/test/Tools/isac/Knowledge/polyminus.sml	Sat Jul 17 14:05:28 2021 +0200
     1.3 @@ -319,10 +319,10 @@
     1.4  "----------- build verschoenere ----------------------------------";
     1.5  "----------- build verschoenere ----------------------------------";
     1.6  "----------- build verschoenere ----------------------------------";
     1.7 -val t = TermC.str2term "3 + -2 * e + 2 * f + 2 * g";
     1.8 +val t = TermC.str2term "3 + - 2 * e + 2 * f + 2 * g";
     1.9  val SOME (t,_) = rewrite_set_ thy false verschoenere t;
    1.10  if UnparseC.term t = "3 - 2 * e + 2 * f + 2 * g" then ()
    1.11 -else error "polyminus.sml: verschoenere 3 + -2 * e ...";
    1.12 +else error "polyminus.sml: verschoenere 3 + - 2 * e ...";
    1.13  
    1.14  (*Rewrite.trace_on := true; ..stopped Test_Isac.thy*)
    1.15  Rewrite.trace_on:=false;