added support for goal patterns

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

diff --git a/helm/ocaml/tactics/tactics.mli b/helm/ocaml/tactics/tactics.mli
index 7b771249e6bf6d8cfeba903b2061e5f82cb5eaef..5eb66704f7fe61f2d76cc379709ef49c7e1ecc19 100644 (file)
--- a/helm/ocaml/tactics/tactics.mli
+++ b/helm/ocaml/tactics/tactics.mli
@@ -2,15 +2,17 @@
 val absurd : term:Cic.term -> ProofEngineTypes.tactic
 val apply : term:Cic.term -> ProofEngineTypes.tactic
 val assumption : ProofEngineTypes.tactic
-val auto : dbd:Mysql.dbd -> ProofEngineTypes.tactic
-val auto_new : dbd:Mysql.dbd -> ProofEngineTypes.tactic
+val auto : ?num:int option -> Mysql.dbd -> ProofEngineTypes.tactic
+val auto_new :
+  ?depth:int ->
+  ?width:int -> dbd:Mysql.dbd -> unit -> ProofEngineTypes.tactic
 val change : what:Cic.term -> with_what:Cic.term -> ProofEngineTypes.tactic
 val compare : term:Cic.term -> ProofEngineTypes.tactic
 val constructor : n:int -> ProofEngineTypes.tactic
 val contradiction : ProofEngineTypes.tactic
 val cut :
   ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
-  term:Cic.term -> ProofEngineTypes.tactic
+  Cic.term -> ProofEngineTypes.tactic
 val decide_equality : ProofEngineTypes.tactic
 val decompose :
   ?uris_choice_callback:((UriManager.uri * int *
@@ -22,6 +24,7 @@ val decompose :
   Cic.term -> ProofEngineTypes.tactic
 val discriminate : term:Cic.term -> ProofEngineTypes.tactic
 val elim_intros_simpl : term:Cic.term -> ProofEngineTypes.tactic
+val elim_intros : term:Cic.term -> ProofEngineTypes.tactic
 val elim_type : term:Cic.term -> ProofEngineTypes.tactic
 val exact : term:Cic.term -> ProofEngineTypes.tactic
 val exists : ProofEngineTypes.tactic
@@ -32,31 +35,40 @@ val fourier : ProofEngineTypes.tactic
 val generalize :
   ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
   Cic.term list -> ProofEngineTypes.tactic
+val set_goal : int -> ProofEngineTypes.tactic
 val injection : term:Cic.term -> ProofEngineTypes.tactic
 val intros :
+  ?howmany:int ->
   ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
   unit -> ProofEngineTypes.tactic
 val left : ProofEngineTypes.tactic
 val letin :
   ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
-  term:Cic.term -> ProofEngineTypes.tactic
-val reduce :
-  also_in_hypotheses:bool ->
-  terms:Cic.term list option -> ProofEngineTypes.tactic
+  Cic.term -> ProofEngineTypes.tactic
+val reduce : pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
 val reflexivity : ProofEngineTypes.tactic
 val replace : what:Cic.term -> with_what:Cic.term -> ProofEngineTypes.tactic
-val rewrite_back : term:Cic.term -> ProofEngineTypes.tactic
-val rewrite_back_simpl : term:Cic.term -> ProofEngineTypes.tactic
-val rewrite : term:Cic.term -> ProofEngineTypes.tactic
-val rewrite_simpl : term:Cic.term -> ProofEngineTypes.tactic
+val rewrite_back :
+  ?where:ProofEngineTypes.pattern ->
+  term:Cic.term -> unit -> ProofEngineTypes.tactic
+val rewrite_back_simpl :
+  ?where:ProofEngineTypes.pattern ->
+  term:Cic.term -> unit -> ProofEngineTypes.tactic
+val rewrite :
+  ?where:ProofEngineTypes.pattern ->
+  term:Cic.term -> unit -> ProofEngineTypes.tactic
+val rewrite_simpl :
+  ?where:ProofEngineTypes.pattern ->
+  term:Cic.term -> unit -> ProofEngineTypes.tactic
 val right : ProofEngineTypes.tactic
 val ring : ProofEngineTypes.tactic
-val simpl :
-  also_in_hypotheses:bool ->
-  terms:Cic.term list option -> ProofEngineTypes.tactic
+val simpl : pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
 val split : ProofEngineTypes.tactic
 val symmetry : ProofEngineTypes.tactic
 val transitivity : term:Cic.term -> ProofEngineTypes.tactic
-val whd :
-  also_in_hypotheses:bool ->
-  terms:Cic.term list option -> ProofEngineTypes.tactic
+val whd : pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
+val normalize : pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
+val fwd_simpl : hyp:Cic.name -> dbd:Mysql.dbd -> ProofEngineTypes.tactic
+val lapply :
+  ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
+  ?substs:(Cic.name * Cic.term) list -> Cic.term -> ProofEngineTypes.tactic