diff options
author | Igor Pashev <pashev.igor@gmail.com> | 2017-06-07 16:24:05 +0300 |
---|---|---|
committer | Igor Pashev <pashev.igor@gmail.com> | 2017-06-07 16:35:08 +0300 |
commit | 6f6e3d8ec76c59d6f403725e9b2a22b8f6680714 (patch) | |
tree | 45382bc0e03032ffa09b7b63afdc45e243e60f4f /lib/Web/OpenWeatherMap/Types/Main.hs | |
download | openweathermap-0.0.0.tar.gz |
Initial version 0.0.00.0.0
Diffstat (limited to 'lib/Web/OpenWeatherMap/Types/Main.hs')
-rw-r--r-- | lib/Web/OpenWeatherMap/Types/Main.hs | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/lib/Web/OpenWeatherMap/Types/Main.hs b/lib/Web/OpenWeatherMap/Types/Main.hs new file mode 100644 index 0000000..21b1951 --- /dev/null +++ b/lib/Web/OpenWeatherMap/Types/Main.hs @@ -0,0 +1,23 @@ +{-# 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 + { temp :: Double + , pressure :: Double + , humidity :: Double + , temp_min :: Double + , temp_max :: Double + , sea_level :: Maybe Double + , grnd_level :: Maybe Double + } deriving (Show, Generic, FromJSON) + |