theorem Th4:
  crossover(p1,p2,0) = p2
proof
  crossover(p1,p2,0) = p2/^0 by FINSEQ_1:34
    .= p2 by FINSEQ_5:28;
  hence thesis;
end;
