| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_final.F |
102 |
ECCO_COST_FINAL |
_RL f_sst, f_tmi, f_sss, f_bp, f_atl, f_ctdt, f_ctds |
|
./pkg/ecco/ecco_cost_final.F |
1060 |
ECCO_COST_FINAL |
& ' --> f_bp =',f_bp |
|
./pkg/ecco/ecco_cost_final.F |
1459 |
ECCO_COST_FINAL |
& 'f_bp =', f_bp, no_bp |
|
./pkg/ecco/ecco_cost_final.F |
248 |
ECCO_COST_FINAL |
f_bp = 0. _d 0 |
|
./pkg/ecco/ecco_cost_final.F |
604 |
ECCO_COST_FINAL |
f_bp = f_bp + objf_bp(bi,bj) |
|
./pkg/ecco/ecco_cost_final.F |
863 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_bp , myThid ) |