(* *)
(***************************************************************************)
-val nmml_of_cic_sequent:
- #NCicCoercion.status ->
- NCic.metasenv -> NCic.substitution -> (* metasenv, substitution *)
- int * NCic.conjecture -> (* sequent *)
- Gdome.document (* Math ML *)
+class status :
+ object
+ inherit Interpretations.status
+ inherit TermContentPres.status
+ end
val ntxt_of_cic_sequent:
- map_unicode_to_tex:bool -> int ->
- #NCicCoercion.status ->
+ map_unicode_to_tex:bool -> int -> #status ->
NCic.metasenv -> NCic.substitution -> (* metasenv, substitution *)
int * NCic.conjecture -> (* sequent *)
string (* text *)
-val nmml_of_cic_object: #NCicCoercion.status -> NCic.obj -> Gdome.document
-
val ntxt_of_cic_object:
- map_unicode_to_tex:bool -> int -> #NCicCoercion.status -> NCic.obj -> string
+ map_unicode_to_tex:bool -> int -> #status -> NCic.obj -> string