| author | paulson |
| Thu, 18 Jan 1996 10:38:29 +0100 | |
| changeset 1444 | 23ceb1dc9755 |
| parent 1370 | 7361ac9b024d |
| child 1475 | 7f5a4cd08209 |
| permissions | -rw-r--r-- |
| 923 | 1 |
(* Title: HOL/Finite.thy |
2 |
ID: $Id$ |
|
3 |
Author: Lawrence C Paulson, Cambridge University Computer Laboratory |
|
4 |
Copyright 1994 University of Cambridge |
|
5 |
||
6 |
Finite powerset operator |
|
7 |
*) |
|
8 |
||
9 |
Finite = Lfp + |
|
|
1370
7361ac9b024d
removed quotes from types in consts and syntax sections
clasohm
parents:
923
diff
changeset
|
10 |
consts Fin :: 'a set => 'a set set |
| 923 | 11 |
|
12 |
inductive "Fin(A)" |
|
13 |
intrs |
|
14 |
emptyI "{} : Fin(A)"
|
|
15 |
insertI "[| a: A; b: Fin(A) |] ==> insert a b : Fin(A)" |
|
16 |
||
17 |
end |