1 2 3 4 5 6 7 8 9 10 11
module Model.Message.Lang ( Lang(..) , lang ) where data Lang = English | French lang :: Lang lang = French