Logiweb(TM)

Logiweb aspects of Gen1 in pyk

Up Help

The "pyk" aspect

Define pyk of Gen1 as "Gen1" end define

The "proof/kg" aspect

define proof of Gen1 as \ p . \ c . taceval ( quote Line L01 : Premise >> FOL ; All #h : All #x : All #a : Line L03 : Condition >> \ c . { quote #x end quote objectavoid ( c ) quote #h end quote } ; Line L04 : Premise >> #h imply #a ; Line L05 : Gen ponens L04 >> f.allfunc \ #x . { #h imply #a } ; Line L06 : A5 probans L03 >> { f.allfunc \ #x . { #h imply #a } } imply { #h imply f.allfunc \ #x . #a } ; { { { MP ponens L06 } ponens L05 } conclude { #h imply f.allfunc \ #x . #a } } end quote , tacstate0 , c ) end define

The "unitac/kg" aspect

define unitac of Gen1 as \ u . unitac-lemma ( u ) end define

The "statement/kg" aspect

define statement of Gen1 as FOL infer All #h : All #x : All #a : { { \ c . { quote #x end quote objectavoid ( c ) quote #h end quote } } endorse { { #h imply #a } infer { #h imply f.allfunc \ #x . #a } } } 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