{-# LANGUAGE DeriveAnyClass #-}{-# LANGUAGE DeriveGeneric #-}moduleWeb.OpenWeatherMap.Types.Weather(Weather(..))whereimportGHC.Generics(Generic)importData.Aeson(FromJSON)dataWeather=Weather{id::Int,main::String,description::String,icon::String}deriving(Show,Generic,FromJSON)