kill(all)$

van = facebook.com/LearningCalculus$

load(solve_rec)$

solve_rec(u[n+1] = 2*u[n],u[n]);

u[i,j]:=u[i-1] + 1;

genmatrix(u,2,2);