src/ZF/AC/Hartog.thy

Ran expandshort and changed spelling of Grabczewski

(*  Title: 	ZF/AC/Hartog.thy
    ID:         $Id$
    Author: 	Krzysztof Grabczewski

Hartog's function.
*)

Hartog = Cardinal +

consts

  Hartog :: "i => i"

defs

  Hartog_def "Hartog(X) == LEAST i. ~i lepoll X"

end