module Lib
(
curTimeString
) where
import Data.Time.Clock
curTimeString :: IO String
curTimeString = do
t <- getCurrentTime
return $ show $ t