theorem Th79:
  p..(f:-p) = 1
proof
  (f:-p)/.1 = p by FINSEQ_5:53;
  hence thesis by Th43;
end;
