Def reduce(f;k;as) == Case of as; nil  k ; a.as'  f(a,reduce(f;k;as'))
Def (recursive)

is mentioned by

Def filter(P;l) == reduce(a,v. if P(a) [a / v] else v fi;nil;l)

[filter]

In prior sections: list 1

Try larger context: MarkB generic IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html