Logiweb aspects of theory four {MissingArg} name {MissingArg} sum {MissingArg} end theory in pyk

Up Help

The predefined "pyk" aspect

define pyk of theory four x name x sum x end theory as text unicode start of text unicode small t unicode small h unicode small e unicode small o unicode small r unicode small y unicode space unicode small f unicode small o unicode small u unicode small r unicode space unicode quotation mark unicode space unicode small n unicode small a unicode small m unicode small e unicode space unicode quotation mark unicode space unicode small s unicode small u unicode small m unicode space unicode quotation mark unicode space unicode small e unicode small n unicode small d unicode space unicode small t unicode small h unicode small e unicode small o unicode small r unicode small y unicode end of text end unicode text end text end define

The predefined "tex" aspect

define tex of theory four var c name var n sum var s end theory as text unicode start of text unicode newline unicode small t unicode small h unicode small e unicode small o unicode small r unicode small y unicode underscore unicode four unicode left parenthesis unicode space unicode number sign unicode one unicode period unicode newline unicode comma unicode space unicode number sign unicode two unicode period unicode newline unicode comma unicode space unicode number sign unicode three unicode period unicode newline unicode right parenthesis unicode end of text end unicode text end text end define

The predefined "value" aspect

define value of theory four var c name var n sum var s end theory as var n tagged guard newline tagged if var c then var s else newline tagged if not var c head is cardinal then theory four var c tail name var n sum theory four var c head name var n sum var s end theory end theory else newline tagged if not aspect the proof aspect subcodex var c tail end aspect third term equal quote rule tactic end quote then var s else newline let one lambda var d dot newline tagged if not var d first term equal var n then var s else newline plus var d second and var s end plus end if apply aspect the statement aspect subcodex var c tail end aspect third end let end if end if end if end define