author | paulson |
Wed, 02 Apr 1997 11:30:48 +0200 | |
changeset 2861 | 7bbd3751523f |
parent 2860 | 6dde30a9e905 |
child 2862 | 3f38cbd57d47 |
--- a/src/HOL/IMP/Hoare.ML Wed Apr 02 11:30:03 1997 +0200 +++ b/src/HOL/IMP/Hoare.ML Wed Apr 02 11:30:48 1997 +0200 @@ -70,7 +70,7 @@ by(simp_tac (!simpset setloop(split_tac[expand_if])) 1); br iffI 1; br weak_coinduct 1; - by(Best_tac 1); + by(etac CollectI 1); by(safe_tac (!claset)); by(rotate_tac ~1 1); by(Asm_full_simp_tac 1);