Symbol Description Uses
ersTimeMask 9



File Line number Procedure Code
./pkg/ecco/cost_ssh_new.F 193 COST_SSH_NEW
     &               *ersTimeMask(irec) .NE. 0. ) then
./pkg/ecco/ecco_cost.h 1478 NO PROCEDURE
     &       tpTimeMask, ersTimeMask, gfoTimeMask
./pkg/ecco/ecco_cost.h 1480 NO PROCEDURE
      _RL ersTimeMask(maxNumDays)
./pkg/ecco/ecco_cost_init_fixed.F 220 ECCO_COST_INIT_FIXED
       ersTimeMask(irec) = 1. _d 0
./pkg/ecco/ecco_cost_init_fixed.F 251 ECCO_COST_INIT_FIXED
        read(gwunit,*) ersTimeMask(irec)
./pkg/ecco/ecco_cost_init_fixed.F 274 ECCO_COST_INIT_FIXED
     &   ( ersTimeMask(irec).NE.0. .AND. ersTimeMask(irec).NE.1. ) .OR.
./pkg/ecco/ecco_cost_init_fixed.F 275 ECCO_COST_INIT_FIXED
     &   ( ersTimeMask(irec).NE.0. .AND. ersTimeMask(irec).NE.1. ) )