{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric      #-}

module OpenWeatherMap.Types.BoundingBox where

import           Data.Data
import           GHC.Generics
import           OpenWeatherMap.Types.Coordinate

type Zoom = Double

data BoundingBox = BoundingBox !Coordinate !Coordinate !Zoom deriving (Eq, Ord, Show, Data, Typeable, Generic)
