File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_cost_weights.F |
898 |
ECCO_COST_WEIGHTS |
wscatx(i,j,bi,bj) = wscatx(i,j,bi,bj)*maskw(i,j,k,bi,bj) |
./pkg/ecco/ecco_cost_weights.F |
969 |
ECCO_COST_WEIGHTS |
wtauu(i,j,bi,bj) = wtauu(i,j,bi,bj)*maskw(i,j,k,bi,bj) |
./pkg/exf/exf_getsurfacefluxes.F |
161 |
EXF_GETSURFACEFLUXES |
& maskw, ustress, xx_tauu0, xx_tauu1, xx_tauu_dummy, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
170 |
CTRL_MAP_INI_ECCO |
& xx_uvel_dummy, boundsVec, uvel, maskw, paramSmooth, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
244 |
CTRL_MAP_INI_ECCO |
& xx_edtaux_dummy, boundsVec, eddyPsiX, maskw, paramSmooth, |