File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_calc_rhs.F |
120 |
GAD_CALC_RHS |
_RL fZon (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_calc_rhs.F |
175 |
GAD_CALC_RHS |
fZon(i,j) = 0. _d 0 |
./pkg/generic_advdiff/gad_calc_rhs.F |
19 |
GAD_CALC_RHS |
O fZon, fMer, |
./pkg/generic_advdiff/gad_calc_rhs.F |
202 |
GAD_CALC_RHS |
CALL GAD_GRAD_X(bi,bj,k,xA,localT,fZon,myThid) |
./pkg/generic_advdiff/gad_calc_rhs.F |
204 |
GAD_CALC_RHS |
CALL GAD_DEL2(bi,bj,k,fZon,fMer,df4,myThid) |
./pkg/generic_advdiff/gad_calc_rhs.F |
210 |
GAD_CALC_RHS |
fZon(i,j) = 0. _d 0 |
./pkg/generic_advdiff/gad_calc_rhs.F |
281 |
GAD_CALC_RHS |
fZon(i,j) = fZon(i,j) + af(i,j) |
./pkg/generic_advdiff/gad_calc_rhs.F |
327 |
GAD_CALC_RHS |
fZon(i,j) = fZon(i,j) + df(i,j)*rhoFacC(k) |
./pkg/generic_advdiff/gad_calc_rhs.F |
725 |
GAD_CALC_RHS |
& *( MAX(0. _d 0,fZon(i+1,j)) + MAX(0. _d 0,-fZon(i,j)) |
./pkg/generic_advdiff/gad_calc_rhs.F |
738 |
GAD_CALC_RHS |
IF (fZon(i+1,j).GT.0. _d 0) fZon(i+1,j)=fac*fZon(i+1,j) |
./pkg/generic_advdiff/gad_calc_rhs.F |
739 |
GAD_CALC_RHS |
IF (-fZon(i,j) .GT.0. _d 0) fZon(i,j) =fac*fZon(i,j) |
./pkg/generic_advdiff/gad_calc_rhs.F |
778 |
GAD_CALC_RHS |
& *( (fZon(i+1,j)-fZon(i,j))*maskInC(i,j,bi,bj) |
./pkg/generic_advdiff/gad_calc_rhs.F |
796 |
GAD_CALC_RHS |
& fZon,fMer, k, standardMessageUnit,bi,bj,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
120 |
MOM_FLUXFORM |
_RL fZon(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
204 |
MOM_FLUXFORM |
fZon(i,j) = 0. |
./pkg/mom_fluxform/mom_fluxform.F |
414 |
MOM_FLUXFORM |
O fZon,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
423 |
MOM_FLUXFORM |
CALL MOM_U_ADV_UU( bi,bj,k,uTrans,uFld,fZon,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
447 |
MOM_FLUXFORM |
& *( ( fZon(i,j ) - fZon(i-1,j) )*uDudxFac |
./pkg/mom_fluxform/mom_fluxform.F |
456 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL( fZon, 'ADVx_Um ',k,1,2,bi,bj,myThid) |
./pkg/mom_fluxform/mom_fluxform.F |
519 |
MOM_FLUXFORM |
CALL MOM_U_XVISCFLUX( bi,bj,k,uFld,v4F,fZon, |
./pkg/mom_fluxform/mom_fluxform.F |
544 |
MOM_FLUXFORM |
& *( ( fZon(i,j ) - fZon(i-1,j) )*AhDudxFac |
./pkg/mom_fluxform/mom_fluxform.F |
554 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fZon, 'VISCx_Um',k,1,2,bi,bj,myThid) |
./pkg/mom_fluxform/mom_fluxform.F |
649 |
MOM_FLUXFORM |
O fZon,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
657 |
MOM_FLUXFORM |
CALL MOM_V_ADV_UV( bi,bj,k,uTrans,vFld,fZon,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
680 |
MOM_FLUXFORM |
& *( ( fZon(i+1,j) - fZon(i,j ) )*uDvdxFac |
./pkg/mom_fluxform/mom_fluxform.F |
689 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL( fZon, 'ADVx_Vm ',k,1,2,bi,bj,myThid) |
./pkg/mom_fluxform/mom_fluxform.F |
751 |
MOM_FLUXFORM |
CALL MOM_V_XVISCFLUX( bi,bj,k,vFld,v4f,hFacZ,fZon, |
./pkg/mom_fluxform/mom_fluxform.F |
776 |
MOM_FLUXFORM |
& *( ( fZon(i+1,j) - fZon(i,j ) )*AhDvdxFac |
./pkg/mom_fluxform/mom_fluxform.F |
786 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fZon, 'VISCx_Vm',k,1,2,bi,bj,myThid) |
./pkg/mom_fluxform/mom_u_del2u.F |
47 |
MOM_U_DEL2U |
_RL fZon(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_u_del2u.F |
55 |
MOM_U_DEL2U |
fZon(i,j) = drF(k)*_hFacC(i,j,k,bi,bj) |
./pkg/mom_fluxform/mom_u_del2u.F |
91 |
MOM_U_DEL2U |
& *( fZon(i,j ) - fZon(i-1,j) |
./pkg/mom_fluxform/mom_v_del2v.F |
46 |
MOM_V_DEL2V |
_RL fZon(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_v_del2v.F |
54 |
MOM_V_DEL2V |
fZon(i,j) = drF(k)*hFacZ(i,j) |
./pkg/mom_fluxform/mom_v_del2v.F |
90 |
MOM_V_DEL2V |
& *( fZon(i+1,j) - fZon(i, j ) |
./pkg/ptracers/ptracers_integrate.F |
107 |
PTRACERS_INTEGRATE |
_RL fZon (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/ptracers/ptracers_integrate.F |
330 |
PTRACERS_INTEGRATE |
O fZon, fMer, |
./pkg/seaice/seaice_diffusion.F |
105 |
SEAICE_DIFFUSION |
CALL DIAGNOSTICS_FILL(fZon,diagName, k,1, 2,bi,bj, myThid) |
./pkg/seaice/seaice_diffusion.F |
69 |
SEAICE_DIFFUSION |
_RL fZon (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_diffusion.F |
83 |
SEAICE_DIFFUSION |
fZon (i,j) = 0. _d 0 |
./pkg/seaice/seaice_diffusion.F |
88 |
SEAICE_DIFFUSION |
CALL GAD_DIFF_X(bi,bj,k,xA,diffKh,iceFld,fZon,myThid) |
./pkg/seaice/seaice_diffusion.F |
96 |
SEAICE_DIFFUSION |
& *( (fZon(i+1,j)-fZon(i,j)) |
./pkg/smooth/smooth_rhs.F |
167 |
SMOOTH_RHS |
fZon(i,j,k,bi,bj) = fZon(i,j,k,bi,bj) + df(i,j,bi,bj) |
./pkg/smooth/smooth_rhs.F |
329 |
SMOOTH_RHS |
CALL EXCH_UV_XYZ_RL(fZon,fMer,.TRUE.,myThid) |
./pkg/smooth/smooth_rhs.F |
342 |
SMOOTH_RHS |
& *( (fZon(i+1,j,k,bi,bj)-fZon(i,j,k,bi,bj)) |
./pkg/smooth/smooth_rhs.F |
354 |
SMOOTH_RHS |
& *( (fZon(i+1,j,k,bi,bj)-fZon(i,j,k,bi,bj)) |
./pkg/smooth/smooth_rhs.F |
63 |
SMOOTH_RHS |
_RL fZon (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy) |
./pkg/smooth/smooth_rhs.F |
77 |
SMOOTH_RHS |
fZon(i,j,k,bi,bj) = 0. _d 0 |
./model/src/salt_integrate.F |
129 |
SALT_INTEGRATE |
_RL fZon (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/salt_integrate.F |
352 |
SALT_INTEGRATE |
O fZon, fMer, |
./model/src/salt_integrate.F |
367 |
SALT_INTEGRATE |
O fZon, fMer, |
./model/src/temp_integrate.F |
133 |
TEMP_INTEGRATE |
_RL fZon (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/temp_integrate.F |
360 |
TEMP_INTEGRATE |
O fZon, fMer, |
./model/src/temp_integrate.F |
375 |
TEMP_INTEGRATE |
O fZon, fMer, |
./pkg/cheapaml/gad_2d_calc_rhs.F |
136 |
GAD_2D_CALC_RHS |
fZon(i,j) = 0. _d 0 |
./pkg/cheapaml/gad_2d_calc_rhs.F |
184 |
GAD_2D_CALC_RHS |
fZon(i,j)=fZon(i,j)+af(i,j) |
./pkg/cheapaml/gad_2d_calc_rhs.F |
201 |
GAD_2D_CALC_RHS |
fZon(i,j) = fZon(i,j) + df(i,j) |
./pkg/cheapaml/gad_2d_calc_rhs.F |
342 |
GAD_2D_CALC_RHS |
& *(fZon(i+1,j)-fZon(i,j)) |
./pkg/cheapaml/gad_2d_calc_rhs.F |
99 |
GAD_2D_CALC_RHS |
_RL fZon (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |