val pop: unit -> unit
*)
+(*
val nast_of_cic :
- subst:NCic.substitution -> context:NCic.context -> NCic.term ->
- CicNotationPt.term
+ output_type:[`Pattern | `Term ] ->
+ subst:NCic.substitution -> context:NCic.context -> NCic.term ->
+ CicNotationPt.term
+*)
val nmap_sequent : subst:NCic.substitution -> int * NCic.conjecture -> CicNotationPt.term Content.conjecture