# HG changeset patch
# User wenzelm
# Date 1305217052 -7200
# Node ID 92173262cfe90c266222f0138656368937a213a9
# Parent  aec61b60ff7bcf5bb8758df6e67dcecd9f8a9f6b
modernized dead code;

diff -r aec61b60ff7b -r 92173262cfe9 src/HOL/Auth/Smartcard/ShoupRubin.thy
--- a/src/HOL/Auth/Smartcard/ShoupRubin.thy	Thu May 12 17:17:57 2011 +0200
+++ b/src/HOL/Auth/Smartcard/ShoupRubin.thy	Thu May 12 18:17:32 2011 +0200
@@ -1036,7 +1036,7 @@
 apply (drule Outpts_parts_used)
 apply simp
 (*faster than
-  by (fast_tac (claset() addDs [Outpts_parts_used] addss (simpset())) 1)
+  apply (fastsimp dest: Outpts_parts_used)
 *)
 (*SR10*)
 apply (fastsimp dest: Outpts_B_Card_form_7)
diff -r aec61b60ff7b -r 92173262cfe9 src/HOL/Auth/Smartcard/ShoupRubinBella.thy
--- a/src/HOL/Auth/Smartcard/ShoupRubinBella.thy	Thu May 12 17:17:57 2011 +0200
+++ b/src/HOL/Auth/Smartcard/ShoupRubinBella.thy	Thu May 12 18:17:32 2011 +0200
@@ -1026,7 +1026,7 @@
 apply (drule Outpts_parts_used)
 apply simp
 (*faster than
-  by (fast_tac (claset() addDs [Outpts_parts_used] addss (simpset())) 1)
+  apply (fastsimp dest: Outpts_parts_used)
 *)
 (*SR_U10*)
 apply (fastsimp dest: Outpts_B_Card_form_7)