src/ZF/AC/HH.thy
author clasohm
Tue Feb 06 12:27:17 1996 +0100 (1996-02-06)
changeset 1478 2b8c2a7547ab
parent 1401 0c439768f45c
child 11317 7f9e4c389318
permissions -rw-r--r--
expanded tabs
clasohm@1478
     1
(*  Title:      ZF/AC/HH.thy
lcp@1123
     2
    ID:         $Id$
clasohm@1478
     3
    Author:     Krzysztof Grabczewski
lcp@1123
     4
lcp@1123
     5
The theory file for the proofs of
lcp@1123
     6
  AC17 ==> AC1
lcp@1123
     7
  AC1 ==> WO2
lcp@1123
     8
  AC15 ==> WO6
lcp@1123
     9
*)
lcp@1123
    10
lcp@1196
    11
HH = AC_Equiv + Hartog + WO_AC + Let +
lcp@1123
    12
lcp@1123
    13
consts
lcp@1123
    14
 
clasohm@1401
    15
  HH                      :: [i, i, i] => i
lcp@1123
    16
lcp@1123
    17
defs
lcp@1123
    18
lcp@1196
    19
  HH_def  "HH(f,x,a) == transrec(a, %b r. let z = x - (UN c:b. r`c)
lcp@1196
    20
                        in  if(f`z:Pow(z)-{0}, f`z, {x}))"
lcp@1123
    21
lcp@1123
    22
end
lcp@1123
    23