define pyk of circular star var t term var u substitution var s end circular as text unicode start of text unicode small c unicode small i unicode small r unicode small c unicode small u unicode small l unicode small a unicode small r unicode space unicode small s unicode small t unicode small a unicode small r unicode space unicode asterisk unicode space unicode small t unicode small e unicode small r unicode small m unicode space unicode asterisk 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 asterisk unicode space unicode small e unicode small n unicode small d unicode space unicode small c unicode small i unicode small r unicode small c unicode small u unicode small l unicode small a unicode small r unicode end of text end unicode text end text end define
define tex of circular star var t term var u substitution var s end circular as text unicode start of text unicode newline unicode small c unicode small i unicode small r unicode small c unicode small u unicode small l unicode small a unicode small r unicode circumflex unicode asterisk 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
define value of circular star var t term var u substitution var s end circular as var t tagged guard ( var s tagged guard tagged if var u is atomic then false else tagged if circular var t term var u head substitution var s end circular then true else circular star var t term var u tail substitution var s end circular end if end if ) end define
The pyk compiler, version 0.grue.20050502+ by Klaus Grue,