File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_cost_weights.F |
1038 |
ECCO_COST_WEIGHTS |
wtauv(i,j,bi,bj) = wtauv(i,j,bi,bj)*masks(i,j,k,bi,bj) |
./pkg/ecco/ecco_cost_weights.F |
905 |
ECCO_COST_WEIGHTS |
wscaty(i,j,bi,bj) = wscaty(i,j,bi,bj)*masks(i,j,k,bi,bj) |
./pkg/exf/exf_getsurfacefluxes.F |
169 |
EXF_GETSURFACEFLUXES |
& masks, vstress, xx_tauv0, xx_tauv1, xx_tauv_dummy, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
174 |
CTRL_MAP_INI_ECCO |
& xx_vvel_dummy, boundsVec, vvel, masks, paramSmooth, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
248 |
CTRL_MAP_INI_ECCO |
& xx_edtauy_dummy, boundsVec, eddyPsiY, masks, paramSmooth, |