Parameter Hashcons._

type t = M.t
val hcons : t Hashcons.f