timestampNoTzParser :: A.Parser (Day, TimeOfDay)
timestampNoTzParser = do
  date <- dateParser
  time <- (A.char ' ' <|> A.char 'T') *> timeNoTzParser
  pure (date, time)
timestampNoTzParser :: A.Parser (Day, TimeOfDay)
timestampNoTzParser = do
  date <- dateParser
  time <- (A.char ' ' <|> A.char 'T') *> timeNoTzParser
  pure (date, time)
timestampNoTzParser = do
  date <- dateParser
  time <- (A.char ' ' <|> A.char 'T') *> timeNoTzParser
  pure (date, time)