home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / cpmug / cpmug083.ark / LIM%.DIF < prev    next >
Encoding:
Text File  |  1984-04-29  |  514 b   |  16 lines
  1.  file LIM%.DIF                               GAE - Feb. 1982
  2. Make a new version of file LIM.DIF as follows:
  3. (1)  Start with the original LIM.DIF.
  4. (2)  Add at the end (just before RDS () $ ) the rest of this
  5.           file:
  6. -------------------------------------------------------------
  7.  
  8. PROPERTY LIM, ERF, FUNCTION (EX1),
  9.   WHEN (EX1:LIM1(EX1,#LIM)) EQ PINF,  1  EXIT,
  10.   WHEN EX1 EQ MINF, -1  EXIT,
  11.   WHEN EX1 EQ CINF, ?  EXIT,
  12.   WHEN MEMBER (EX1, '(? PZERO MZERO)), EX1  EXIT,
  13.   ERF(EX1),
  14. ENDFUN $
  15.  
  16.