Sha256: 81ca86248c1c9b7ead1104ecdb8087c342d97b432a5138be7ee149463dea5c4e
Contents?: true
Size: 416 Bytes
Versions: 156
Compression:
Stored size: 416 Bytes
Contents
module GradeSchool let empty = Map.empty<int, string list> let add student grade school = match Map.tryFind grade school with | Some existing -> Map.add grade (student :: existing |> List.sort) school | None -> Map.add grade [student] school let roster school = Map.toList school let grade number school = match Map.tryFind number school with | Some students -> students | None -> []
Version data entries
156 entries across 156 versions & 1 rubygems