Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!mips!pacbell.com!att!linac!unixhub!slacvm!niv
From: NIV@SLACVM.SLAC.STANFORD.EDU
Newsgroups: comp.lang.rexx
Subject: Re: Dollarizing
Message-ID: <91120.131127NIV@SLACVM.SLAC.STANFORD.EDU>
Date: 30 Apr 91 21:11:27 GMT
References: <lordbah.4810@amusing.UUCP> <91120.082553CJS@psuvm.psu.edu>
Organization: Stanford Linear Accelerator Center
Lines: 10

One really easy thing is

/* */
arg x
d = (x%.01)*.01
r = x//.01
if r >= .005 then d = d +.01
say d

This works well anyplace