changeset 9941 | fe05af7ec816 |
parent 9906 | 5c027cca6262 |
child 10007 | 64bf7da1994a |
--- a/src/HOL/Isar_examples/Puzzle.thy Tue Sep 12 19:03:13 2000 +0200 +++ b/src/HOL/Isar_examples/Puzzle.thy Tue Sep 12 22:13:23 2000 +0200 @@ -118,7 +118,7 @@ proof; assume "n < f n"; hence "Suc n <= f n"; by (rule Suc_leI); - hence "f (Suc n) <= f (f n)"; by (rule mono [rulified]); + hence "f (Suc n) <= f (f n)"; by (rule mono [rule_format]); also; have "... < f (Suc n)"; by (rule f_ax); finally; have "... < ..."; .; thus False; ..; qed;