51 one = 1.00000000000000000000e+00,
52 C1 = 4.16666666666666019037e-02,
53 C2 = -1.38888888888741095749e-03,
54 C3 = 2.48015872894767294178e-05,
55 C4 = -2.75573143513906633035e-07,
56 C5 = 2.08757232129817482790e-09,
57 C6 = -1.13596475577881948265e-11;
66 if(((
int)
x)==0)
return one;
80 return a - (hz - (
z*
r-
x*
y));