src/Provers/splitter.ML
changeset 10821 dcb75538f542
parent 10652 e6a4bb832b46
child 13157 4a4599f78f18
--- a/src/Provers/splitter.ML	Sun Jan 07 21:40:49 2001 +0100
+++ b/src/Provers/splitter.ML	Sun Jan 07 21:41:56 2001 +0100
@@ -427,7 +427,7 @@
 
 val split_args = #2 oo Method.syntax Attrib.local_thms;
 
-fun split_meth ths = Method.SIMPLE_METHOD' HEADGOAL (gen_split_tac ths);
+fun split_meth ths = Method.SIMPLE_METHOD' HEADGOAL (CHANGED_PROP o gen_split_tac ths);