-- | UTCTime used for tests.
testUtcTimeToSecond :: UTCTime
testUtcTimeToSecond = UTCTime testDay $ timeOfDayToTime $ TimeOfDay 19 38 38
testUtcTimeToSecond :: UTCTime
testUtcTimeToSecond = UTCTime testDay $ timeOfDayToTime $ TimeOfDay 19 38 38
testUtcTimeToSecond = UTCTime testDay $ timeOfDayToTime $ TimeOfDay 19 38 38