src/HOL/Auth/Public.ML
changeset 8054 2ce57ef2a4aa
parent 6915 4ab8e31a8421
child 9970 dfe4747c8318
--- a/src/HOL/Auth/Public.ML	Wed Dec 08 13:51:44 1999 +0100
+++ b/src/HOL/Auth/Public.ML	Wed Dec 08 13:52:36 1999 +0100
@@ -149,7 +149,7 @@
 (*Tactic for possibility theorems*)
 fun possibility_tac st = st |>
     REPEAT (*omit used_Says so that Nonces start from different traces!*)
-    (ALLGOALS (simp_tac (simpset() delsimps [used_Says] setSolver safe_solver))
+    (ALLGOALS (simp_tac (simpset() delsimps [used_Says]))
      THEN
      REPEAT_FIRST (eq_assume_tac ORELSE' 
                    resolve_tac [refl, conjI, Nonce_supply]));