src/HOL/ex/Puzzle.thy

added exception Interrupt for use in function Library/try

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

A question from "Bundeswettbewerb Mathematik"
*)

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