Home
last modified time | relevance | path

Searched refs:main_elp3 (Results 1 – 1 of 1) sorted by relevance

/dports/astro/libnova/libnova-0.15.0/src/
H A Dlunar.c2182 static const struct main_problem main_elp3 [ELP3_SIZE] = variable
38330 if (fabs(main_elp3[j].A) > pre[2]) { in sum_series_elp3()
38332 tgv = main_elp3[j].B[0] + DTASM * main_elp3[j].B[4]; in sum_series_elp3()
38333 x = main_elp3[j].A + tgv * (DELNP - AM * DELNU) + in sum_series_elp3()
38334 main_elp3[j].B[1] * DELG + main_elp3[j].B[2] * in sum_series_elp3()
38335 DELE + main_elp3[j].B[3] * DELEP; in sum_series_elp3()
38340 y += main_elp3[j].ilu[i] * del[i][k] * t[k]; in sum_series_elp3()