theorem Th14:
  RAT 0 = {0}
  proof
    RAT 0 = {<*>RAT} by FINSEQ_2:94
         .= {{}};
    hence thesis;
  end;
