| blob | cfc03c154f1f617f7d4b71d1898c60c283abd297 |
1 define(D,defn(define))D(i,defn(ifelse))D(C,`i($1,,`C(shift($@))',`E((
2 A(shift($@))),$1,incr(0defn($1)))')')D(B,`D($1,eval(defn($1)+$2))')D(
3 A,`i($1,|,,`+(len($1)*index(`$*,',`,$1,')>0)A(shift($@))')')D(E,
4 `+2**$1/2B(,$3)L($2,eval($1+$2),$3)')eval(translit(include(I),a
5 :rd,(,)D(L,`B($1,$3)i($1,$2,,`L(incr($1),$2,$3)')'))) defn()