kill(all)$

load(ntrig)$
load(atrig1)$

van=facebook.com/LearningCalculus$

f(x):=%e^(a*x)*sin(b*x+c);

'(integrate(%e^(a*x)*sin(b*x+c),x))=integrate(f(x),x) + C;

F(x):=''(integrate(f(x),x));

g(x):=subst(sin(%theta),b,subst(cos(%theta),a,f(x)))$ g(x);

G(x):=subst(sin(%theta),b,subst(cos(%theta),a,F(x)))$ G(x);

trigsimp(G(x));

subst(t, %theta,subst(e,%e,%));