theorem Th17:
  x ==> y implies x >>01<< y
  proof
    assume
A1: x ==> y;
    take y;
    thus x =01=> y & y =01=> y by A1;
  end;
