| 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 |
321 |
GAD_CALC_RHS |
fZon(i,j) = fZon(i,j) + df(i,j)*rhoFacC(k) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
705 |
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 |
718 |
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 |
719 |
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 |
773 |
GAD_CALC_RHS |
& *( (fZon(i+1,j)-fZon(i,j))*maskInC(i,j,bi,bj) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
791 |
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 |
413 |
MOM_FLUXFORM |
O fZon,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
422 |
MOM_FLUXFORM |
CALL MOM_U_ADV_UU( bi,bj,k,uTrans,uFld,fZon,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
446 |
MOM_FLUXFORM |
& *( ( fZon(i,j ) - fZon(i-1,j) )*uDudxFac |
|
./pkg/mom_fluxform/mom_fluxform.F |
455 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL( fZon, 'ADVx_Um ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
518 |
MOM_FLUXFORM |
CALL MOM_U_XVISCFLUX( bi,bj,k,uFld,v4F,fZon, |
|
./pkg/mom_fluxform/mom_fluxform.F |
543 |
MOM_FLUXFORM |
& *( ( fZon(i,j ) - fZon(i-1,j) )*AhDudxFac |
|
./pkg/mom_fluxform/mom_fluxform.F |
553 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fZon, 'VISCx_Um',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
642 |
MOM_FLUXFORM |
O fZon,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
650 |
MOM_FLUXFORM |
CALL MOM_V_ADV_UV( bi,bj,k,uTrans,vFld,fZon,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
673 |
MOM_FLUXFORM |
& *( ( fZon(i+1,j) - fZon(i,j ) )*uDvdxFac |
|
./pkg/mom_fluxform/mom_fluxform.F |
682 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL( fZon, 'ADVx_Vm ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
744 |
MOM_FLUXFORM |
CALL MOM_V_XVISCFLUX( bi,bj,k,vFld,v4f,hFacZ,fZon, |
|
./pkg/mom_fluxform/mom_fluxform.F |
769 |
MOM_FLUXFORM |
& *( ( fZon(i+1,j) - fZon(i,j ) )*AhDvdxFac |
|
./pkg/mom_fluxform/mom_fluxform.F |
779 |
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 |
104 |
PTRACERS_INTEGRATE |
_RL fZon (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/ptracers/ptracers_integrate.F |
318 |
PTRACERS_INTEGRATE |
O fZon, fMer, |
|
./pkg/seaice/seaice_diffusion.F |
102 |
SEAICE_DIFFUSION |
CALL DIAGNOSTICS_FILL(fZon,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/seaice/seaice_diffusion.F |
66 |
SEAICE_DIFFUSION |
_RL fZon (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_diffusion.F |
80 |
SEAICE_DIFFUSION |
fZon (i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_diffusion.F |
85 |
SEAICE_DIFFUSION |
CALL GAD_DIFF_X(bi,bj,k,xA,diffKh,iceFld,fZon,myThid) |
|
./pkg/seaice/seaice_diffusion.F |
93 |
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 |
344 |
SALT_INTEGRATE |
O fZon, fMer, |
|
./model/src/salt_integrate.F |
359 |
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 |
352 |
TEMP_INTEGRATE |
O fZon, fMer, |
|
./model/src/temp_integrate.F |
367 |
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) |