blob: 4aabf19c985dee87d7a8363a00b0f5919c9e81b5 (
plain)
1
2
3
4
5
6
7
8
9
10
|
Goal forall B C : nat -> nat -> Prop, forall k, C 0 k ->
(exists A, (forall k', C A k' -> B A k') -> B A k).
Proof.
intros B C k H.
econstructor.
intros X.
apply X.
apply H.
Qed.
|