| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_advection.F |
281 |
GAD_ADVECTION |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
|
./pkg/generic_advdiff/gad_som_advect.F |
246 |
GAD_SOM_ADVECT |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
|
./pkg/ggl90/ggl90_calc.F |
373 |
GGL90_CALC |
xA(i,j) = _dyG(i,j,bi,bj)*drC(k)* |
|
./pkg/ggl90/ggl90_idemix.F |
246 |
GGL90_IDEMIX |
dfx(i,j) = -fxa*_dyG(i,j,bi,bj)*drC(k) |
|
./model/src/calc_adv_flow.F |
75 |
CALC_ADV_FLOW |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
|
./model/src/calc_div_ghat.F |
67 |
CALC_DIV_GHAT |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
|
./model/src/calc_grid_angles.F |
56 |
CALC_GRID_ANGLES |
IF ( _dyG(i,j,bi,bj).GT.0. ) THEN |
|
./model/src/calc_grid_angles.F |
59 |
CALC_GRID_ANGLES |
& / _dyG(i,j,bi,bj) |
|
./model/src/calc_gw.F |
222 |
CALC_GW |
xA(i,j) = _dyG(i,j,bi,bj)*rThickC_W(i,j) |
|
./model/src/calc_gw.F |
269 |
CALC_GW |
xA(i,j) = _dyG(i,j,bi,bj)*rThickC_W(i,j) |
|
./model/src/calc_gw.F |
504 |
CALC_GW |
& )*halfRL*_dyG(i,j,bi,bj)*deepFacF(k) |
|
./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/mom_fluxform/mom_fluxform.F |
271 |
MOM_FLUXFORM |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
|
./pkg/seaice/advect.F |
151 |
ADVECT |
afx(i,j) = _dyG(i,j,bi,bj) * UI(i,j,bi,bj) |
|
./pkg/seaice/diffus.F |
68 |
DIFFUS |
dfx(i,j) = _dyG(i,j,bi,bj) * _recip_dxC(i,j,bi,bj) |
|
./pkg/seaice/seaice_advdiff.F |
128 |
SEAICE_ADVDIFF |
xA(i,j,bi,bj) = _dyG(i,j,bi,bj)*_maskW(i,j,ks,bi,bj) |
|
./pkg/seaice/seaice_cost_accumulate_mean.F |
57 |
SEAICE_COST_ACCUMULATE_MEAN |
& *_dyG(i,j,bi,bj)/lastinterval*deltaTClock |
|
./pkg/seaice/seaice_init_varia.F |
121 |
SEAICE_INIT_VARIA |
& * ( _dyG(I+1,J,bi,bj) - _dyG(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_init_varia.F |
178 |
SEAICE_INIT_VARIA |
& * ( _dyG(I+1,J,bi,bj) - _dyG(I,J,bi,bj) ) |
|
./model/src/ini_cg2d.F |
103 |
INI_CG2D |
faceArea = _dyG(i,j,bi,bj)*drF(k) |
|
./model/src/ini_cg3d.F |
111 |
INI_CG3D |
faceArea = _dyG(i,j,bi,bj)*drF(k) |
|
./pkg/smooth/smooth_rhs.F |
96 |
SMOOTH_RHS |
xA(i,j,bi,bj) = _dyG(i,j,bi,bj) |
|
./pkg/thsice/thsice_advdiff.F |
221 |
THSICE_ADVDIFF |
uTrIce(i,j) = uIce(i,j)*_dyG(i,j,bi,bj) |
|
./model/src/integr_continuity.F |
109 |
INTEGR_CONTINUITY |
uTrans(i,j) = uFld(i,j,k,bi,bj)*_dyG(i,j,bi,bj) |
|
./model/src/integrate_for_w.F |
67 |
INTEGRATE_FOR_W |
& *_dyG(i,j,bi,bj)*deepFacC(k)*rhoFacC(k) |
|
./model/src/update_cg2d.F |
105 |
UPDATE_CG2D |
faceArea = _dyG(i,j,bi,bj)*drF(k) |
|
./model/src/update_cg2d.F |
86 |
UPDATE_CG2D |
faceArea = _dyG(i,j,bi,bj)*drF(k)*deepFacC(k)*rhoFacC(k) |