define pyk of lemma base(1/2)Sum exact bound base as text unicode start of text unicode small l unicode small e unicode small m unicode small m unicode small a unicode space unicode small b unicode small a unicode small s unicode small e unicode left parenthesis unicode one unicode slash unicode two unicode right parenthesis unicode capital s unicode small u unicode small m unicode space unicode small e unicode small x unicode small a unicode small c unicode small t unicode space unicode small b unicode small o unicode small u unicode small n unicode small d unicode space unicode small b unicode small a unicode small s unicode small e unicode end of text end unicode text end text end define
define tex of lemma base(1/2)Sum exact bound base as text unicode start of text unicode capital b unicode capital s unicode small b unicode small o unicode small u unicode small n unicode small d unicode left parenthesis unicode capital e unicode small x unicode small a unicode small c unicode small t unicode right parenthesis unicode left parenthesis unicode capital b unicode small a unicode small s unicode small e unicode right parenthesis unicode end of text end unicode text end text end define
define statement of lemma base(1/2)Sum exact bound base as system Q infer all metavar var m end metavar indeed base(1/2)Sum( metavar var m end metavar + 1 , 0 ) + 1/ 1 + 1 ^ metavar var m end metavar + 1 + 0 = 1/ 1 + 1 ^ metavar var m end metavar end define
define proof of lemma base(1/2)Sum exact bound base as lambda var c dot lambda var x dot proof expand quote system Q infer all metavar var m end metavar indeed lemma base(1/2)Sum zero exact conclude base(1/2)Sum( metavar var m end metavar + 1 , 0 ) = 1/ 1 + 1 ^ metavar var m end metavar + 1 cut lemma exp(+1) conclude 1/ 1 + 1 ^ metavar var m end metavar + 1 = 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar cut lemma eqTransitivity modus ponens base(1/2)Sum( metavar var m end metavar + 1 , 0 ) = 1/ 1 + 1 ^ metavar var m end metavar + 1 modus ponens 1/ 1 + 1 ^ metavar var m end metavar + 1 = 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar conclude base(1/2)Sum( metavar var m end metavar + 1 , 0 ) = 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar cut axiom plus0 conclude metavar var m end metavar + 1 + 0 = metavar var m end metavar + 1 cut lemma sameExp modus ponens metavar var m end metavar + 1 + 0 = metavar var m end metavar + 1 conclude 1/ 1 + 1 ^ metavar var m end metavar + 1 + 0 = 1/ 1 + 1 ^ metavar var m end metavar + 1 cut lemma eqTransitivity modus ponens 1/ 1 + 1 ^ metavar var m end metavar + 1 + 0 = 1/ 1 + 1 ^ metavar var m end metavar + 1 modus ponens 1/ 1 + 1 ^ metavar var m end metavar + 1 = 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar conclude 1/ 1 + 1 ^ metavar var m end metavar + 1 + 0 = 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar cut lemma addEquations modus ponens base(1/2)Sum( metavar var m end metavar + 1 , 0 ) = 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar modus ponens 1/ 1 + 1 ^ metavar var m end metavar + 1 + 0 = 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar conclude base(1/2)Sum( metavar var m end metavar + 1 , 0 ) + 1/ 1 + 1 ^ metavar var m end metavar + 1 + 0 = 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar + 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar cut lemma (1/2)x+(1/2)x=x conclude 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar + 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar = 1/ 1 + 1 ^ metavar var m end metavar cut lemma eqTransitivity modus ponens base(1/2)Sum( metavar var m end metavar + 1 , 0 ) + 1/ 1 + 1 ^ metavar var m end metavar + 1 + 0 = 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar + 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar modus ponens 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar + 1/ 1 + 1 * 1/ 1 + 1 ^ metavar var m end metavar = 1/ 1 + 1 ^ metavar var m end metavar conclude base(1/2)Sum( metavar var m end metavar + 1 , 0 ) + 1/ 1 + 1 ^ metavar var m end metavar + 1 + 0 = 1/ 1 + 1 ^ metavar var m end metavar end quote state proof state cache var c end expand end define
The pyk compiler, version 0.grue.20060417+ by Klaus Grue,