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 |
1345 |
ECCO_COST_FINAL |
& 'f_temp0 =', f_temp0, no_temp0 |
./pkg/ecco/ecco_cost_final.F |
1349 |
ECCO_COST_FINAL |
& 'f_temp0smoo =', f_temp0smoo, no_temp0 |
./pkg/ecco/ecco_cost_final.F |
315 |
ECCO_COST_FINAL |
no_temp0 = 0. _d 0 |
./pkg/ecco/ecco_cost_final.F |
683 |
ECCO_COST_FINAL |
no_temp0 = no_temp0 + num_temp0(bi,bj) |
./pkg/ecco/ecco_cost_final.F |
931 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_temp0, myThid ) |