Hi Steeve,

SA> round-tuple: func [
SA>   "Round a tuple to the given number of segments, truncating the rest."
SA>  tuple [tuple!]
SA>  scale [integer!] "The number of segments to keep"
SA> ][
SA>  to tuple! cp/part load form parse form tuple "." scale
SA> ]

Ooooohhhh, smaller *and* faster. I like it. Thanks!

-- Gregg

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

Reply via email to