(=> (Rational-Number ?X) (Real-Number ?X))
(<=> (Rational-Number ?X) (And (Real-Number ?X) (Exists (?Y) (And (Integer ?Y) (Integer (* ?X ?Y)))))) (<=> (Real-Range@Ranges ?Class) (And (Class@Frame-Ontology ?Class) (Subclass-Of@Frame-Ontology ?Class Real-Number) (Value-Cardinality@Frame-Ontology ?Class R-Lower-Bound@Ranges 1) (Value-Cardinality@Frame-Ontology ?Class R-Upper-Bound@Ranges 1) (Forall (?I) (=> (Instance-Of@Frame-Ontology ?I ?Class) (And (=< (R-Lower-Bound@Ranges ?Class) ?I) (=< ?I (R-Upper-Bound@Ranges ?Class)))))))
(<= (Subclass-Of@Frame-Ontology ?X Real-Number) (Real-Range@Ranges ?X))