Parameter Make.1-Ident

type t
val compare : t -> t -> int
val subst : Mod_subst.substitution -> t -> t

how to substitute them for storage

val constr_of : t -> Constr.constr

how to recover the term from the identifier