File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_cost_final.F |
131 |
ECCO_COST_FINAL |
_RL no_temp0, no_salt0, no_temp, no_salt |
./pkg/ecco/ecco_cost_final.F |
1347 |
ECCO_COST_FINAL |
& 'f_salt0 =', f_salt0, no_salt0 |
./pkg/ecco/ecco_cost_final.F |
1351 |
ECCO_COST_FINAL |
& 'f_salt0smoo =', f_salt0smoo, no_salt0 |
./pkg/ecco/ecco_cost_final.F |
316 |
ECCO_COST_FINAL |
no_salt0 = 0. _d 0 |
./pkg/ecco/ecco_cost_final.F |
684 |
ECCO_COST_FINAL |
no_salt0 = no_salt0 + num_salt0(bi,bj) |
./pkg/ecco/ecco_cost_final.F |
932 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_salt0, myThid ) |