src/HOL/Induct/Multiset0.ML
changeset 10258 d549f2534e6d
parent 10257 21055ac27708
child 10259 93ec82d535f2
     1.1 --- a/src/HOL/Induct/Multiset0.ML	Wed Oct 18 23:35:56 2000 +0200
     1.2 +++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.3 @@ -1,11 +0,0 @@
     1.4 -(*  Title:      HOL/Induct/Multiset0.ML
     1.5 -    ID:         $Id$
     1.6 -    Author:     Tobias Nipkow
     1.7 -    Copyright   1998 TUM
     1.8 -
     1.9 -This theory merely proves that the representation of multisets is nonempty.
    1.10 -*)
    1.11 -
    1.12 -Goal "(%x. (0::nat)) : {f. finite {x. 0 < f x}}";
    1.13 -by (Simp_tac 1);
    1.14 -qed "multiset_witness";