lib/Web/OpenWeatherMap/Types/Coord.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

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

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

import GHC.Generics (Generic)

import Data.Aeson (FromJSON)

data Coord =
  Coord
    { lon :: Maybe Double
    , lat :: Maybe Double
    }
  deriving (Show, Generic, FromJSON)