| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_alarms.F |
32 |
FIZHI_ALARMS |
integer ndt |
|
./pkg/fizhi/fizhi_alarms.F |
38 |
FIZHI_ALARMS |
ndt = deltaT |
|
./pkg/fizhi/fizhi_alarms.F |
40 |
FIZHI_ALARMS |
if( ndt.ne.0 ) then |
|
./pkg/fizhi/fizhi_alarms.F |
49 |
FIZHI_ALARMS |
ndturb = 2*int( max(1.0,(300./iabs(ndt)+0.5)/2) ) * iabs(ndt) |
|
./pkg/fizhi/fizhi_alarms.F |
55 |
FIZHI_ALARMS |
nd = ndturb + 2*n*m*ndt |
|
./pkg/fizhi/fizhi_alarms.F |
58 |
FIZHI_ALARMS |
if( nd.lt.ndt ) then |
|
./pkg/fizhi/fizhi_alarms.F |
61 |
FIZHI_ALARMS |
print *, 'Turbulence cannot occur with Model Timestep = ',ndt |
|
./pkg/fizhi/fizhi_alarms.F |
72 |
FIZHI_ALARMS |
ndmoist = int( 600./iabs(ndt) + 0.5 ) * iabs(ndt) |
|
./pkg/fizhi/fizhi_alarms.F |
78 |
FIZHI_ALARMS |
nd = ndmoist + n*m*ndt |
|
./pkg/fizhi/fizhi_alarms.F |
81 |
FIZHI_ALARMS |
if( nd.lt.ndt ) then |
|
./pkg/fizhi/fizhi_alarms.F |
84 |
FIZHI_ALARMS |
print *, 'Convection cannot occur with Model Timestep = ',ndt |
|
./pkg/fizhi/fizhi_clockstuff.F |
236 |
GET_ALARM |
integer datein,timein,ndt |
|
./pkg/fizhi/fizhi_clockstuff.F |
241 |
GET_ALARM |
ndt = int(deltat) |
|
./pkg/fizhi/fizhi_clockstuff.F |
245 |
GET_ALARM |
call TICK(datein,timein,ndt) |
|
./pkg/fizhi/fizhi_clockstuff.F |
513 |
TICK |
subroutine TICK (nymd,nhms,ndt) |
|
./pkg/fizhi/fizhi_clockstuff.F |
521 |
TICK |
integer nymd,nhms,ndt |
|
./pkg/fizhi/fizhi_clockstuff.F |
557 |
TIC_TIME |
subroutine TIC_TIME (mymd,mhms,ndt) |
|
./pkg/fizhi/fizhi_clockstuff.F |
566 |
TIC_TIME |
integer mymd,mhms,ndt |
|
./pkg/fizhi/fizhi_update_time.F |
23 |
FIZHI_UPDATE_TIME |
integer ndt |
|
./pkg/fizhi/fizhi_update_time.F |
28 |
FIZHI_UPDATE_TIME |
ndt = deltat |
|
./pkg/fizhi/fizhi_update_time.F |
29 |
FIZHI_UPDATE_TIME |
call TICK(nymd,nhms,ndt) |
|
./pkg/chronos/chronos.F |
467 |
TICK |
subroutine TICK (nymd,nhms,ndt) |
|
./pkg/chronos/chronos.F |
475 |
TICK |
integer nymd,nhms,ndt |
|
./pkg/chronos/chronos.F |
507 |
TIC_TIME |
subroutine TIC_TIME (mymd,mhms,ndt) |
|
./pkg/chronos/chronos.F |
516 |
TIC_TIME |
integer mymd,mhms,ndt |