| author | paulson |
| Fri, 25 Sep 1998 13:57:01 +0200 | |
| changeset 5562 | 02261e6880d1 |
| parent 124 | 858ab9a9b047 |
| permissions | -rw-r--r-- |
(* Title: ZF/univ.thy ID: $Id$ Author: Lawrence C Paulson, Cambridge University Computer Laboratory Copyright 1993 University of Cambridge A small universe for lazy recursive types *) QUniv = Univ + QPair + "mono" + "equalities" + consts quniv :: "i=>i" rules quniv_def "quniv(A) == Pow(univ(eclose(A)))" end