theorem :: (22)
  X c= (R~).:^(R.:^X) & Y c= R.:^((R~).:^Y) by Th60;
