src/ZF/ex/Enum.ML
author lcp
Tue, 25 Apr 1995 11:14:03 +0200
changeset 1072 0140ff702b23
parent 515 abcc438e7c27
child 1461 6bcb44e4d6e5
permissions -rw-r--r--
updated version

(*  Title: 	ZF/ex/Enum
    ID:         $Id$
    Author: 	Lawrence C Paulson, Cambridge University Computer Laboratory
    Copyright   1993  University of Cambridge

Example of a BIG enumeration type

Can go up to at least 100 constructors, but it takes nearly 7 minutes...
*)

open Enum;

goal Enum.thy "C00 ~= C01";
by (simp_tac (ZF_ss addsimps enum.free_iffs) 1);
result();