theorem
  X <> {} implies [:{x},X:] <> {} & [:X,{x}:] <> {} by Th89;
