module Model.Message.Lang
  ( Lang(..)
  , lang
  ) where

data Lang =
  English
  | French

lang :: Lang
lang = French