
diff -r ce09935439b3 -r 2e0b7ca391dc src/Tools/isac/Knowledge/Partial_Fractions.thy
--- a/src/Tools/isac/Knowledge/Partial_Fractions.thy	Wed Aug 03 18:17:27 2022 +0200
+++ b/src/Tools/isac/Knowledge/Partial_Fractions.thy	Thu Aug 04 12:48:37 2022 +0200
@@ -106,7 +106,7 @@
 
 ML \<open>
 val ansatz_rls = prep_rls'(
-  Rule_Def.Repeat {id = "ansatz_rls", preconds = [], rew_ord = ("dummy_ord",Rewrite_Ord.dummy_ord), 
+  Rule_Def.Repeat {id = "ansatz_rls", preconds = [], rew_ord = ("dummy_ord",Rewrite_Ord.function_empty), 
 	  erls = Rule_Set.Empty, srls = Rule_Set.Empty, calc = [], errpatts = [],
 	  rules = [
       \<^rule_thm>\<open>ansatz_2nd_order\<close>,
@@ -114,7 +114,7 @@
 	  scr = Rule.Empty_Prog});
 
 val equival_trans = prep_rls'(
-  Rule_Def.Repeat {id = "equival_trans", preconds = [], rew_ord = ("dummy_ord",Rewrite_Ord.dummy_ord), 
+  Rule_Def.Repeat {id = "equival_trans", preconds = [], rew_ord = ("dummy_ord",Rewrite_Ord.function_empty), 
 	  erls = Rule_Set.Empty, srls = Rule_Set.Empty, calc = [], errpatts = [],
 	  rules = [
       \<^rule_thm>\<open>equival_trans_2nd_order\<close>,
@@ -122,7 +122,7 @@
 	  scr = Rule.Empty_Prog});
 
 val multiply_ansatz = prep_rls'(
-  Rule_Def.Repeat {id = "multiply_ansatz", preconds = [], rew_ord = ("dummy_ord",Rewrite_Ord.dummy_ord), 
+  Rule_Def.Repeat {id = "multiply_ansatz", preconds = [], rew_ord = ("dummy_ord",Rewrite_Ord.function_empty), 
 	  erls = Rule_Set.Empty,
 	  srls = Rule_Set.Empty, calc = [], errpatts = [],
 	  rules = [




