File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_cost_final.F |
134 |
ECCO_COST_FINAL |
_RL no_atemp, no_aqh, no_precip, no_swflux, no_swdown |
./pkg/ecco/ecco_cost_final.F |
1401 |
ECCO_COST_FINAL |
& 'f_swflux =', f_swflux, no_swflux |
./pkg/ecco/ecco_cost_final.F |
1437 |
ECCO_COST_FINAL |
& 'f_swfluxsmoo =', f_swfluxsmoo, no_swflux |
./pkg/ecco/ecco_cost_final.F |
335 |
ECCO_COST_FINAL |
no_swflux = 0. _d 0 |
./pkg/ecco/ecco_cost_final.F |
699 |
ECCO_COST_FINAL |
no_swflux = no_swflux + num_swflux(bi,bj) |
./pkg/ecco/ecco_cost_final.F |
949 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_swflux , myThid ) |