coordinateConditions
    :: (MonadWU m)
    => Lat
    -> Lng
    -> m ObservationResponse
coordinateConditions lt lg = makeRequest "GET" path
  where
    path = "/geolookup/conditions/q/" <> showBS (lt ^. lat) <> "," <> showBS (lg ^. lng) <> ".json"


-------------------------------------------------------------------------------
coordinateConditions
    :: (MonadWU m)
    => Lat
    -> Lng
    -> m ObservationResponse
coordinateConditions lt lg = makeRequest "GET" path
  where
    path = "/geolookup/conditions/q/" <> showBS (lt ^. lat) <> "," <> showBS (lg ^. lng) <> ".json"


-------------------------------------------------------------------------------
coordinateConditions lt lg = makeRequest "GET" path
  where
    path = "/geolookup/conditions/q/" <> showBS (lt ^. lat) <> "," <> showBS (lg ^. lng) <> ".json"


-------------------------------------------------------------------------------