src/HOL/ex/Puzzle.thy
author nipkow
Mon Nov 15 09:41:06 1999 +0100 (1999-11-15)
changeset 8018 bedd0beabbae
parent 2222 a3fb552f10e3
child 13116 baabb0fd2ccf
permissions -rw-r--r--
Streamlined it a bit.
     1 (*  Title:      HOL/ex/Puzzle.thy
     2     ID:         $Id$
     3     Author:     Tobias Nipkow
     4     Copyright   1993 TU Muenchen
     5 
     6 A question from "Bundeswettbewerb Mathematik"
     7 *)
     8 
     9 Puzzle = Main +
    10 consts f :: nat => nat
    11 rules  f_ax "f(f(n)) < f(Suc(n))"
    12 end