1.1 --- a/test/Tools/isac/ADDTESTS/course/CADGME/example_2.thy	Sun Oct 09 06:53:03 2022 +0200
     1.2 +++ b/test/Tools/isac/ADDTESTS/course/CADGME/example_2.thy	Sun Oct 09 07:44:22 2022 +0200
     1.3 @@ -43,7 +43,7 @@
     1.4  text\<open>Apply the Ruleset to a term\<close>
     1.5  
     1.6  ML \<open>
     1.7 -  val t = str2term "z / (z - 1) + z / (z - \<alpha>) + 1::real";
     1.8 +  val t = parse_test @{context} "z / (z - 1) + z / (z - \<alpha>) + 1::real";
     1.9    val SOME (t', asm) = rewrite_set_ thy true transform t;
    1.10  \<close>
    1.11