| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_clockstuff.F |
1037 |
TIME_BOUND |
INTEGER DAYS(14), daysm, days0, daysp |
|
./pkg/fizhi/fizhi_clockstuff.F |
1051 |
TIME_BOUND |
daysm = days(month ) |
|
./pkg/fizhi/fizhi_clockstuff.F |
1059 |
TIME_BOUND |
if( month.eq.3 ) daysm = daysm+1 |
|
./pkg/fizhi/fizhi_clockstuff.F |
1064 |
TIME_BOUND |
MIDMON1 = daysm/2 + 1 |
|
./pkg/fizhi/fizhi_clockstuff.F |
1077 |
TIME_BOUND |
call TICK ( nymd1,nhms1,-(daysm-midmon1)*86400 ) |
|
./pkg/chronos/chronos.F |
870 |
TIME_BOUND |
INTEGER DAYS(14), daysm, days0, daysp |
|
./pkg/chronos/chronos.F |
884 |
TIME_BOUND |
daysm = days(month ) |
|
./pkg/chronos/chronos.F |
892 |
TIME_BOUND |
if( month.eq.3 ) daysm = daysm+1 |
|
./pkg/chronos/chronos.F |
897 |
TIME_BOUND |
MIDMON1 = daysm/2 + 1 |
|
./pkg/chronos/chronos.F |
910 |
TIME_BOUND |
call TICK ( nymd1,nhms1,-(daysm-midmon1)*86400 ) |