module Map: sig .. end
sig
end
include Map.S
val dom : 'a Assemblage.Part.t -> Assemblage.Part.Set.t
'a Assemblage.Part.t -> Assemblage.Part.Set.t
dom m
m