Lines Matching full:61
219 l = 13.1763966 * onday + lzero; /* sec 61 #4 */ in potm()
221 Mm = l - (0.1114041 * onday) - Pzero; /* sec 61 #5 */ in potm()
223 Nm = Nzero - (0.0529539 * onday); /* sec 61 #6 */ in potm()
225 Ev = 1.2739 * sin(dtor(2*(l - LambdaSol) - Mm)); /* sec 61 #7 */ in potm()
226 Ac = 0.1858 * sin(dtor(Msol)); /* sec 61 #8 */ in potm()
228 Mmprime = Mm + Ev - Ac - A3; /* sec 61 #9 */ in potm()
229 Ec = 6.2886 * sin(dtor(Mmprime)); /* sec 61 #10 */ in potm()
230 A4 = 0.214 * sin(dtor(2 * Mmprime)); /* sec 61 #11 */ in potm()
231 lprime = l + Ev + Ec - Ac + A4; /* sec 61 #12 */ in potm()
232 V = 0.6583 * sin(dtor(2 * (lprime - LambdaSol))); /* sec 61 #13 */ in potm()
233 ldprime = lprime + V; /* sec 61 #14 */ in potm()