File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_averagesflags.F |
102 |
COST_AVERAGESFLAGS |
call CAL_ADDTIME( mydate, timediff, prevdate, mythid ) |
./pkg/ecco/cost_averagesflags.F |
130 |
COST_AVERAGESFLAGS |
prevdateday = mod(prevdate(1),100) |
./pkg/ecco/cost_averagesflags.F |
184 |
COST_AVERAGESFLAGS |
prevdatemonth = mod(prevdate(1)/100,100) |
./pkg/ecco/cost_averagesflags.F |
72 |
COST_AVERAGESFLAGS |
integer prevdate(4) |
./pkg/timeave/timeave_statvars.F |
101 |
TIMEAVE_STATVARS |
call CAL_GETDATE( myiter-1,mytime-deltaTClock,prevdate,mythid ) |
./pkg/timeave/timeave_statvars.F |
104 |
TIMEAVE_STATVARS |
& (thisdate(1)-prevdate(1)).GT.50 )DDTT=deltaTclock*tave_lastIter |
./pkg/timeave/timeave_statvars.F |
107 |
TIMEAVE_STATVARS |
& (thisdate(1)-prevdate(1)).GT.5000)DDTT=deltaTclock*tave_lastIter |
./pkg/timeave/timeave_statvars.F |
39 |
TIMEAVE_STATVARS |
INTEGER thisdate(4), prevdate(4) |
./pkg/timeave/timeave_statv_write.F |
53 |
TIMEAVE_STATV_WRITE |
INTEGER thisdate(4), prevdate(4) |
./pkg/timeave/timeave_statv_write.F |
68 |
TIMEAVE_STATV_WRITE |
call CAL_GETDATE( myiter-1,mytime-deltaTClock,prevdate,mythid ) |
./pkg/timeave/timeave_statv_write.F |
72 |
TIMEAVE_STATV_WRITE |
& (thisdate(1)-prevdate(1)).GT.50 ) dumpFiles = .TRUE. |
./pkg/timeave/timeave_statv_write.F |
75 |
TIMEAVE_STATV_WRITE |
& (thisdate(1)-prevdate(1)).GT.5000 ) dumpFiles = .TRUE. |
./model/src/packages_write_pickup.F |
57 |
PACKAGES_WRITE_PICKUP |
INTEGER thisdate(4), prevdate(4) |
./model/src/packages_write_pickup.F |
73 |
PACKAGES_WRITE_PICKUP |
call CAL_GETDATE( myiter-1,mytime-deltaTClock,prevdate,mythid ) |
./model/src/packages_write_pickup.F |
77 |
PACKAGES_WRITE_PICKUP |
IF((thisdate(1)-prevdate(1)) .GT. 50 )permCheckPoint=.TRUE. |
./model/src/packages_write_pickup.F |
82 |
PACKAGES_WRITE_PICKUP |
IF((thisdate(1)-prevdate(1)) .GT. 5000)permCheckPoint=.TRUE. |
./model/src/packages_write_pickup.F |
87 |
PACKAGES_WRITE_PICKUP |
IF((thisdate(1)-prevdate(1)) .GT. 50 )tempCheckPoint=.TRUE. |
./model/src/packages_write_pickup.F |
92 |
PACKAGES_WRITE_PICKUP |
IF((thisdate(1)-prevdate(1)) .GT. 5000)tempCheckPoint=.TRUE. |
./pkg/kpp/kpp_do_diags.F |
207 |
KPP_DO_DIAGS |
call CAL_GETDATE( myiter-1,mytime-deltaTClock,prevdate,mythid ) |
./pkg/kpp/kpp_do_diags.F |
211 |
KPP_DO_DIAGS |
& .AND. (thisdate(1)-prevdate(1)).GT.50 ) dumpFiles = .TRUE. |
./pkg/kpp/kpp_do_diags.F |
214 |
KPP_DO_DIAGS |
& .AND. (thisdate(1)-prevdate(1)).GT.5000 ) dumpFiles = .TRUE. |
./pkg/kpp/kpp_do_diags.F |
68 |
KPP_DO_DIAGS |
INTEGER thisdate(4), prevdate(4) |
./pkg/diagnostics/diagnostics_write.F |
100 |
DIAGNOSTICS_WRITE |
& (thisdate(1)-prevdate(1)).GT.5000 ) dump2fileNow = .TRUE. |
./pkg/diagnostics/diagnostics_write.F |
182 |
DIAGNOSTICS_WRITE |
& (thisdate(1)-prevdate(1)).GT.50 ) dump2fileNow = .TRUE. |
./pkg/diagnostics/diagnostics_write.F |
185 |
DIAGNOSTICS_WRITE |
& (thisdate(1)-prevdate(1)).GT.5000 ) dump2fileNow = .TRUE. |
./pkg/diagnostics/diagnostics_write.F |
36 |
DIAGNOSTICS_WRITE |
INTEGER thisdate(4), prevdate(4) |
./pkg/diagnostics/diagnostics_write.F |
57 |
DIAGNOSTICS_WRITE |
call CAL_GETDATE(myiter-1,mytime-deltaTClock,prevdate,mythid) |
./pkg/diagnostics/diagnostics_write.F |
97 |
DIAGNOSTICS_WRITE |
& (thisdate(1)-prevdate(1)).GT.50 ) dump2fileNow = .TRUE. |
./pkg/cal/cal_getmonthsrec.F |
116 |
CAL_GETMONTHSREC |
call CAL_ADDTIME( currentdate, modelsteptime, prevdate, mythid ) |
./pkg/cal/cal_getmonthsrec.F |
119 |
CAL_GETMONTHSREC |
& (mod(prevdate(1),100)-1)*secondsperday + |
./pkg/cal/cal_getmonthsrec.F |
120 |
CAL_GETMONTHSREC |
& prevdate(2)/10000*secondsperhour + |
./pkg/cal/cal_getmonthsrec.F |
121 |
CAL_GETMONTHSREC |
& mod(prevdate(2)/100,100)*secondsperminute + |
./pkg/cal/cal_getmonthsrec.F |
122 |
CAL_GETMONTHSREC |
& mod(prevdate(2),100) |
./pkg/cal/cal_getmonthsrec.F |
56 |
CAL_GETMONTHSREC |
integer prevdate(4) |
./model/src/checkpoint.F |
370 |
WRITE_CHECKPOINT |
INTEGER thisdate(4), prevdate(4) |
./model/src/checkpoint.F |
385 |
WRITE_CHECKPOINT |
call CAL_GETDATE( myiter-1,mytime-deltaTClock,prevdate,mythid ) |
./model/src/checkpoint.F |
389 |
WRITE_CHECKPOINT |
IF((thisdate(1)-prevdate(1)) .GT. 50 )permCheckPoint=.TRUE. |
./model/src/checkpoint.F |
394 |
WRITE_CHECKPOINT |
IF((thisdate(1)-prevdate(1)) .GT. 5000)permCheckPoint=.TRUE. |
./model/src/checkpoint.F |
399 |
WRITE_CHECKPOINT |
IF((thisdate(1)-prevdate(1)) .GT. 50 )tempCheckPoint=.TRUE. |
./model/src/checkpoint.F |
404 |
WRITE_CHECKPOINT |
IF((thisdate(1)-prevdate(1)) .GT. 5000)tempCheckPoint=.TRUE. |
./pkg/seaice/seaice_do_diags.F |
226 |
SEAICE_DO_DIAGS |
call CAL_GETDATE( myiter-1,mytime-deltaTClock,prevdate,mythid ) |
./pkg/seaice/seaice_do_diags.F |
230 |
SEAICE_DO_DIAGS |
& .AND. (thisdate(1)-prevdate(1)).GT.50 ) dumpFiles = .TRUE. |
./pkg/seaice/seaice_do_diags.F |
233 |
SEAICE_DO_DIAGS |
& .AND. (thisdate(1)-prevdate(1)).GT.5000 ) dumpFiles = .TRUE. |
./pkg/seaice/seaice_do_diags.F |
37 |
SEAICE_DO_DIAGS |
INTEGER thisdate(4), prevdate(4) |