1
(************************************************************************)
2
(* v * The Coq Proof Assistant / The Coq Development Team *)
3
(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *)
4
(* \VV/ **************************************************************)
5
(* // * This file is distributed under the terms of the *)
6
(* * GNU Lesser General Public License Version 2.1 *)
7
(************************************************************************)
9
(*i $Id: prettyp.mli 11576 2008-11-10 19:13:15Z msozeau $ i*)
23
(* A Pretty-Printer for the Calculus of Inductive Constructions. *)
25
val assumptions_for_print : name list -> Termops.names_context
27
val print_closed_sections : bool ref
28
val print_impl_args : Impargs.implicits_list -> std_ppcmds
29
val print_context : bool -> int option -> Lib.library_segment -> std_ppcmds
30
val print_library_entry : bool -> (object_name * Lib.node) -> std_ppcmds option
31
val print_full_context : unit -> std_ppcmds
32
val print_full_context_typ : unit -> std_ppcmds
33
val print_full_pure_context : unit -> std_ppcmds
34
val print_sec_context : reference -> std_ppcmds
35
val print_sec_context_typ : reference -> std_ppcmds
36
val print_judgment : env -> unsafe_judgment -> std_ppcmds
37
val print_safe_judgment : env -> Safe_typing.judgment -> std_ppcmds
39
reduction_function -> env -> Evd.evar_map -> Topconstr.constr_expr -> unsafe_judgment -> std_ppcmds
40
(* This function is exported for the graphical user-interface pcoq *)
41
val build_inductive : mutual_inductive -> int ->
42
global_reference * rel_context * types * identifier array * types array
43
val print_name : reference -> std_ppcmds
44
val print_opaque_name : reference -> std_ppcmds
45
val print_about : reference -> std_ppcmds
46
val print_impargs : reference -> std_ppcmds
49
val print_extracted_name : identifier -> std_ppcmds
50
val print_extraction : unit -> std_ppcmds
51
val print_extracted_vars : unit -> std_ppcmds
54
(* Pretty-printing functions for classes and coercions *)
55
val print_graph : unit -> std_ppcmds
56
val print_classes : unit -> std_ppcmds
57
val print_coercions : unit -> std_ppcmds
58
val print_path_between : Classops.cl_typ -> Classops.cl_typ -> std_ppcmds
59
val print_canonical_projections : unit -> std_ppcmds
61
(* Pretty-printing functions for type classes and instances *)
62
val print_typeclasses : unit -> std_ppcmds
63
val print_instances : global_reference -> std_ppcmds
64
val print_all_instances : unit -> std_ppcmds
66
val inspect : int -> std_ppcmds
69
val print_located_qualid : reference -> std_ppcmds
72
print_inductive : mutual_inductive -> std_ppcmds;
73
print_constant_with_infos : constant -> std_ppcmds;
74
print_section_variable : variable -> std_ppcmds;
75
print_syntactic_def : kernel_name -> std_ppcmds;
76
print_module : bool -> Names.module_path -> std_ppcmds;
77
print_modtype : module_path -> std_ppcmds;
78
print_named_decl : identifier * constr option * types -> std_ppcmds;
79
print_leaf_entry : bool -> Libnames.object_name * Libobject.obj -> Pp.std_ppcmds;
80
print_library_entry : bool -> (object_name * Lib.node) -> std_ppcmds option;
81
print_context : bool -> int option -> Lib.library_segment -> std_ppcmds;
82
print_typed_value_in_env : Environ.env -> Term.constr * Term.types -> Pp.std_ppcmds;
83
print_eval : reduction_function -> env -> Evd.evar_map -> Topconstr.constr_expr -> unsafe_judgment -> std_ppcmds
86
val set_object_pr : object_pr -> unit
87
val default_object_pr : object_pr