const Subq : set set prop axiom Subq_ref: !x:set.Subq x x const In : set set prop term iIn = In infix iIn 2000 2000 const Power : set set axiom PowerI: !x:set.!y:set.Subq y x -> y iIn Power x claim !x:set.x iIn Power x