{-# LANGUAGE DeriveAnyClass #-}{-# LANGUAGE DeriveGeneric #-}moduleWeb.OpenWeatherMap.Types.Sys(Sys(..))whereimportGHC.Generics(Generic)importData.Aeson(FromJSON)dataSys=Sys{message::Double,country::MaybeString,sunrise::Int,sunset::Int}deriving(Show,Generic,FromJSON)