fp t82, t86, t85, t83, t79; t82 = x*x; t86 = RATIONAL(1.0,2.0)*t82+RATIONAL(-1.0,12.0); t85 = RATIONAL(-2.0,1.0)*t82+RATIONAL(4.0,3.0); t83 = t82*x; t79 = RATIONAL(-1.0,4.0)*x; coeff_dxx_m2 = t79+RATIONAL(-1.0,6.0)*t83+t86; coeff_dxx_m1 = t79+RATIONAL(5.0,6.0)*t83+t85; coeff_dxx_0 = RATIONAL(-5.0,3.0)*t83+RATIONAL(5.0,2.0)*x+RATIONAL(3.0,1.0 )*t82+RATIONAL(-5.0,2.0); coeff_dxx_p1 = RATIONAL(5.0,3.0)*t83+RATIONAL(-7.0,2.0)*x+t85; coeff_dxx_p2 = RATIONAL(7.0,4.0)*x+RATIONAL(-5.0,6.0)*t83+t86; coeff_dxx_p3 = t79+RATIONAL(1.0,6.0)*t83;