prima implementazione di demodulate, superposition_left e superposition_right

[helm.git] / helm / ocaml / cic_transformations / cicAst.mli

diff --git a/helm/ocaml/cic_transformations/cicAst.mli b/helm/ocaml/cic_transformations/cicAst.mli
index 8abd4f3c9d571e36624cb62136cfec18b800e9a7..89f8907fa32fe45648996bffc44146697a147a11 100644 (file)
--- a/helm/ocaml/cic_transformations/cicAst.mli
+++ b/helm/ocaml/cic_transformations/cicAst.mli
@@ -26,6 +26,7 @@
 (** {2 Parsing related types} *)
 
 type location = Lexing.position * Lexing.position
+val pp_location: location -> string
 
   (** maps old style (i.e. <= 3.07) lexer location to new style location,
   * padding with dummy values where needed *)
@@ -50,7 +51,6 @@ type term_attribute =
 
 type term =
   | AttributedTerm of term_attribute * term
-
   | Appl of term list
   | Binder of binder_kind * capture_variable * term (* kind, name, body *)
   | Case of term * string option * term option * (case_pattern * term) list