added "atomize" method;
authorwenzelm
Sat, 27 Oct 2001 00:07:48 +0200
changeset 11962 4c6585866fb2
parent 11961 e5911a25d094
child 11963 a6608d44a46b
added "atomize" method;
src/Pure/Isar/method.ML
--- a/src/Pure/Isar/method.ML	Sat Oct 27 00:07:19 2001 +0200
+++ b/src/Pure/Isar/method.ML	Sat Oct 27 00:07:48 2001 +0200
@@ -680,6 +680,8 @@
   ("insert", thms_args insert, "insert theorems, ignoring facts (improper)"),
   ("unfold", thms_args unfold, "unfold definitions"),
   ("fold", thms_args fold, "fold definitions"),
+  ("atomize", no_args (SIMPLE_METHOD' HEADGOAL ObjectLogic.atomize_tac),
+    "present local premises as object-level statements"),
   ("rule", thms_ctxt_args some_rule, "apply some rule"),
   ("erule", nat_thms_args erule, "apply rule in elimination manner (improper)"),
   ("drule", nat_thms_args drule, "apply rule in destruct manner (improper)"),