openweathermap-0.0.0: lib/Web/OpenWeatherMap/Types/Sys.hs

{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE DeriveGeneric #-}

module Web.OpenWeatherMap.Types.Sys (
  Sys(..)
) where

import GHC.Generics (Generic)

import Data.Aeson (FromJSON)
 

data Sys = Sys
  { message :: Double
  , country :: Maybe String
  , sunrise :: Int
  , sunset :: Int
  } deriving (Show, Generic, FromJSON)