57c0006916
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
11 lines
304 B
Text
11 lines
304 B
Text
set_option pp::colors false
|
|
variable N : Type
|
|
variables a b c : N
|
|
variables P : N -> N -> N -> Bool
|
|
|
|
set_opaque exists false.
|
|
set_opaque not false.
|
|
|
|
theorem T1 (f : N -> N) (H : P (f a) b (f (f c))) : exists x y z, P x y z := exists_intro _ (exists_intro _ (exists_intro _ H))
|
|
|
|
print environment 1.
|