11RealT
xx = 0.5 * (rr + 1.);
17for (
int kk = 1; kk <= order[0]; ++kk)
22for (
int kk = order[0] - 1; kk >= 0; --kk)
28for (
int kk = 0; kk <= order[0]; ++kk)
33 ddx += RealT(kk) *
xpow[kk - 1] *
ypow[kk];
37 ddx -= RealT(order[0] - kk) *
xpow[kk] *
ypow[kk + 1];
44 coeff =
coeff * RealT(order[0] - kk) / RealT(kk + 1);
WORKSPACE(RealT, xpow, order[0]+1)