{-|
Module: Model.Types.Exam
Description: Types for modeling Exams
-}
module Model.Types.Exam
  ( module Model.Types.Exam
  ) where

import Import.NoModel

import Database.Persist.TH (derivePersistField)


data ExamStatus = Attended | NoShow | Voided
  deriving (Show, Read, Eq, Ord, Enum, Bounded, Generic)
derivePersistField "ExamStatus"
