define pyk of x term subset x as text unicode start of text unicode quotation mark unicode space unicode small t unicode small e unicode small r unicode small m unicode space unicode small s unicode small u unicode small b unicode small s unicode small e unicode small t unicode space unicode quotation mark unicode end of text end unicode text end text end define
define tex of var x term subset var y as text unicode start of text unicode number sign unicode one unicode period unicode newline unicode backslash unicode small s unicode small u unicode small b unicode small s unicode small e unicode small t unicode small e unicode small q unicode underscore unicode capital t unicode space unicode number sign unicode two unicode period unicode end of text end unicode text end text end define
define value of var x term subset var y as tagged if var x is atomic then var y tagged guard true else tagged if var x head term in var y then var x tail term subset var y else false end if end if end define
The pyk compiler, version 0.grue.20060417+ by Klaus Grue,