test-suite/ssr/ipat_replace.v


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

Require Import ssreflect.

Lemma test : True.
Proof.
have H : True.
  by [].
have {}H : True.
  by apply: H.
by apply: H.
Qed.

Lemma test2 (H : True) : False -> False -> False.
Proof.
move=> {}W.
move=> {}H.
by apply: H.
Qed.