7 lines
160 B
Plaintext
7 lines
160 B
Plaintext
$newline never
|
|
$case bonusRule
|
|
$of ExamBonusPoints ps False _
|
|
_{MsgExamBonusPoints ps}
|
|
$of ExamBonusPoints ps True _
|
|
_{MsgExamBonusPointsPassed ps}
|