(srfi 42)

do-ec

(:do (cc ...) olet lbs ne1? ilet ne2? lss)

(:do cc lbs ne1? lss)

:let

:parallel

(:while cc (g arg1 arg ...) test)

(:until cc (g arg1 arg ...) test)

:list

:string

:vector

:integers

:range

:real-range

:char-range

:port

:dispatched

:

fold3-ec

fold-ec

(list-ec etc1 etc ...)

(append-ec etc1 etc ...)

(string-ec etc1 etc ...)

(string-append-ec etc1 etc ...)

(vector-ec etc1 etc ...)

vector-of-length-ec

(sum-ec etc1 etc ...)

(product-ec etc1 etc ...)

(min-ec etc1 etc ...)

(max-ec etc1 etc ...)

last-ec

first-ec

any?-ec

every?-ec