tuned;
authorwenzelm
Fri, 16 Feb 2018 18:26:13 +0100
changeset 67626 cfa71f9933f4
parent 67625 eb11d722e3ef
child 67627 5cca859b2d2e
tuned;
src/Pure/Isar/context_rules.ML
--- a/src/Pure/Isar/context_rules.ML	Fri Feb 16 18:25:55 2018 +0100
+++ b/src/Pure/Isar/context_rules.ML	Fri Feb 16 18:26:13 2018 +0100
@@ -193,7 +193,7 @@
 (* add and del rules *)
 
 
-val rule_del = Thm.declaration_attribute (fn th => Rules.map (del_rule th));
+val rule_del = Thm.declaration_attribute (Rules.map o del_rule);
 
 fun rule_add k view opt_w =
   Thm.declaration_attribute (fn th => Rules.map (add_rule k opt_w (view th) o del_rule th));