parameter sintax added to axiom statement

[helm.git] / helm / software / components / tactics / statefulProofEngine.mli

diff --git a/helm/software/components/tactics/statefulProofEngine.mli b/helm/software/components/tactics/statefulProofEngine.mli
index 4198876ca239b4e191395fbac58efc788b0801d9..06defd79fcead87272be0850c48ad067679c5de1 100644 (file)
--- a/helm/software/components/tactics/statefulProofEngine.mli
+++ b/helm/software/components/tactics/statefulProofEngine.mli
@@ -62,7 +62,8 @@ exception Data_failure of exn
 class ['a] status:
   ?history_size:int ->  (** default 20 *)
   ?uri:UriManager.uri ->
-  typ:Cic.term -> body:Cic.term -> metasenv:Cic.metasenv ->
+  typ:Cic.term -> body:Cic.term Lazy.t -> metasenv:Cic.metasenv ->
+  attrs:Cic.attribute list ->
   (proof_status -> 'a) -> (* init data *)
   (proof_status * 'a -> proof_status -> 'a) ->  (* update data *)
   unit ->
@@ -70,8 +71,9 @@ class ['a] status:
 
     method proof: ProofEngineTypes.proof
     method metasenv: Cic.metasenv
-    method body: Cic.term
+    method body: Cic.term Lazy.t
     method typ: Cic.term
+    method attrs: Cic.attribute list
 
     (** change metasenv _without_ triggering any notification *)
     method set_metasenv: Cic.metasenv -> unit
@@ -114,7 +116,8 @@ class ['a] status:
 
 val trivial_status:
   ?uri:UriManager.uri ->
-  typ:Cic.term -> body:Cic.term -> metasenv:Cic.metasenv ->
+  typ:Cic.term -> body:Cic.term Lazy.t -> metasenv:Cic.metasenv ->
+  attrs:Cic.attribute list ->
   unit ->
     unit status