File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_clockstuff.F |
903 |
ASTRO |
_RL pi, zero, one, two, six, dg2rd, yrlen, eqnx, ob, ecc, per |
./pkg/fizhi/fizhi_clockstuff.F |
929 |
ASTRO |
dg2rd = getcon('DEG2RAD') |
./pkg/fizhi/fizhi_clockstuff.F |
931 |
ASTRO |
ob = getcon('OBLDEG') * dg2rd |
./pkg/fizhi/fizhi_clockstuff.F |
935 |
ASTRO |
per = getcon('PERIHELION') * dg2rd |
./pkg/chronos/chronos.F |
740 |
ASTRO |
_RL pi, zero, one, two, six, dg2rd, yrlen, eqnx, ob, ecc, per |
./pkg/chronos/chronos.F |
748 |
ASTRO |
parameter ( dg2rd = pi/180. ) |
./pkg/chronos/chronos.F |
753 |
ASTRO |
parameter ( ob = 23.45*dg2rd ) |
./pkg/chronos/chronos.F |
755 |
ASTRO |
parameter ( per = 102.0*dg2rd) |