theorem
 card(i ";" J) = card J + 2
 proof
  thus card(i ";" J) = card Macro i + card J by Th11
     .= card J + 2 by COMPOS_1:56;
 end;
