'status * cic_term * cic_term (* status, term, type *)
val apply_subst:
#pstatus as 'status -> NCic.context -> cic_term -> 'status * cic_term
'status * cic_term * cic_term (* status, term, type *)
val apply_subst:
#pstatus as 'status -> NCic.context -> cic_term -> 'status * cic_term
[ `Decl of cic_term | `Def of cic_term ] ->
'status * cic_term
val instantiate: #pstatus as 'status -> int -> cic_term -> 'status
[ `Decl of cic_term | `Def of cic_term ] ->
'status * cic_term
val instantiate: #pstatus as 'status -> int -> cic_term -> 'status