-- Compute derivative and Taylor series expansion
-- This demonstrates symbolic differentiation in FriCAS

f := sin(x) * exp(x)
derivative := D(f, x)

-- Display the derivative
output("Derivative of sin(x)*exp(x):", derivative)

-- Compute Taylor series expansion around x=0
taylor := series(f, x=0)

-- Display first few terms
output("Taylor series:", taylor)