blob: 32c55f667be799c81f16342c091df272c0b4edda (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
Require Import Setoid.
Parameter P : nat -> Prop.
Parameter Q : nat -> Prop.
Parameter PQ : forall n, P n <-> Q n.
Lemma PQ2 : forall n, P n -> Q n.
intros.
rewrite PQ in H.
trivial.
Qed.
|