author | paulson |
Fri, 17 Jan 1997 11:50:09 +0100 | |
changeset 2515 | 6ff9bd353121 |
parent 2514 | ea8881e70f9c |
child 2516 | 4d68fbe6378b |
src/HOL/subset.ML | file | annotate | diff | comparison | revisions |
--- a/src/HOL/subset.ML Fri Jan 17 11:13:18 1997 +0100 +++ b/src/HOL/subset.ML Fri Jan 17 11:50:09 1997 +0100 @@ -16,9 +16,6 @@ by (Fast_tac 1); qed "subset_insert"; -qed_goal "subset_empty_iff" Set.thy "(A<={}) = (A={})" - (fn _=> [ (Fast_tac 1) ]); - (*** Big Union -- least upper bound of a set ***) val prems = goal Set.thy