| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_ssh_new.F |
185 |
COST_SSH_NEW |
& *tpTimeMask(irec) .NE. 0. ) then |
|
./pkg/ecco/ecco_cost.h |
1478 |
NO PROCEDURE |
& tpTimeMask, ersTimeMask, gfoTimeMask |
|
./pkg/ecco/ecco_cost.h |
1479 |
NO PROCEDURE |
_RL tpTimeMask(maxNumDays) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
219 |
ECCO_COST_INIT_FIXED |
tpTimeMask(irec) = 1. _d 0 |
|
./pkg/ecco/ecco_cost_init_fixed.F |
236 |
ECCO_COST_INIT_FIXED |
read(gwunit,*) tpTimeMask(irec) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
273 |
ECCO_COST_INIT_FIXED |
& ( tpTimeMask(irec).NE.0. .AND. tpTimeMask(irec).NE.1. ) .OR. |