Symbol Description Uses
lastinterval 13


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)