theorem Th45: :: FLANG_2:45
for E being set
for A being Subset of (E ^omega) holds A |^ (0,0) = {(<%> E)}