blob: fa8e50a7634ce520b3f8ff5c92b43b8c70160668 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE DeriveGeneric #-}
module Web.OpenWeatherMap.Types.ForecastWeather
( ForecastWeather(..)
) where
import GHC.Generics (Generic)
import Data.Aeson (FromJSON)
import Web.OpenWeatherMap.Types.City (City)
import Web.OpenWeatherMap.Types.Forecast (Forecast)
-- | Response to requests for forecast weather.
-- Refer to <https://openweathermap.org/forecast5>.
data ForecastWeather = ForecastWeather
{ list :: [Forecast]
, city :: City
} deriving (Show, Generic, FromJSON)
|