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 |
1399 |
ECCO_COST_FINAL |
& 'f_precip =', f_precip, no_precip |
./pkg/ecco/ecco_cost_final.F |
1435 |
ECCO_COST_FINAL |
& 'f_precipsmoo =', f_precipsmoo, no_precip |
./pkg/ecco/ecco_cost_final.F |
334 |
ECCO_COST_FINAL |
no_precip = 0. _d 0 |
./pkg/ecco/ecco_cost_final.F |
698 |
ECCO_COST_FINAL |
no_precip = no_precip + num_precip(bi,bj) |
./pkg/ecco/ecco_cost_final.F |
948 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_precip , myThid ) |