aboutsummaryrefslogtreecommitdiff
path: root/src/patch/test_fd_grid.maple
blob: d5d5ce52de960e8d6abfddd3eef20ddd83362e5e (plain)
1
2
3
4
5
6
7
8
9
10
11
# test function
f(rho,sigma) := exp(sin(rho) + tanh(sigma));

# 1st derivatives
simplify(diff(f(rho,sigma), rho));		codegen[C](%);
simplify(diff(f(rho,sigma), sigma));		codegen[C](%);

# 2nd derivatives
simplify(diff(f(rho,sigma), rho,rho));		codegen[C](%);
simplify(diff(f(rho,sigma), rho,sigma));	codegen[C](%);
simplify(diff(f(rho,sigma), sigma,sigma));	codegen[C](%);