{-# LANGUAGE DeriveGeneric #-} module Model.Json.Number ( Number(..) ) where import Data.Aeson import GHC.Generics data Number = Number { number :: Int } deriving (Show, Generic) instance FromJSON Number instance ToJSON Number