define value of meta-sub* var a is var b where var x is var t end sub as var b tagged guard var x tagged guard var t tagged guard tagged if var a then true else tagged if meta-sub1 var a head is var b head where var x is var t end sub then meta-sub* var a tail is var b tail where var x is var t end sub else false end if end if end define
The pyk compiler, version 0.grue.20060417+ by Klaus Grue,