theorem Th7:
  0 < denominator(p)
proof
  0 <> denominator p by Def3;
  hence thesis;
end;
