lean2/tests/lean/exists7.lean
Leonardo de Moura 048151487e feat(kernel): use Pi as forall/implication
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-01-08 00:38:39 -08:00

11 lines
310 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.