module F = Format
module Allocsite : sig ... end
module Loc : sig ... end
module PowLoc : sig ... end