54 C = ((((0.15417e-06*aZ) - 0.29875
e-04)*aZ + 0.21071e-02)*aZ - 0.66612
e-01)*aZ + 0.98375;
88 result = 3.0/(P*(P-1.0)*(P-2.0)) *
89 (H*(H-1.0)*(H-2.0)*r*(r-1.0)*(r-1.0) +
90 H*(H-1.0)*(2.0*Na*r*(1.0-
r)+Pa*(1.0-r)*(1.0-
r)) +
91 H*(Na*(Na-1.0)*r+2.0*Na*Pa*(1.0-
r)) +
94 result /= 3.0*r*(1.0 -
r)*(1.0 - r);
96 return std::max(0.0,result);