| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_clockstuff.F |
1035 |
TIME_BOUND |
integer month,day,nyear,midmon1,midmon,midmon2 |
|
./pkg/fizhi/fizhi_clockstuff.F |
1072 |
TIME_BOUND |
nymd2 = (nymd/10000)*10000 + month*100 + midmon |
|
./pkg/fizhi/fizhi_clockstuff.F |
1076 |
TIME_BOUND |
call TICK ( nymd1,nhms1, -midmon *86400 ) |
|
./pkg/fizhi/fizhi_clockstuff.F |
1081 |
TIME_BOUND |
nymd1 = (nymd/10000)*10000 + month*100 + midmon |
|
./pkg/fizhi/fizhi_clockstuff.F |
1085 |
TIME_BOUND |
call TICK ( nymd2,nhms2,(days0-midmon)*86400 ) |
|
./pkg/fizhi/update_earth_exports.F |
721 |
GETLGR |
INTEGER i,midmon,midm,midp,id,k1,k2,kk1,kk2 |
|
./pkg/chronos/chronos.F |
868 |
TIME_BOUND |
integer month,day,nyear,midmon1,midmon,midmon2 |
|
./pkg/chronos/chronos.F |
905 |
TIME_BOUND |
nymd2 = (nymd/10000)*10000 + month*100 + midmon |
|
./pkg/chronos/chronos.F |
909 |
TIME_BOUND |
call TICK ( nymd1,nhms1, -midmon *86400 ) |
|
./pkg/chronos/chronos.F |
914 |
TIME_BOUND |
nymd1 = (nymd/10000)*10000 + month*100 + midmon |
|
./pkg/chronos/chronos.F |
918 |
TIME_BOUND |
call TICK ( nymd2,nhms2,(days0-midmon)*86400 ) |