theorem
  (ex X st X <> {} & X in Y) iff union Y <> {} by Lm1;
