lean2/tests/lean/exists7.lean

13 lines
323 B
Text
Raw Normal View History

SetOption pp::colors false
Variable N : Type
Variables a b c : N
Variables P : N -> N -> N -> Bool
SetOpaque forall false.
SetOpaque exists false.
SetOpaque not false.
Theorem T1 (f : N -> N) (H : P (f a) b (f (f c))) : exists x y z, P x y z := ExistsIntro _ (ExistsIntro _ (ExistsIntro _ H))
print Environment 1.