{-# LANGUAGE TemplateHaskell #-} module ~{moduleName m}Client.~{enumName e} where import qualified Data.Aeson.TH as AT data ~{enumName e} = ~{intercalate " | " $ enumValues e} deriving (Show, Eq, Ord, Read) $(AT.deriveJSON AT.defaultOptions ''~{enumName e})