SpecToS ts = fromIntegral (sec ts) + fromIntegral (nsec ts) * 1E-9

da
timeSpecToS ts = fromIntegral (sec ts) + fromIntegral (nsec ts) * 1E-9
timeSpecToS ts = fromIntegral (sec ts) + fromIntegral (nsec ts) * 1E-9