changeset 168 | 44ff2275d44f |
parent 156 | fd1be45b64bf |
child 171 | 16c4ea954511 |
--- a/IOA/example/Multiset.ML Wed Nov 09 19:50:36 1994 +0100 +++ b/IOA/example/Multiset.ML Wed Nov 09 19:51:09 1994 +0100 @@ -1,3 +1,12 @@ +(* Title: HOL/IOA/example/Multiset.ML + ID: $Id$ + Author: Tobias Nipkow & Konrad Slind + Copyright 1994 TU Muenchen + +Axiomatic multisets. +Should be done as a subtype and moved to a global place. +*) + goalw Multiset.thy [Multiset.count_def, Multiset.countm_empty_def] "count({|},x) = 0"; by (rtac refl 1);