theorem Th11:
 card(I ';' j) = card I + 1
  proof
   thus card(I ';' j) = card I + card Macro j - 1 by COMPOS_1:20
      .= 2 + card I - 1 by COMPOS_1:56
      .= card I + 1;
  end;
