formula to bezier curve through hand & maxima

gistfile1.matlab

x(l,x0) := if equal(l,1) then
    x0[2] * t - x0[1] * t + x0[1]
else
    expand(x(1,[x(l-1,makelist(x0[i],i,1,length(x0)-1)),
                x(l-1,makelist(x0[i],i,2,length(x0)))]));


usage:
factor(x(2,[x[0],x[1],x[2]]));