theorem Lem1A:
  x <=01=> y implies x <=*=> y by Th6;
