ex/Puzzle.thy
author lcp
Thu, 21 Apr 1994 11:28:32 +0200
changeset 68 acad709cad5d
parent 0 7949f97df77a
permissions -rw-r--r--
tidied definitions and proofs

(*  Title: 	HOL/ex/puzzle.thy
    ID:         $Id$
    Author: 	Tobias Nipkow
    Copyright   1993 TU Muenchen

An question from "Bundeswettbewerb Mathematik"
*)

Puzzle = Nat +
consts f :: "nat => nat"
rules  f_ax "f(f(n)) < f(Suc(n))"
end