| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_clockstuff.F |
453 |
INTERP_TIME |
INTEGER DAYSCY |
|
./pkg/fizhi/fizhi_clockstuff.F |
912 |
ASTRO |
_RL TH(DAYSCY),T0,T1,T2,T3,T4,FUN,Y |
|
./pkg/fizhi/fizhi_clockstuff.F |
964 |
ASTRO |
DO 200 K=2,DAYSCY |
|
./pkg/fizhi/fizhi_clockstuff.F |
969 |
ASTRO |
KP = MOD(KM,DAYSCY) + 1 |
|
./pkg/fizhi/fizhi_clockstuff.F |
982 |
ASTRO |
IDAYP1 = MOD( IDAY,DAYSCY) + 1 |
|
./pkg/fizhi/getcon.F |
148 |
NO PROCEDURE |
DATA ANAME(45),ACON(45) / 'DAYSCY ',DAYSCY / |
|
./pkg/fizhi/getcon.F |
36 |
NO PROCEDURE |
& YRLEN, DAYSCY, PERHDEG, OBLDEG |
|
./pkg/fizhi/getcon.F |
70 |
NO PROCEDURE |
PARAMETER ( DAYSCY = 365 *4 +1 ) |
|
./pkg/chronos/chronos.F |
407 |
INTERP_TIME |
INTEGER DAYSCY |
|
./pkg/chronos/chronos.F |
408 |
INTERP_TIME |
PARAMETER (DAYSCY = 365*4+1) |
|
./pkg/chronos/chronos.F |
758 |
ASTRO |
_RL TH(DAYSCY),T0,T1,T2,T3,T4,FUN,Y,MNDY(12,4) |
|
./pkg/chronos/chronos.F |
797 |
ASTRO |
DO 200 K=2,DAYSCY |
|
./pkg/chronos/chronos.F |
802 |
ASTRO |
KP = MOD(KM,DAYSCY) + 1 |
|
./pkg/chronos/chronos.F |
815 |
ASTRO |
IDAYP1 = MOD( IDAY,DAYSCY) + 1 |