{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE StrictData #-}
module Dodge.Data.Gas where
import GHC.Generics
import Data.Aeson
data GasCreate = CreatePoisonGas | CreateFlame
  deriving (Eq,Ord,Show,Enum,Bounded,Read,Generic)
instance ToJSON GasCreate  where
    toEncoding = genericToEncoding defaultOptions
instance FromJSON GasCreate