home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / VSCPPv8.zip / VACPP / IBMCPP / samples / TOOLKIT / CREXX / REXXCALC / MINUS.CAL < prev    next >
Text File  |  1994-11-17  |  337b  |  6 lines
  1. /* Rexx Calculator subtraction processor */
  2. parse arg left, right                  /* get the two operands       */
  3. numeric digits CalcPrecision()         /* set current precision      */
  4. numeric form value CalcForm()          /* set current form           */
  5. return left - right                    /* return result              */
  6.