| File |
Line number |
Procedure |
Code |
|
./model/src/apply_forcing.F |
74 |
APPLY_FORCING_U |
locVar(i,j) = gU(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
85 |
APPLY_FORCING_U |
tmpVar(i,j) = gU(i,j,k,bi,bj) - locVar(i,j) |
|
./model/src/apply_forcing.F |
86 |
APPLY_FORCING_U |
gU(i,j,k,bi,bj) = locVar(i,j) |
|
./model/src/calc_div_ghat.F |
115 |
CALC_DIV_GHAT |
pf(i,j) = ( implicDiv2Dflow * gU(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
83 |
CALC_DIV_GHAT |
pf(i,j) = xA(i,j)*gU(i,j,k,bi,bj) / deltaTMom |
|
./model/src/calc_div_ghat.F |
92 |
CALC_DIV_GHAT |
& *xA(i,j)*gU(i,j,k,bi,bj) / deltaTMom |
|
./pkg/mom_common/mom_u_implicit_r.F |
231 |
MOM_U_IMPLICIT_R |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)*c5d(i,j,k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
243 |
MOM_U_IMPLICIT_R |
U gU(1-OLx,1-OLy,1,bi,bj), |
|
./pkg/mom_common/mom_u_implicit_r.F |
300 |
MOM_U_IMPLICIT_R |
& * (gU(i,j,k,bi,bj) - gU(i,j,k-1,bi,bj)) |
|
./pkg/mom_fluxform/mom_fluxform.F |
439 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = |
|
./pkg/mom_fluxform/mom_fluxform.F |
468 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj) |
|
./pkg/mom_fluxform/mom_fluxform.F |
477 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj) |
|
./pkg/mom_fluxform/mom_fluxform.F |
489 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj) |
|
./pkg/mom_fluxform/mom_fluxform.F |
503 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/mom_fluxform/mom_fluxform.F |
618 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+mtNHFacU*mT(i,j) |
|
./pkg/mom_fluxform/mom_fluxform.F |
627 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+mtFacU*mT(i,j) |
|
./pkg/mom_fluxform/mom_fluxform.F |
636 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+mtFacU*mT(i,j) |
|
./pkg/mom_fluxform/mom_fluxform.F |
880 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+fuFac*cf(i,j) |
|
./pkg/mom_fluxform/mom_fluxform.F |
904 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+fuFac*cf(i,j) |
|
./pkg/mom_fluxform/mom_fluxform.F |
921 |
MOM_FLUXFORM |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)*_maskW(i,j,k,bi,bj) |
|
./pkg/mom_fluxform/mom_fluxform.F |
931 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(gU(1-OLx,1-OLy,k,bi,bj), |
|
./pkg/mom_vecinv/mom_vecinv.F |
625 |
MOM_VECINV |
gU(i,j,k,bi,bj) = uCf(i,j) |
|
./pkg/mom_vecinv/mom_vecinv.F |
652 |
MOM_VECINV |
gU(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/mom_vecinv/mom_vecinv.F |
689 |
MOM_VECINV |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+uCf(i,j) |
|
./pkg/mom_vecinv/mom_vecinv.F |
760 |
MOM_VECINV |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+uCf(i,j) |
|
./pkg/mom_vecinv/mom_vecinv.F |
781 |
MOM_VECINV |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+uCf(i,j) |
|
./pkg/mom_vecinv/mom_vecinv.F |
813 |
MOM_VECINV |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+uCf(i,j) |
|
./pkg/mom_vecinv/mom_vecinv.F |
832 |
MOM_VECINV |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+uCf(i,j) |
|
./pkg/mom_vecinv/mom_vecinv.F |
846 |
MOM_VECINV |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)*_maskW(i,j,k,bi,bj) |
|
./pkg/mom_vecinv/mom_vecinv.F |
916 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(gU(1-OLx,1-OLy,k,bi,bj), |
|
./model/src/correction_step.F |
136 |
CORRECTION_STEP |
uVel(i,j,k,bi,bj)=( gU(i,j,k,bi,bj) |
|
./pkg/obcs/obcs_exchanges.F |
43 |
OBCS_EXCHANGES |
CALL EXCH_UV_XYZ_RL( gU, gV, .TRUE., myThid ) |
|
./model/src/dynamics.F |
305 |
DYNAMICS |
gU(i,j,k,bi,bj) = 0. _d 0 |
|
./model/src/dynamics.F |
599 |
DYNAMICS |
U gU(1-OLx,1-OLy,1,bi,bj), |
|
./model/src/dynamics.F |
618 |
DYNAMICS |
I gU, gV, myThid ) |
|
./model/src/dynamics.F |
619 |
DYNAMICS |
CALL OBCS_APPLY_UV( bi, bj, 0, gU, gV, myThid ) |
|
./model/src/dynamics.F |
710 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,gU,'Gu (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
726 |
DYNAMICS |
CALL EXCH_UV_XYZ_RL(gU,gV,.TRUE.,myThid) |
|
./model/src/external_forcing.F |
107 |
EXTERNAL_FORCING_U |
gU(i,j,kLev,bi,bj) = gU(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
117 |
EXTERNAL_FORCING_U |
U gU(1-OLx,1-OLy,kLev,bi,bj), |
|
./model/src/external_forcing.F |
125 |
EXTERNAL_FORCING_U |
U gU(1-OLx,1-OLy,kLev,bi,bj), |
|
./model/src/external_forcing.F |
135 |
EXTERNAL_FORCING_U |
U gU(1-OLx,1-OLy,kLev,bi,bj), |
|
./model/src/external_forcing.F |
144 |
EXTERNAL_FORCING_U |
U gU(1-OLx,1-OLy,kLev,bi,bj), |
|
./model/src/external_forcing.F |
73 |
EXTERNAL_FORCING_U |
U gU(1-OLx,1-OLy,kLev,bi,bj), |
|
./model/src/external_forcing.F |
80 |
EXTERNAL_FORCING_U |
U gU(1-OLx,1-OLy,kLev,bi,bj), |
|
./model/src/external_forcing.F |
87 |
EXTERNAL_FORCING_U |
U gU(1-OLx,1-OLy,kLev,bi,bj), |
|
./model/src/external_forcing.F |
98 |
EXTERNAL_FORCING_U |
gU(i,j,kLev,bi,bj) = gU(i,j,kLev,bi,bj) |
|
./model/src/forward_step.F |
912 |
FORWARD_STEP |
CALL SHAP_FILT_APPLY_UV( gU,gV,myTime,myIter,myThid) |
|
./model/src/forward_step.F |
924 |
FORWARD_STEP |
CALL ZONAL_FILT_APPLY_UV( gU, gV, myThid ) |
|
./pkg/seaice/seaice_mom_advection.F |
119 |
SEAICE_MOM_ADVECTION |
gU(i,j) = 0. |
|
./pkg/seaice/seaice_mom_advection.F |
16 |
SEAICE_MOM_ADVECTION |
O gU, gV, |
|
./pkg/seaice/seaice_mom_advection.F |
197 |
SEAICE_MOM_ADVECTION |
gU(i,j) = gU(i,j)+uCf(i,j) |
|
./pkg/seaice/seaice_mom_advection.F |
236 |
SEAICE_MOM_ADVECTION |
gU(i,j) = gU(i,j)+uCf(i,j) |
|
./pkg/seaice/seaice_mom_advection.F |
256 |
SEAICE_MOM_ADVECTION |
gU(i,j) = gU(i,j)*maskInW(i,j,bi,bj) |
|
./pkg/seaice/seaice_mom_advection.F |
264 |
SEAICE_MOM_ADVECTION |
CALL DIAGNOSTICS_FILL(gU, 'SIuMmAdv',k,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
55 |
SEAICE_MOM_ADVECTION |
_RL gU(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/ini_dynvars.F |
60 |
INI_DYNVARS |
gU(i,j,k,bi,bj) = 0. _d 0 |
|
./verification/hs94.128x64x5/code/external_forcing.F |
64 |
EXTERNAL_FORCING_U |
gU(i,j,kLev,bi,bj)=gU(i,j,kLev,bi,bj) |
|
./model/src/read_pickup.F |
169 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gU, 2, myIter,myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
74 |
APPLY_FORCING_U |
locVar(i,j) = gU(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
82 |
APPLY_FORCING_U |
tmpVar = gU(i,j,k,bi,bj) - locVar(i,j) |
|
./verification/rotating_tank/code/apply_forcing.F |
83 |
APPLY_FORCING_U |
gU(i,j,k,bi,bj) = locVar(i,j) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
71 |
EXTERNAL_FORCING_U |
gU(i,j,kLev,bi,bj) = gU(i,j,kLev,bi,bj) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
96 |
EXTERNAL_FORCING_U |
gU(i,j,kLev,bi,bj) = gU(i,j,kLev,bi,bj) |
|
./model/src/timestep.F |
120 |
TIMESTEP |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj) - phxFac*dPhiHydX(i,j) |
|
./model/src/timestep.F |
134 |
TIMESTEP |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj) + guDissip(i,j) |
|
./model/src/timestep.F |
144 |
TIMESTEP |
gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj) + guExt(i,j) |
|
./model/src/timestep.F |
155 |
TIMESTEP |
gUtmp(i,j) = gU(i,j,k,bi,bj) |
|
./model/src/timestep.F |
167 |
TIMESTEP |
U gU(1-OLx,1-OLy,1,bi,bj), guNm, |
|
./model/src/timestep.F |
178 |
TIMESTEP |
U gU(1-OLx,1-OLy,1,bi,bj), |
|
./model/src/timestep.F |
202 |
TIMESTEP |
gUtmp(i,j) = gU(i,j,k,bi,bj) |
|
./model/src/timestep.F |
243 |
TIMESTEP |
gUtmp(i,j) = ( gU(i,j,k,bi,bj) + guExt(i,j) ) + guCor(i,j) |
|
./model/src/timestep.F |
250 |
TIMESTEP |
gUtmp(i,j) = gU(i,j,k,bi,bj) + guCor(i,j) |
|
./model/src/timestep.F |
360 |
TIMESTEP |
gU(i,j,k,bi,bj) = uVel(i,j,k,bi,bj) |
|
./model/inc/DYNVARS.h |
39 |
NO PROCEDURE |
& gU, gV, |
|
./model/inc/DYNVARS.h |
45 |
NO PROCEDURE |
& gU, gV, |
|
./model/inc/DYNVARS.h |
54 |
NO PROCEDURE |
_RL gU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |