| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_final.F |
1020 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(no_gentim2d(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1246 |
ECCO_COST_FINAL |
if (no_gentim2d(num_var).GT.0. _d 0) then |
|
./pkg/ecco/ecco_cost_final.F |
1567 |
ECCO_COST_FINAL |
if (no_gentim2d(num_var).GT.0. _d 0) then |
|
./pkg/ecco/ecco_cost_final.F |
1574 |
ECCO_COST_FINAL |
& no_gentim2d(num_var) |
|
./pkg/ecco/ecco_cost_final.F |
162 |
ECCO_COST_FINAL |
_RL no_gentim2d(maxCtrlTim2D) |
|
./pkg/ecco/ecco_cost_final.F |
405 |
ECCO_COST_FINAL |
no_gentim2d(num_var)= 0. _d 0 |
|
./pkg/ecco/ecco_cost_final.F |
776 |
ECCO_COST_FINAL |
no_gentim2d(num_var) = no_gentim2d(num_var) |