X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Ftactics%2FreductionTactics.mli;h=dbec3fb72b0d9532b2fa016bd7737749c62dd573;hb=d1126c6b78a3333bbf415daf027004496b77c2f4;hp=56b80c06a6a2256fbfdf6f5aee5ce53ff235aa4a;hpb=0b082b38f60079c8d457790c3ee18c2a9ab415eb;p=helm.git

diff --git a/helm/ocaml/tactics/reductionTactics.mli b/helm/ocaml/tactics/reductionTactics.mli
index 56b80c06a..dbec3fb72 100644
--- a/helm/ocaml/tactics/reductionTactics.mli
+++ b/helm/ocaml/tactics/reductionTactics.mli
@@ -23,17 +23,25 @@
  * http://cs.unibo.it/helm/.
  *)
 
-(* The default of term is the thesis of the goal to be prooved *)
 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
+
+(* The default of term is the thesis of the goal to be prooved *)
 val unfold_tac:
- Cic.term option -> pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
+  ProofEngineTypes.lazy_term option ->
+  pattern:ProofEngineTypes.pattern ->
+    ProofEngineTypes.tactic
 
 val change_tac:
-  pattern:ProofEngineTypes.pattern -> Cic.term -> ProofEngineTypes.tactic 
+  pattern:ProofEngineTypes.pattern ->
+  ProofEngineTypes.lazy_term ->
+    ProofEngineTypes.tactic 
 
 val fold_tac:
- reduction:(Cic.context -> Cic.term -> Cic.term) -> term:Cic.term ->
- pattern:ProofEngineTypes.pattern -> ProofEngineTypes.tactic
+ reduction:ProofEngineTypes.lazy_reduction ->
+ term:ProofEngineTypes.lazy_term ->
+ pattern:ProofEngineTypes.pattern ->
+   ProofEngineTypes.tactic
+