diff options
| author |  Samuel Mimram <smimram@debian.org> | 2006-11-21 21:38:49 +0000 |
|---|---|---|
| committer | Samuel Mimram <smimram@debian.org> | 2006-11-21 21:38:49 +0000 |
| commit | 208a0f7bfa5249f9795e6e225f309cbe715c0fad (patch) | |
| tree | 591e9e512063e34099782e2518573f15ffeac003 /tactics/equality.mli | |
| parent | de0085539583f59dc7c4bf4e272e18711d565466 (diff) | |
Imported Upstream version 8.1~gammaupstream/8.1.gamma
Diffstat (limited to 'tactics/equality.mli')
| -rw-r--r-- | tactics/equality.mli | 26 |
1 files changed, 14 insertions, 12 deletions
diff --git a/tactics/equality.mli b/tactics/equality.mli index 9ee565c5..3d6a08b6 100644 --- a/tactics/equality.mli +++ b/tactics/equality.mli @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(*i $Id: equality.mli 8780 2006-05-02 21:58:58Z letouzey $ i*) +(*i $Id: equality.mli 9195 2006-10-01 09:41:57Z herbelin $ i*) (*i*) open Names @@ -22,6 +22,7 @@ open Tacticals open Tactics open Tacexpr open Rawterm +open Genarg (*i*) val general_rewrite_bindings : bool -> constr with_bindings -> tactic @@ -50,19 +51,21 @@ val conditional_rewrite : bool -> tactic -> constr with_bindings -> tactic val conditional_rewrite_in : bool -> identifier -> tactic -> constr with_bindings -> tactic +val replace_in_clause_maybe_by : constr -> constr -> clause -> tactic option -> tactic val replace : constr -> constr -> tactic val replace_in : identifier -> constr -> constr -> tactic -val replace_by : constr -> constr -> tactic -> tactic -val replace_in_by : identifier -> constr -> constr -> tactic -> tactic -val new_replace : constr -> constr -> identifier option -> tactic option -> tactic +val replace_by : constr -> constr -> tactic -> tactic +val replace_in_by : identifier -> constr -> constr -> tactic -> tactic + val discr : identifier -> tactic val discrConcl : tactic val discrClause : clause -> tactic val discrHyp : identifier -> tactic val discrEverywhere : tactic val discr_tac : quantified_hypothesis option -> tactic -val inj : identifier -> tactic -val injClause : quantified_hypothesis option -> tactic +val inj : intro_pattern_expr list -> identifier -> tactic +val injClause : intro_pattern_expr list -> quantified_hypothesis option -> + tactic val dEq : quantified_hypothesis option -> tactic val dEqThen : (int -> tactic) -> quantified_hypothesis option -> tactic @@ -111,9 +114,8 @@ val subst : identifier list -> tactic val subst_all : tactic (* Replace term *) -val replace_term_left : constr -> tactic -val replace_term_right : constr -> tactic -val replace_term : constr -> tactic -val replace_term_in_left : constr -> identifier -> tactic -val replace_term_in_right : constr -> identifier -> tactic -val replace_term_in : constr -> identifier -> tactic +(* [replace_multi_term dir_opt c cl] + perfoms replacement of [c] by the first value found in context + (according to [dir] if given to get the rewrite direction) in the clause [cl] +*) +val replace_multi_term : bool option -> constr -> clause -> tactic |