IK
Size: a a a
IK
data TypedGradeBlock = StringGradeBlock { grade_type :: String, string_grades :: [String] }
| IntGradeBlock { grade_type :: String, int_grades :: [Int] }
deriving (Show, Eq)
dvg = [StringGradeBlock "GCE" ["A","A*"], IntGradeBlock "USE" [1..10]]
invoke = map string_grades dvgmap ( string_grades || int_grades ) dvg
IK
IK
IK
MK
MK