reserve u,v,x,y,z,X,Y for set;
reserve r,s for Real;

theorem
  <%u%> = <%x%> implies u = x
  proof
    <%u%>.0 = u & <%x%>.0 = x;
    hence thesis;
  end;
