define pyk of for all var x indeed var y as text unicode start of text unicode small f unicode small o unicode small r unicode space unicode small a unicode small l unicode small l unicode space unicode asterisk unicode space unicode small i unicode small n unicode small d unicode small e unicode small e unicode small d unicode space unicode asterisk unicode end of text end unicode text end text end define
define tex of for all var x indeed var y as text unicode start of text unicode newline unicode backslash unicode small f unicode small o unicode small r unicode small a unicode small l unicode small l unicode space unicode number sign unicode one unicode period unicode newline unicode backslash unicode small c unicode small o unicode small l unicode small o unicode small n unicode space unicode number sign unicode two unicode period unicode end of text end unicode text end text end define
define macro of for all var x indeed var y as lambda var t dot lambda var s dot lambda var c dot state expand tagged if not ( var t first term root equal quote var x comma var y end quote ) then quote expand var t term quote for all objects var x indeed var y end quote stack ( quote var x end quote pair ( var t first ) ) pair ( ( quote var y end quote pair ( var t second ) ) pair true ) end expand else quote expand var t term quote for all objects var x indeed for all var y indeed var z end quote stack ( quote var x end quote pair ( var t first first ) ) pair ( ( quote var y end quote pair ( var t first second ) ) pair ( ( quote var z end quote pair ( var t second ) ) pair true ) ) end expand end if state var s cache var c end expand end define
The pyk compiler, version 0.grue.20060417 by Klaus Grue,