FoldList



FoldList[f, x, {a, b, ? }] gives {x, f[x, a], f[f[x, a], b], ? }.


FoldList, can be easily written in Maxima