| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_final.F |
1130 |
ECCO_COST_FINAL |
& 'f_ctdt =', f_ctdt, no_ctdt |
|
./pkg/ecco/ecco_cost_final.F |
183 |
ECCO_COST_FINAL |
f_ctdt = 0. _d 0 |
|
./pkg/ecco/ecco_cost_final.F |
467 |
ECCO_COST_FINAL |
f_ctdt = f_ctdt + objf_ctdt(bi,bj) |
|
./pkg/ecco/ecco_cost_final.F |
662 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ctdt , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
72 |
ECCO_COST_FINAL |
_RL f_sst, f_tmi, f_sss, f_bp, f_atl, f_ctdt, f_ctds |
|
./pkg/ecco/ecco_cost_final.F |
893 |
ECCO_COST_FINAL |
& ' --> f_ctdt =',f_ctdt |