kill(all)$

load("solve_rec")$ 

solve_recurrence = name;

van=facebook.com/LearningCalculus$

solve_rec(P[2*x^3+x]=P[2*x^2]*P[x],P[x]);

demo(solve_rec);