src/HOL/IMP/Hoare.ML
changeset 4153 e534c4c32d54
parent 4089 96fba19bcbe2
child 4241 3f3f87c6fe3b
     1.1 --- a/src/HOL/IMP/Hoare.ML	Wed Nov 05 13:14:15 1997 +0100
     1.2 +++ b/src/HOL/IMP/Hoare.ML	Wed Nov 05 13:23:46 1997 +0100
     1.3 @@ -71,7 +71,7 @@
     1.4  by (rtac iffI 1);
     1.5   by (rtac weak_coinduct 1);
     1.6    by (etac CollectI 1);
     1.7 - by (safe_tac (claset()));
     1.8 + by Safe_tac;
     1.9    by (rotate_tac ~1 1);
    1.10    by (Asm_full_simp_tac 1);
    1.11   by (rotate_tac ~1 1);