module School (School, add, empty, grade, sorted) where

data School = Dummy

add :: Int -> String -> School -> School
add gradeNum student school = undefined

empty :: School
empty = undefined

grade :: Int -> School -> [String]
grade gradeNum school = undefined

sorted :: School -> [(Int, [String])]
sorted school = undefined