diff options
| author | Erik Martin-Dorel | 2019-04-16 03:18:03 +0200 |
|---|---|---|
| committer | Erik Martin-Dorel | 2019-04-23 20:22:41 +0200 |
| commit | 92e2bb2bebc99b6a72ea0babad9a1c374129a0c0 (patch) | |
| tree | dfde6ab328fa036dc62398489bb8b33f1aa8f8ad /test-suite/ssr | |
| parent | 36488400952da5e12c8af451b1a936a34b26039d (diff) | |
[ssr] set under's tactic argument at LEVEL 3
So if the underlying tactic "contains a ;" one should actually write:
under eq_bigl => i do [rewrite andb_idl; first by move/eqP->].
Diffstat (limited to 'test-suite/ssr')
| -rw-r--r-- | test-suite/ssr/under.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test-suite/ssr/under.v b/test-suite/ssr/under.v index 84f6b9ad03..f285ad138b 100644 --- a/test-suite/ssr/under.v +++ b/test-suite/ssr/under.v @@ -175,7 +175,7 @@ Qed. Lemma test_big_andb (F : nat -> nat) (m n : nat) : \sum_(0 <= i < 5 | odd i && (i == 1)) i = 1. Proof. -under eq_bigl => i do rewrite andb_idl; first by move/eqP->. +under eq_bigl => i do [rewrite andb_idl; first by move/eqP->]. under eq_bigr => i do move/eqP=>{1}->. (* the 2nd occ should not be touched *) myadmit. Qed. |