module Abstract_location: sig .. end
sig
end
module type S = sig .. end
type 'a key = 'a Structure.Key_Location.k
'a
'a Structure.Key_Location.k
type 'a structure = 'a Structure.Key_Location.structure
'a Structure.Key_Location.structure
module type Internal = sig .. end
module type External = sig .. end