Home
last modified time | relevance | path

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

/dports/devel/plan9port/plan9port-1f098efb7370a0b28306d10681e21883fb1c1507/src/cmd/astro/
H A Dnutate.c12 double msun, mnom, noded, dmoon; in nutate() local
37 dmoon = 350.737486 + 12.1907491914*eday - 1.436e-3*capt2 in nutate()
39 dmoon *= radian; in nutate()
56 phi += sinadd(4, node, noded, dmoon, msun); in nutate()
58 eps = cosadd(4, node, noded, dmoon, msun); in nutate()
65 dphi = sinadd(4, node, noded, mnom, dmoon); in nutate()
H A Dsun.c7 double dmoon, mmoon, gmoon; in sun() local
20 dmoon = 350.737681+12.1907491914*eday-.001436*capt2; in sun()
29 dmoon = fmod(dmoon, 360.)*radian; in sun()
69 pturbl += sinadd(3, dmoon, mmoon, merth) + .9; in sun()
73 pturbb += sinadd(3, gmoon, mmoon, dmoon); in sun()
77 pturbr += cosadd(3, dmoon, mmoon, merth); in sun()
H A Dmoon.c4 double mnom, msun, noded, dmoon; variable
148 dmoon = dlong - lsun; in moon()
309 if(dmoon < 0.) in moon()
310 dmoon += 360.; in moon()
311 mag = dmoon/360.; in moon()
336 x = i*mnom + j*msun + k*noded + m*dmoon + angle; in sinx()
361 x = i*mnom + j*msun + k*noded + m*dmoon + angle; in cosx()
/dports/astro/marble/marble-21.12.3/src/lib/astro/
H A Declsolar.cpp1279 double dsun, dmoon, asep; in getlocmag() local
1311 dmoon = atan(0.5*dm/abs(gm)); // apparent radius of the Moon in getlocmag()
1320 if ((dsun+dmoon) > asep) // we have an eclipse in getlocmag()
1322 if (fabs(dsun-dmoon) > asep) totflg = 1; in getlocmag()
1323 asep = fabs(dsun + dmoon - asep) / (2.0 * dsun); in getlocmag()
/dports/astro/swe/swisseph-2.10.1/
H A Dswecl.c658 double dmoon = 2 * rmoon; in eclipse_where() local
751 d0 = (s0 / dsm * (drad * 2 - dmoon) - dmoon) / cosf1; in eclipse_where()
753 D0 = (s0 / dsm * (drad * 2 + dmoon) + dmoon) / cosf2; in eclipse_where()
871 *dcore = (s / dsmt * ( drad * 2 - dmoon) - dmoon) * cosf1; in eclipse_where()
874 dcore[1] = (s / dsmt * ( drad * 2 + dmoon) + dmoon) * cosf2; in eclipse_where()
3255 double dmoon = 2 * rmoon; local
3325 attr[0] = (d0 / 2 - r0 + rmoon) / dmoon;
3328 attr[0] = (d0 / 2 - r0 + rmoon) / dmoon;
3340 attr[1] = (D0 / 2 - r0 + rmoon) / dmoon;