Common.Util
val compose : ('a -> 'b) -> ('c -> 'a) -> 'c -> 'b
val get_or_else : 'a option -> (unit -> 'a) -> 'a
val or_else : (unit -> 'a) -> 'a option -> 'a
module IntMap : sig ... end
module IntSet : sig ... end
module StringMap : sig ... end