diff options
Diffstat (limited to 'proofs/miscprint.mli')
-rw-r--r-- | proofs/miscprint.mli | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/proofs/miscprint.mli b/proofs/miscprint.mli new file mode 100644 index 00000000..79790a27 --- /dev/null +++ b/proofs/miscprint.mli @@ -0,0 +1,39 @@ +(************************************************************************) +(* * The Coq Proof Assistant / The Coq Development Team *) +(* v * INRIA, CNRS and contributors - Copyright 1999-2018 *) +(* <O___,, * (see CREDITS file for the list of authors) *) +(* \VV/ **************************************************************) +(* // * This file is distributed under the terms of the *) +(* * GNU Lesser General Public License Version 2.1 *) +(* * (see LICENSE file for the text of the license) *) +(************************************************************************) + +open Misctypes + +(** Printing of [intro_pattern] *) + +val pr_intro_pattern : + ('a -> Pp.t) -> 'a intro_pattern_expr CAst.t -> Pp.t + +val pr_or_and_intro_pattern : + ('a -> Pp.t) -> 'a or_and_intro_pattern_expr -> Pp.t + +val pr_intro_pattern_naming : intro_pattern_naming_expr -> Pp.t + +(** Printing of [move_location] *) + +val pr_move_location : + ('a -> Pp.t) -> 'a move_location -> Pp.t + +val pr_bindings : + ('a -> Pp.t) -> + ('a -> Pp.t) -> 'a bindings -> Pp.t + +val pr_bindings_no_with : + ('a -> Pp.t) -> + ('a -> Pp.t) -> 'a bindings -> Pp.t + +val pr_with_bindings : + ('a -> Pp.t) -> + ('a -> Pp.t) -> 'a * 'a bindings -> Pp.t + |