diff options
| author | Pierre-Marie Pédrot | 2017-09-26 17:52:34 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2017-09-26 17:52:34 +0200 |
| commit | 3f734c5f5338feb491a6ca021e8b5a578f95c88b (patch) | |
| tree | 30f0f0c2e5eba9f1607bc38150b63b9c52b64918 /tests/example2.v | |
| parent | 67851196e552948da9960fe32e9e9f628b349ee1 (diff) | |
Slightly more straightforward notation for (e)apply.
Diffstat (limited to 'tests/example2.v')
| -rw-r--r-- | tests/example2.v | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/example2.v b/tests/example2.v index a21f3a7f4e..378abb86a8 100644 --- a/tests/example2.v +++ b/tests/example2.v @@ -44,6 +44,13 @@ apply &H with (m := 0). split. Qed. +Goal forall (P : nat -> Prop), (forall n m, n = m -> P n) -> (0 = 1) -> P 0. +Proof. +intros P H e. +apply &H with (m := 1) in e. +exact e. +Qed. + Goal forall (P : nat -> Prop), (forall n m, n = m -> P n) -> P 0. Proof. intros P H. |