New test.

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

diff --git a/helm/ocaml/tactics/reductionTactics.mli b/helm/ocaml/tactics/reductionTactics.mli
index e1b3f9107493fcb4ea4a47b1b88efcde4b4f987a..00d3e58900b2789f6ce895d826cffd57553cd00f 100644 (file)
--- a/helm/ocaml/tactics/reductionTactics.mli
+++ b/helm/ocaml/tactics/reductionTactics.mli
@@ -24,19 +24,11 @@
  *)
 
 (* The default of term is the thesis of the goal to be prooved *)
-val simpl_tac:
- also_in_hypotheses:bool -> terms:(Cic.term list option) ->
-  ProofEngineTypes.tactic
-val reduce_tac:
- also_in_hypotheses:bool -> terms:(Cic.term list option) ->
-  ProofEngineTypes.tactic
-val whd_tac:
- also_in_hypotheses:bool -> terms:(Cic.term list option) ->
-  ProofEngineTypes.tactic
-val normalize_tac:
- also_in_hypotheses:bool -> terms:(Cic.term list option) ->
-  ProofEngineTypes.tactic
+val simpl_tac: pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
+val reduce_tac: pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
+val whd_tac: pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
+val normalize_tac: pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
 
 val fold_tac:
- reduction:(Cic.context -> Cic.term -> Cic.term) ->
- also_in_hypotheses:bool -> term:Cic.term -> ProofEngineTypes.tactic
+ reduction:(Cic.context -> Cic.term -> Cic.term) -> term:Cic.term ->
+ pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic