Janeks:
> Hi, Rebolers! How to format decimals to show the given number of decimal
>  fraction digits? F.ex.: format 2.3 3 => 2.300

Here's a very quick and dirty method, that reuses oneliner-nfrac.r in the 
REBOL.org library -- not optimal in terms of runtime performance, but an 
example 
of software reuse:

 nfrac: func [d][length? second parse join d ".." "."]
 format: func [number [decimal!] length [integer!]
  /local res 
 ][
  res: form number
  n: nfrac number
  if n > length [return copy/part res (length? res) - (n - length) ]
  loop length - n [append res "0"]
  res
 ]

>> for n 0 5 1 [print format 1.23 n]
1.
1.2
1.23
1.230
1.2300
1.23000


Sunanda.
-- 
To unsubscribe from the list, just send an email to 
lists at rebol.com with unsubscribe as the subject.

Reply via email to