FoldList[f, x, {a, b, ? }] gives {x, f[x, a], f[f[x, a], b], ? }. FoldList, can be easily written in Maxima