plot of piecewise[{{-a^2-a+2/3, -1≤a<0}, {(2/3)a^3+a^2-a+2/3, 0≤a≤1}}]