theorem
  |. c1.|.c2 .| = |.c1.|*|.c2.|
proof
  thus |.(c1.|.c2).| =(|.c1.|)*(|.c2*'.|) by QUATERNI:87
    .=|.c1.|*|.c2.| by QUATERNI:73;
end;
