(* this "symmetric" definition works better than {{a}, {a,b}} *)
Pair_def: "<a,b> == {{a,a}, {a,b}}"
Note you can prove this:
lemma doubleton: shows "{a,a} = {a}"
using singleton_iff Upair_iff by auto;
Slawekk
--- On Fri, 3/6/09, Victor Porton <por...@narod.ru> wrote: