type t val modes : string val create : string -> t val lookup : string -> t