diff options
author | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-08-13 18:02:11 +0200 |
---|---|---|
committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-08-18 18:56:38 +0200 |
commit | 5c82bcd1f87cc893319f2553c81a73c69b13b54d (patch) | |
tree | 83ca001f700b5fdb48d0fac8e249c08c589a1d15 /tactics/elim.ml | |
parent | d5fece25d8964d5d9fcd55b66164286aeef5fb9f (diff) |
Reorganisation of intropattern code
- emphasizing the different kinds of patterns
- factorizing code of the non-naming intro-patterns
Still some questions:
- Should -> and <- apply to hypotheses or not (currently they apply to
hypotheses either when used in assert-style tactics or apply in, or
when the term to rewrite is a variable, in which case "subst" is
applied)?
- Should "subst" be used when the -> or <- rewrites an equation x=t
posed by "assert" (i.e. rewrite everywhere and clearing x and hyp)?
- Should -> and <- be applicable in non assert-style if the lemma has
quantifications?
Diffstat (limited to 'tactics/elim.ml')
-rw-r--r-- | tactics/elim.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/elim.ml b/tactics/elim.ml index 2a7b3bff1..2bedf2a4c 100644 --- a/tactics/elim.ml +++ b/tactics/elim.ml @@ -41,7 +41,7 @@ let introCaseAssumsThen tac ba = (ba.Tacticals.branchnames, []), if n1 > n2 then snd (List.chop n2 case_thin_sign) else [] in let introCaseAssums = - tclTHEN (intros_pattern MoveLast l1) (intros_clearing l3) in + tclTHEN (intro_patterns l1) (intros_clearing l3) in (tclTHEN introCaseAssums (case_on_ba (tac l2) ba)) (* The following tactic Decompose repeatedly applies the |