2013-10-24 20:12:56 -07:00
|
|
|
|
Set: pp::colors
|
|
|
|
|
Set: pp::unicode
|
2014-01-01 13:52:25 -08:00
|
|
|
|
Imported 'Int'
|
2013-10-24 20:12:56 -07:00
|
|
|
|
Assumed: g
|
|
|
|
|
Assumed: a
|
|
|
|
|
Assumed: b
|
|
|
|
|
Assumed: H1
|
|
|
|
|
Assumed: H2
|
|
|
|
|
Proved: T1
|
2014-01-05 12:05:08 -08:00
|
|
|
|
axiom H2 : g a > 0
|
2014-01-05 19:10:21 -08:00
|
|
|
|
theorem T1 : g b > 0 := substp (λ x : ℤ, g x > 0) H2 H1
|