changeset 13615 | 449a70d88b38 |
parent 13524 | 604d0f3622d6 |
child 13784 | b9f6154427a4 |
--- a/src/ZF/Finite.thy Tue Oct 01 11:17:25 2002 +0200 +++ b/src/ZF/Finite.thy Tue Oct 01 13:26:10 2002 +0200 @@ -172,7 +172,6 @@ apply (erule Fin.induct) apply (simp add: FiniteFun.intros, clarify) apply (case_tac "a:b") - apply (rotate_tac -1) apply (simp add: cons_absorb) apply (subgoal_tac "restrict (f,b) : b -||> B") prefer 2 apply (blast intro: restrict_type2)