POSIXTime -package:tztime package:hosc

posixtime_to_ntpr :: POSIXTime -> NtpReal
hosc Sound.Osc Sound.Osc.Time
Convert POSIXTime to Time.
getPosixTimeAsPosix :: IO PosixReal
hosc Sound.Osc Sound.Osc.Time
realToFrac of Clock.Posix.getPOSIXTime 
get_ct = getCurrentTimeAsPosix
get_pt = getPosixTimeAsPosix
(ct,pt) <- get_ct >>= \t0 -> get_pt >>= \t1 -> return (t0,t1)
print (pt - ct,pt - ct < 1e-5)
ntpr_to_posixtime :: NtpReal -> POSIXTime
hosc Sound.Osc Sound.Osc.Time
Convert Time to POSIXTime.