| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_final.F |
114 |
ECCO_COST_FINAL |
_RL no_atemp, no_aqh, no_precip, no_swflux, no_swdown |
|
./pkg/ecco/ecco_cost_final.F |
1277 |
ECCO_COST_FINAL |
& 'f_swdown =', f_swdown, no_swdown |
|
./pkg/ecco/ecco_cost_final.F |
1313 |
ECCO_COST_FINAL |
& 'f_swdownsmoo =', f_swdownsmoo, no_swdown |
|
./pkg/ecco/ecco_cost_final.F |
304 |
ECCO_COST_FINAL |
no_swdown = 0. _d 0 |
|
./pkg/ecco/ecco_cost_final.F |
635 |
ECCO_COST_FINAL |
no_swdown = no_swdown + num_swdown(bi,bj) |
|
./pkg/ecco/ecco_cost_final.F |
866 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_swdown , myThid ) |