c56df132b8
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
9 lines
247 B
Text
9 lines
247 B
Text
Set: pp::colors
|
||
Set: pp::unicode
|
||
Imported 'tactic'
|
||
Assumed: f
|
||
Assumed: Ax1
|
||
Assumed: Ax2
|
||
Proved: T1
|
||
theorem T1 (a : ℕ) : f (f a > 0) :=
|
||
eqt_elim (trans (trans (congr2 f (congr1 0 (congr2 Nat::gt (Ax2 a)))) (Ax1 ⊥)) not_false)
|