1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
{-# LANGUAGE DeriveAnyClass #-} {-# LANGUAGE DeriveGeneric #-} module Web.OpenWeatherMap.Types.Wind ( Wind(..) ) where import GHC.Generics (Generic) import Data.Aeson (FromJSON) data Wind = Wind { speed :: Double , deg :: Double } deriving (Show, Generic, FromJSON)