File |
Line number |
Procedure |
Code |
./pkg/ggl90/ggl90_calc.F |
350 |
GGL90_CALC |
yA(i,j) = _dxG(i,j,bi,bj) |
./model/src/calc_common_factors.F |
82 |
CALC_COMMON_FACTORS |
yA(i,j) = _dxG(i,j,bi,bj)*deepFacC(k) |
./model/src/calc_div_ghat.F |
66 |
CALC_DIV_GHAT |
yA(i,j) = _dxG(i,j,bi,bj)*deepFacC(k) |
./pkg/mom_common/mom_w_sidedrag.F |
102 |
MOM_W_SIDEDRAG |
& +heightStepS*_dxG(i,j,bi,bj)*_recip_dyC(i,j,bi,bj) |
./pkg/mom_common/mom_w_sidedrag.F |
116 |
MOM_W_SIDEDRAG |
& +heightStepN*_dxG(i,j+1,bi,bj)*_recip_dyC(i,j+1,bi,bj) |
./pkg/mom_fluxform/mom_fluxform.F |
259 |
MOM_FLUXFORM |
yA(i,j) = _dxG(i,j,bi,bj)*deepFacC(k) |
./model/src/calc_gw.F |
206 |
CALC_GW |
yA(i,j) = _dxG(i,j,bi,bj)*rThickC_S(i,j) |
./model/src/calc_gw.F |
245 |
CALC_GW |
yA(i,j) = _dxG(i,j,bi,bj)*rThickC_S(i,j) |
./model/src/calc_gw.F |
470 |
CALC_GW |
& )*halfRL*_dxG(i,j,bi,bj)*deepFacF(k) |
./pkg/seaice/advect.F |
116 |
ADVECT |
& * _dxG(I ,J+1,bi,bj) - |
./pkg/seaice/advect.F |
119 |
ADVECT |
& * _dxG(I,J,bi,bj))*maskInC(i,j,bi,bj) |
./pkg/seaice/advect.F |
134 |
ADVECT |
afy(I,J) = _dxG(I,J,bi,bj) * VI(I,J,bi,bj) |
./pkg/seaice/diffus.F |
67 |
DIFFUS |
& * _dxG(I+1,J+1,bi,bj)*iceMsk(I,J+1,bi,bj) |
./pkg/seaice/diffus.F |
69 |
DIFFUS |
& * _dxG(I+1,J, bi,bj)*iceMsk(I,J-1,bi,bj)) |
./pkg/seaice/diffus.F |
87 |
DIFFUS |
dfy(I,J) = _dxG(I,J,bi,bj) * _recip_dyC(I,J,bi,bj) |
./pkg/seaice/lsr.F |
235 |
LSR |
& * 1.0 _d 0 /( _dxG(I,J,bi,bj) + _dxG(I-1,J,bi,bj) ) |
./pkg/seaice/lsr.F |
241 |
LSR |
& * 1.0 _d 0 /( _dxG(I,J,bi,bj) + _dxG(I-1,J,bi,bj) ) |
./pkg/seaice/lsr.F |
481 |
LSR |
& * 1. _d 0 /( _dxG(I,J,bi,bj) + _dxG(I-1,J,bi,bj)) |
./pkg/seaice/seaice_advdiff.F |
175 |
SEAICE_ADVDIFF |
yA(i,j) = _dxG(i,j,bi,bj)*_maskS(i,j,ks,bi,bj) |
./pkg/seaice/seaice_cost_accumulate_mean.F |
63 |
SEAICE_COST_ACCUMULATE_MEAN |
& *_dxG(i,j,bi,bj)/lastinterval*deltaTClock |
./pkg/seaice/seaice_init_fixed.F |
148 |
SEAICE_INIT_FIXED |
& * ( _dxG(I,J+1,bi,bj) - _dxG(I,J,bi,bj) ) |
./pkg/smooth/smooth_rhs.F |
102 |
SMOOTH_RHS |
yA(i,j,bi,bj) = _dxG(i,j,bi,bj) |
./pkg/thsice/thsice_advdiff.F |
193 |
THSICE_ADVDIFF |
vTrIce(i,j) = vIce(i,j)*_dxG(i,j,bi,bj) |
./model/src/ini_cg2d.F |
107 |
INI_CG2D |
faceArea = _dxG(i,j,bi,bj)*drF(k) |
./model/src/ini_cg3d.F |
124 |
INI_CG3D |
faceArea = _dxG(i,j,bi,bj)*drF(K) |
./model/src/integr_continuity.F |
99 |
INTEGR_CONTINUITY |
vTrans(i,j) = vFld(i,j,k,bi,bj)*_dxG(i,j,bi,bj) |
./model/src/integrate_for_w.F |
64 |
INTEGRATE_FOR_W |
& *_dxG(i,j,bi,bj)*deepFacC(k)*rhoFacC(k) |
./model/src/rotate_spherical_polar_grid.F |
240 |
CALC_ANGLES |
IF ( _dxG(I,J,bi,bj) .GT. 0 ) vPseudo(I,J) = |
./model/src/rotate_spherical_polar_grid.F |
242 |
CALC_ANGLES |
& / _dxG(I,J,bi,bj) |
./model/src/update_cg2d.F |
87 |
UPDATE_CG2D |
faceArea = _dxG(I,J,bi,bj)*drF(K) |
./pkg/ecco/cost_atlantic.F |
162 |
COST_ATLANTIC |
$ * _dxG(i,j,bi,bj) |
./pkg/ecco/cost_atlantic.F |
206 |
COST_ATLANTIC |
$ * _dxG(i,j,bi,bj) |
./pkg/ecco/cost_averagesfields.F |
533 |
COST_AVERAGESFIELDS |
& *_dxG(i,j,bi,bj)*drF(k)*_hFacS(i,j,k,bi,bj) |
./pkg/ecco/cost_trans_merid.F |
203 |
COST_TRANS_MERID |
$ * _dxG(i,j,bi,bj) |
./pkg/ecco/cost_trans_merid.F |
208 |
COST_TRANS_MERID |
$ * _dxG(i,j,bi,bj) |
./pkg/ecco/cost_trans_merid.F |
213 |
COST_TRANS_MERID |
$ * _dxG(i,j,bi,bj) |