author | wenzelm |
Tue, 12 Jan 1999 15:17:37 +0100 | |
changeset 6093 | 87bf8c03b169 |
parent 3940 | 1d5bee4d047f |
child 6112 | 5e4871c5136b |
permissions | -rw-r--r-- |
6093 | 1 |
(* Title: ZF/QUniv.thy |
0 | 2 |
ID: $Id$ |
1478 | 3 |
Author: Lawrence C Paulson, Cambridge University Computer Laboratory |
0 | 4 |
Copyright 1993 University of Cambridge |
5 |
||
6093 | 6 |
A small universe for lazy recursive types. |
0 | 7 |
*) |
8 |
||
2469 | 9 |
QUniv = Univ + QPair + mono + equalities + |
3923 | 10 |
|
6093 | 11 |
constdefs |
12 |
quniv :: i => i |
|
13 |
"quniv(A) == Pow(univ(eclose(A)))" |
|
0 | 14 |
|
15 |
end |