theorem Th19:
  NAT c= REAL by Th9;
