parameter sintax added to axiom statement

[helm.git] / helm / software / components / ng_kernel / nCicPp.mli

diff --git a/helm/software/components/ng_kernel/nCicPp.mli b/helm/software/components/ng_kernel/nCicPp.mli
index 3aa3c027d34d3f91b7876cf90cea0aa0905b0b64..a01895678c0535b655ac4a3c7026d58cc616dd3d 100644 (file)
--- a/helm/software/components/ng_kernel/nCicPp.mli
+++ b/helm/software/components/ng_kernel/nCicPp.mli
@@ -1 +1,70 @@
-val ppterm: NCic.term -> string
+(*
+    ||M||  This file is part of HELM, an Hypertextual, Electronic        
+    ||A||  Library of Mathematics, developed at the Computer Science     
+    ||T||  Department, University of Bologna, Italy.                     
+    ||I||                                                                
+    ||T||  HELM is free software; you can redistribute it and/or         
+    ||A||  modify it under the terms of the GNU General Public License   
+    \   /  version 2 or (at your option) any later version.      
+     \ /   This software is distributed as is, NO WARRANTY.     
+      V_______________________________________________________________ *)
+
+(* $Id$ *)
+
+val set_head_beta_reduce: (upto:int -> NCic.term -> NCic.term) -> unit
+val set_get_obj: (NUri.uri -> NCic.obj) -> unit
+
+val r2s: bool -> NReference.reference -> string
+
+val ppterm: 
+  context:NCic.context -> 
+  subst:NCic.substitution -> 
+  metasenv:NCic.metasenv ->
+  ?margin:int ->
+  ?inside_fix:bool ->
+   NCic.term -> string
+
+val ppcontext:
+  ?sep:string ->
+  subst:NCic.substitution -> 
+  metasenv:NCic.metasenv ->
+  NCic.context -> string 
+
+val ppmetasenv:
+  subst:NCic.substitution -> NCic.metasenv -> string
+
+val ppsubst:
+ metasenv:NCic.metasenv -> ?use_subst:bool -> NCic.substitution -> string
+
+val ppobj: NCic.obj -> string
+
+(* variants that use a formatter 
+module Format : sig
+  val ppterm: 
+    formatter:Format.formatter ->
+    context:NCic.context -> 
+    subst:NCic.substitution -> 
+    metasenv:NCic.metasenv ->
+    ?margin:int ->
+    ?inside_fix:bool ->
+     NCic.term -> unit
+  
+  val ppcontext:
+    ?sep:string ->
+    formatter:Format.formatter ->
+    subst:NCic.substitution -> 
+    metasenv:NCic.metasenv ->
+    NCic.context -> unit 
+  
+  val ppmetasenv:
+    formatter:Format.formatter ->
+    subst:NCic.substitution -> NCic.metasenv -> unit
+  
+  val ppsubst: 
+    formatter:Format.formatter ->
+    metasenv:NCic.metasenv -> NCic.substitution -> unit
+  
+  val ppobj: 
+    formatter:Format.formatter -> NCic.obj -> unit
+end
+*)