Logiweb aspects of unify {MissingArg} with {MissingArg} substitution {MissingArg} end unify in pyk

Up Help

The predefined "pyk" aspect

define pyk of unify x with x substitution x end unify as text unicode start of text unicode small u unicode small n unicode small i unicode small f unicode small y unicode space unicode quotation mark unicode space unicode small w unicode small i unicode small t unicode small h unicode space unicode quotation mark unicode space unicode small s unicode small u unicode small b unicode small s unicode small t unicode small i unicode small t unicode small u unicode small t unicode small i unicode small o unicode small n unicode space unicode quotation mark unicode space unicode small e unicode small n unicode small d unicode space unicode small u unicode small n unicode small i unicode small f unicode small y unicode end of text end unicode text end text end define

The predefined "tex" aspect

define tex of unify var t with var u substitution var s end unify as text unicode start of text unicode newline unicode small u unicode small n unicode small i unicode small f unicode small y unicode left parenthesis unicode number sign unicode one unicode period unicode newline unicode equal sign unicode number sign unicode two unicode period unicode newline unicode comma 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 unify var t with var u substitution var s end unify as var t tagged guard var u tagged guard newline tagged if var s is cardinal then var s else newline tagged if var t is cardinal then unify two var t with var u substitution var s end unify else newline tagged if var u is cardinal then unify two var u with var t substitution var s end unify else newline tagged if var t term root equal var u then unify star var t tail with var u tail substitution var s end unify else zero end if end if end if end if end define