| D | carlson_ellint_data.cpp | 33 T X, Y, Z, P, EA, EB, EC, E2, E3, S1, S2, S3; in ellint_rj_old() local
136 EA = X * Y + Y * Z + Z * X; in ellint_rj_old()
139 E2 = EA - 3 * EC; in ellint_rj_old()
140 E3 = EB + 2 * P * (EA - EC); in ellint_rj_old()
143 S3 = P * ((EA - EC) / 3 - P * EA * T(3) / 22); in ellint_rj_old()
153 T X, Y, Z, EA, EB, EC, ED, EE, S1, S2; in ellint_rd_imp_old() local
213 EA = X * Y; in ellint_rd_imp_old()
215 EC = EA - EB; in ellint_rd_imp_old()
216 ED = EA - 6 * EB; in ellint_rd_imp_old()
219 S2 = Z * (EE / 6 + Z * (-EC * T(9) / 22 + Z * EA * T(3) / 26)); in ellint_rd_imp_old()
|