Mercurial > hg > ishara

annotate general/funutils/@function_handle/foldr.m @ 28:673b8e45d05a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tidied up indentation.
author samer
date Sat, 19 Jan 2013 14:40:54 +0000
parents 03694e5c8365
children
rev   line source
samer@13 1 function X=foldr(fn,e,args)
samer@13 2 % foldr - Fold from the right combinator
samer@13 3 %
samer@13 4 % foldr :: (Y,X->X), Y, cells(Y) -> Y.
samer@13 5 %
samer@13 6 % This function applies an associative operator to a list of arguments,
samer@13 7 % starting from the right, eg
samer@13 8 % elements, eg foldr(@plus,0,{1,2,3,4}) = (1+(2+(3+(4+0)))).
samer@13 9 X=e; for i=length(args):-1:1, X=fn(args{i},X); end