sig
  module type VarUsage =
    sig
      val datatype : string
      val param : Cil_types.varinfo -> MemoryContext.param
      val hypotheses : unit -> MemoryContext.clause list
    end
  module Make : functor (V : VarUsage) (M : Sigs.Model-> Sigs.Model
end