reserve u,v,x,y,z,X,Y for set;
reserve r,s for Real;
reserve N for non empty ConjNormAlgStr;
reserve a,a1,a2,b,b1,b2 for Element of N;
reserve c,c1,c2 for Element of Cayley-Dickson(N);

theorem Th12:
  ex a,b being Element of N st c = <%a,b%>
  proof
    set C = Cayley-Dickson(N);
    the carrier of C = product <% the carrier of N,the carrier of N %> by Def9;
    then ex a,b being set st a in the carrier of N & b in the carrier of N
    & c = <%a,b%> by Th7;
    hence thesis;
  end;
