theorem Th24:
  vertices pe c= vertices(pe^qe) & vertices qe c= vertices(pe^qe)
proof
  rng pe c= rng (pe^qe) & rng qe c= rng (pe^qe) by FINSEQ_1:29,30;
  hence thesis by Th19;
end;
