blob: f0f513b92ad301f7540d858e9e82632320793cec (
plain)
1
2
3
4
5
6
7
8
|
fp t13,
t12;
t13 = x*x;
t12 = RATIONAL(-1.0,2.0);
coeff_dx_m1 = x+t12*t13+RATIONAL(-1.0,3.0);
coeff_dx_0 = t12+RATIONAL(-2.0,1.0)*x+RATIONAL(3.0,2.0)*t13;
coeff_dx_p1 = x+RATIONAL(1.0,1.0)+RATIONAL(-3.0,2.0)*t13;
coeff_dx_p2 = RATIONAL(1.0,2.0)*t13+RATIONAL(-1.0,6.0);
|