New version(s) of hint. One more stable (hint) and one more experimental

[helm.git] / helm / ocaml / tactics / metadataQuery.mli

diff --git a/helm/ocaml/tactics/metadataQuery.mli b/helm/ocaml/tactics/metadataQuery.mli
index f7a08d31f26eec7f8fad57b785ea4d1b23561318..b3b506de96a4e7f15ba87629300b974a0837aa3c 100644 (file)
--- a/helm/ocaml/tactics/metadataQuery.mli
+++ b/helm/ocaml/tactics/metadataQuery.mli
@@ -31,9 +31,20 @@ val locate:
 
 val hint:
   dbd:Mysql.dbd ->
+  ?facts:bool ->
   ?signature:MetadataConstraints.term_signature ->
   ProofEngineTypes.status ->
-    (string * (ProofEngineTypes.proof * ProofEngineTypes.goal list)) list
+    (string * 
+       (ProofEngineTypes.proof * ProofEngineTypes.goal list)) list
+
+val experimental_hint:
+  dbd:Mysql.dbd ->
+  ?facts:bool ->
+  ?signature:MetadataConstraints.term_signature ->
+  ProofEngineTypes.status ->
+    (string * 
+     ((Cic.term -> Cic.term) *
+       (ProofEngineTypes.proof * ProofEngineTypes.goal list))) list
 
 val match_term: dbd:Mysql.dbd -> Cic.term -> string list