Logiweb(TM)

Logiweb aspects of Mend1.48d in pyk

Up Help

The "pyk" aspect

Define pyk of Mend1.48d as "Mend1.48d" end define

The "proof/kg" aspect

define proof of Mend1.48d as \ p . \ c . taceval ( quote Line L01 : Premise >> Prop ; All #h : All #x : Line L03 : Mend1.8 >> ff imply ff ; Line L04 : Def ponens L03 >> not ff ; Line L05 : A1' ponens L04 >> { not not #x } imply not ff ; Line L06 : { MP ponens Mend1.47d } ponens L05 >> ff imply not #x ; Line L07 : A1' ponens L06 >> #h imply { ff imply not #x } ; Line L08 : { MP ponens A2 } ponens L07 >> { #h imply ff } imply { #h imply not #x } ; Line L09 : Def ponens L08 >> { not #h } imply { #h imply not #x } ; Line L10 : Mend1.11b >> { #h imply not #x } imply not not { #h imply not #x } ; Line L11 : { Mend1.47b ponens L09 } ponens L10 >> { not #h } imply not not { #h imply not #x } ; Line L12 : { MP ponens Mend1.47d } ponens L11 >> { not { #h imply not #x } } imply #h ; { { Def ponens L12 } conclude { { #h and #x } imply #h } } end quote , tacstate0 , c ) end define

The "unitac/kg" aspect

define unitac of Mend1.48d as \ u . unitac-lemma ( u ) end define

The "statement/kg" aspect

define statement of Mend1.48d as Prop infer All #h : All #x : { { #h and #x } imply #h } end define

The pyk compiler, version 0.1.9 by Klaus Grue,
GRD-2007-07-12.UTC:20:13:13.678589 = MJD-54293.TAI:20:13:46.678589 = LGT-4690988026678589e-6