| File |
Line number |
Procedure |
Code |
|
./pkg/mom_fluxform/mom_fluxform.F |
254 |
MOM_FLUXFORM |
xA(i,j) = _dyG(i,j,bi,bj) |
|
./model/src/ini_cg2d.F |
96 |
INI_CG2D |
faceArea = _dyG(I,J,bi,bj)*drF(K) |
|
./model/src/ini_cg3d.F |
113 |
INI_CG3D |
faceArea = _dyG(I,J,bi,bj)*drF(K) |
|
./model/src/integr_continuity.F |
84 |
INTEGR_CONTINUITY |
uTrans(i,j) = uFld(i,j,k,bi,bj)*_dyG(i,j,bi,bj) |
|
./model/src/update_cg2d.F |
82 |
UPDATE_CG2D |
faceArea = _dyG(I,J,bi,bj)*drF(K) |
|
./model/src/calc_gw.F |
165 |
CALC_GW |
xA(i,j) = _dyG(i,j,bi,bj)*rThickC_W(i,j) |
|
./model/src/calc_gw.F |
343 |
CALC_GW |
& )*halfRL*_dyG(i,j,bi,bj) |
|
./model/src/solve_for_pressure.F |
170 |
SOLVE_FOR_PRESSURE |
uf(i,j) = _dyG(i,j,bi,bj) |
|
./model/src/integrate_for_w.F |
53 |
INTEGRATE_FOR_W |
& _dyG(i,j,bi,bj) |
|
./model/src/calc_common_factors.F |
80 |
CALC_COMMON_FACTORS |
xA(i,j) = _dyG(i,j,bi,bj)*drF(k)*_hFacW(i,j,k,bi,bj) |
|
./pkg/ggl90/ggl90_calc.F |
216 |
GGL90_CALC |
xA(i,j) = _dyG(i,j,bi,bj) |
|
./pkg/mom_common/mom_w_sidedrag.F |
82 |
MOM_W_SIDEDRAG |
& *( heightStepW*_dyG( i ,j,bi,bj)*_recip_dxC( i ,j,bi,bj) |
|
./pkg/mom_common/mom_w_sidedrag.F |
92 |
MOM_W_SIDEDRAG |
& +heightStepE*_dyG(i+1,j,bi,bj)*_recip_dxC(i+1,j,bi,bj) |
|
./pkg/ecco/cost_trans_zonal.F |
191 |
COST_TRANS_ZONAL |
$ * _dyG(i,j,bi,bj) |
|
./pkg/ecco/cost_trans_zonal.F |
196 |
COST_TRANS_ZONAL |
$ * _dyG(i,j,bi,bj) |
|
./pkg/ecco/cost_trans_zonal.F |
201 |
COST_TRANS_ZONAL |
$ * _dyG(i,j,bi,bj) |
|
./pkg/seaice/advect.F |
109 |
ADVECT |
& + _dyG(I+1,J,bi,bj) * |
|
./pkg/seaice/advect.F |
112 |
ADVECT |
& - _dyG(I,J,bi,bj) * |
|
./pkg/seaice/advect.F |
182 |
ADVECT |
& + _dyG(I+1,J ,bi,bj) * |
|
./pkg/seaice/advect.F |
185 |
ADVECT |
& - _dyG(I ,J ,bi,bj) * |
|
./pkg/seaice/seaice_advection.F |
235 |
SEAICE_ADVECTION |
xA(i,j) = _dyG(i,j,bi,bj) * maskW(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_advdiff.F |
176 |
SEAICE_ADVDIFF |
xA(i,j) = _dyG(i,j,bi,bj)*_maskW(i,j,k,bi,bj) |
|
./pkg/seaice/diffus.F |
75 |
DIFFUS |
& + _dyG(I+1,J,bi,bj) * _recip_dxC(I+1,J,bi,bj) |
|
./pkg/seaice/diffus.F |
78 |
DIFFUS |
& - _dyG(I ,J,bi,bj) * _recip_dxC(I ,J,bi,bj) |