Logiweb aspects of trivia in pyk

Up Help

The predefined "pyk" aspect

define pyk of trivia as text unicode start of text unicode small t unicode small r unicode small i unicode small v unicode small i unicode small a unicode end of text end unicode text end text end define

The user defined "the statement aspect" aspect

define statement of trivia as pred calc infer all metavar var f end metavar indeed metavar var f end metavar imply metavar var f end metavar end define

The user defined "the proof aspect" aspect

define proof of trivia as lambda var c dot lambda var x dot proof expand quote pred calc infer all metavar var f end metavar indeed pc2 conclude metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar cut pc1 conclude metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar cut pcmp modus ponens metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar modus ponens metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar conclude metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar cut pc1 conclude metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar cut pcmp modus ponens metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar modus ponens metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar imply metavar var f end metavar conclude metavar var f end metavar imply metavar var f end metavar end quote state proof state cache var c end expand end define