{-# LANGUAGE DeriveAnyClass #-} {-# LANGUAGE DeriveGeneric #-} module Web.OpenWeatherMap.Types.Main ( Main(..) ) where import GHC.Generics (Generic) import Data.Aeson (FromJSON) {-# ANN module "HLint: ignore Use camelCase" #-} data Main = Main { Main -> Double temp :: Double , Main -> Double pressure :: Double , Main -> Double humidity :: Double , Main -> Double temp_min :: Double , Main -> Double temp_max :: Double , Main -> Maybe Double sea_level :: Maybe Double , Main -> Maybe Double grnd_level :: Maybe Double } deriving (Int -> Main -> ShowS [Main] -> ShowS Main -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [Main] -> ShowS $cshowList :: [Main] -> ShowS show :: Main -> String $cshow :: Main -> String showsPrec :: Int -> Main -> ShowS $cshowsPrec :: Int -> Main -> ShowS Show, forall x. Rep Main x -> Main forall x. Main -> Rep Main x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep Main x -> Main $cfrom :: forall x. Main -> Rep Main x Generic, Value -> Parser [Main] Value -> Parser Main forall a. (Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a parseJSONList :: Value -> Parser [Main] $cparseJSONList :: Value -> Parser [Main] parseJSON :: Value -> Parser Main $cparseJSON :: Value -> Parser Main FromJSON)