let e be object ; :: according to MEMBERED:def 1 :: thesis: ( not e in A ** B or e is complex )
assume e in A ** B ; :: thesis: e is complex
then ex c1, c2 being Complex st
( e = c1 * c2 & c1 in A & c2 in B ) ;
hence e is complex ; :: thesis: verum