File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_ice.F |
87 |
COST_ICE |
if ( myTime .GT. (endTime - lastinterval) ) then |
./pkg/ecco/cost_ice.F |
89 |
COST_ICE |
& ( ( 1. + min(endTime-startTime,lastinterval) ) |
./pkg/cost/cost_accumulate_mean.F |
51 |
COST_ACCUMULATE_MEAN |
& /lastinterval*deltaTClock |
./pkg/cost/cost_accumulate_mean.F |
54 |
COST_ACCUMULATE_MEAN |
& /lastinterval*deltaTClock |
./pkg/cost/cost_accumulate_mean.F |
57 |
COST_ACCUMULATE_MEAN |
& /lastinterval*deltaTClock |
./pkg/cost/cost.h |
55 |
NO PROCEDURE |
& lastinterval |
./pkg/cost/cost.h |
56 |
NO PROCEDURE |
_RL lastinterval |
./pkg/cost/cost_tile.F |
99 |
COST_TILE |
IF ( myTime .GT. (EndTime - lastinterval) ) |
./pkg/cost/cost_readparms.F |
42 |
COST_READPARMS |
& , lastinterval |
./pkg/cost/cost_readparms.F |
52 |
COST_READPARMS |
lastinterval = 2592000. |
./pkg/cost/cost_readparms.F |
72 |
COST_READPARMS |
IF ( MOD(lastinterval,deltaTclock) .GT. 0. ) |
./pkg/cost/cost_readparms.F |
73 |
COST_READPARMS |
& lastinterval = MAX( |
./pkg/cost/cost_readparms.F |
74 |
COST_READPARMS |
& INT(lastinterval/deltaTclock-1)*deltaTclock,deltaTclock) |