diff options
| author | Théo Zimmermann | 2019-05-25 18:05:29 +0200 |
|---|---|---|
| committer | Théo Zimmermann | 2019-05-25 18:05:29 +0200 |
| commit | 9241a6e25ff132a27762963b06ae1095c783c25f (patch) | |
| tree | db5d944a60f3d211191f10d3caa3b716af80d6ee /plugins/micromega | |
| parent | 5727443376480be4793757fd5507621ad4f09509 (diff) | |
| parent | 71110a218f69a69010adde2f296e4022ef94b755 (diff) | |
Merge PR #9288: Giving preference to syntax "injection ... as [= pat1 ... patn]".
Reviewed-by: Zimmi48
Diffstat (limited to 'plugins/micromega')
| -rw-r--r-- | plugins/micromega/EnvRing.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/micromega/EnvRing.v b/plugins/micromega/EnvRing.v index 36ed0210e3..b20f45af3e 100644 --- a/plugins/micromega/EnvRing.v +++ b/plugins/micromega/EnvRing.v @@ -925,7 +925,7 @@ Qed. revert P1. induction LM1 as [|(M2,P2') LM2 IH]; simpl; intros. - discriminate. - assert (H':=PNSubst_ok n P3 M2 P2'). destruct PNSubst. - * injection H as <-. rewrite <- PSubstL1_ok; intuition. + * injection H as [= <-]. rewrite <- PSubstL1_ok; intuition. * now apply IH. Qed. |