fp t37, t36, t35, t34, t33; t37 = x*x; t36 = t37*x; t35 = RATIONAL(-1.0,4.0); t34 = RATIONAL(-25.0,6.0); t33 = t35*x; coeff_dxx_m2 = t35+t33+RATIONAL(3.0,2.0)*t37+RATIONAL(-5.0,6.0)*t36; coeff_dxx_m1 = RATIONAL(13.0,6.0)+t33+RATIONAL(-7.0,1.0)*t37+RATIONAL( 25.0,6.0)*t36; coeff_dxx_0 = RATIONAL(-25.0,3.0)*t36+RATIONAL(13.0,1.0)*t37+t34+RATIONAL (5.0,2.0)*x; coeff_dxx_p1 = RATIONAL(3.0,1.0)+RATIONAL(-7.0,2.0)*x+RATIONAL(-12.0,1.0) *t37+RATIONAL(25.0,3.0)*t36; coeff_dxx_p2 = RATIONAL(11.0,2.0)*t37+t34*t36+RATIONAL(7.0,4.0)*x+ RATIONAL(-11.0,12.0); coeff_dxx_p3 = RATIONAL(5.0,6.0)*t36+RATIONAL(1.0,6.0)+t33-t37;