samer@13: function X=foldl(fn,e,args)
samer@13: % foldl - Fold fom the left combinator 
samer@13: %
samer@13: % foldl :: (X,Y->X), X, cells(Y) -> X.
samer@13: X=e; for i=1:length(args), X=fn(X,args{i}); end