theorem
  ([:X,Y:] --> z).(x,y) = z by Th7,ZFMISC_1:87;
