| author | nipkow | 
| Mon, 17 Mar 1997 15:37:41 +0100 | |
| changeset 2798 | f84be65745b2 | 
| parent 1478 | 2b8c2a7547ab | 
| child 6117 | f9aad8ccd590 | 
| permissions | -rw-r--r-- | 
(* Title: ZF/ex/Acc.thy ID: $Id$ Author: Lawrence C Paulson, Cambridge University Computer Laboratory Copyright 1994 University of Cambridge Inductive definition of acc(r) See Ch. Paulin-Mohring, Inductive Definitions in the System Coq. Research Report 92-49, LIP, ENS Lyon. Dec 1992. *) Acc = WF + Inductive + consts acc :: i=>i inductive domains "acc(r)" <= "field(r)" intrs vimage "[| r-``{a}: Pow(acc(r)); a: field(r) |] ==> a: acc(r)" monos "[Pow_mono]" end