[REBOL] Re: Swatch time
From: joel:neely:fedex at: 6-Oct-2001 20:56
Hello, all
Graham Chiu wrote:
> On Sat, 06 Oct 2001 13:54:40 -0500
> "<[norsepower--uswest--net]>" <[norsepower--uswest--net]> wrote:
> > Yup.
> >
> > http://www.escribe.com/internet/rebol/m4983.html
>
> Damm. Should have searched the archives :)
>
Except that the above version left out the modulus adjustment ...
biel-mean-time-total-seconds:
biel-mean-time-total-seconds + 86400 // 86400
... to compensate for midnight rollover. Otherwise one gets
results like this
>> internet-time
== 1035.9375
-jn-
--
; Joel Neely [joel--neely--fedex--com] 901-263-4460 38017/HKA/9677
REBOL [] foreach [order string] sort/skip reduce [ true "!"
false head reverse "rekcah" none "REBOL " prin "Just " "another "
] 2 [prin string] print ""