src/HOL/Auth/NS_Public_Bad.ML
changeset 4686 74a12e86b20b
parent 4556 e7a4683c0026
child 5076 fbc9d95b62ba
--- a/src/HOL/Auth/NS_Public_Bad.ML	Fri Mar 06 18:25:28 1998 +0100
+++ b/src/HOL/Auth/NS_Public_Bad.ML	Sat Mar 07 16:29:29 1998 +0100
@@ -122,7 +122,7 @@
 (*Tactic for proving secrecy theorems*)
 fun analz_induct_tac i = 
     etac ns_public.induct i   THEN
-    ALLGOALS (asm_simp_tac (simpset() addsplits [expand_if]));
+    ALLGOALS Asm_simp_tac;
 
 
 (*Secrecy: Spy does not see the nonce sent in msg NS1 if A and B are secure*)