theorem :: FLANG_2:83
for E, x being set
for A being Subset of (E ^omega) st x in A & x <> <%> E holds
A ? <> {(<%> E)}