home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / calculat / sm30a.zip / ISRATIO.KEY < prev    next >
Text File  |  1993-11-07  |  328b  |  7 lines
  1. * isratio                                               internal
  2. isratio(x) gives 1 if x is ratio, or 0 otherwise.
  3. You can assume x is ratio by isodd(x) := 1.
  4. See also: iscomplex, iseven, isfree, isinteger, islarger, isless, islist,
  5. isodd, isreal, isratio, issame, isnumber.
  6. e.g. isratio(2/3) gives 1, isratio(2) gives 0.
  7.