Logiweb aspects of 1deduction four {MissingArg} conclude {MissingArg} condition {MissingArg} bound {MissingArg} end 1deduction in pyk

Up Help

The predefined "pyk" aspect

define pyk of 1deduction four x conclude x condition x bound x end 1deduction as text unicode start of text unicode one unicode small d unicode small e unicode small d unicode small u unicode small c unicode small t unicode small i unicode small o unicode small n unicode space unicode small f unicode small o unicode small u unicode small r unicode space unicode quotation mark unicode space unicode small c unicode small o unicode small n unicode small c unicode small l unicode small u unicode small d unicode small e unicode space unicode quotation mark unicode space unicode small c unicode small o unicode small n unicode small d unicode small i unicode small t unicode small i unicode small o unicode small n unicode space unicode quotation mark unicode space unicode small b unicode small o unicode small u unicode small n unicode small d unicode space unicode quotation mark unicode space unicode small e unicode small n unicode small d unicode space unicode one unicode small d unicode small e unicode small d unicode small u unicode small c unicode small t unicode small i unicode small o unicode small n unicode end of text end unicode text end text end define

The predefined "tex" aspect

define tex of 1deduction four var x conclude var y condition var z bound var u end 1deduction as text unicode start of text unicode newline unicode capital d unicode small e unicode small d unicode small u unicode underscore unicode four unicode left parenthesis unicode number sign unicode one unicode period unicode newline unicode comma unicode number sign unicode two unicode period unicode newline unicode comma unicode number sign unicode three unicode period unicode newline unicode comma unicode number sign unicode four 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 1deduction four var p conclude var c condition var s bound var b end 1deduction as var s tagged guard var b tagged guard tagged if var p term root equal quote object var var x end var end quote then lookup var p stack var b default true end lookup term equal var c else tagged if not var p term root equal var c then false else tagged if var p term root equal quote for all objects var x indeed var y end quote then var p first term equal var c first and 1deduction four var p second conclude var c second condition var s bound var p first pair var p first pair var b end 1deduction else tagged if not var p term root equal quote metavar var x end metavar end quote then 1deduction four star var p tail conclude var c tail condition var s bound var b end 1deduction else var p first term equal var c first and 1deduction five var p condition var s bound var b end 1deduction end if end if end if end if end define