| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_biharm_x.F |
61 |
GAD_BIHARM_X |
& *cosFacU(j,bi,bj) |
|
./pkg/generic_advdiff/gad_diff_x.F |
57 |
GAD_DIFF_X |
& *cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_u_sidedrag.F |
130 |
MOM_U_SIDEDRAG |
& *( viscAh_Z(i,j )*uFld(i,j)*cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_u_sidedrag.F |
134 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j )*del2u(i,j)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
142 |
MOM_U_SIDEDRAG |
& *( viscAh_Z(i,j+1)*uFld(i,j)*cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_u_sidedrag.F |
146 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j+1)*del2u(i,j)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
94 |
MOM_U_SIDEDRAG |
& viscAh*uFld(i,j)*cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_u_sidedrag.F |
98 |
MOM_U_SIDEDRAG |
& -viscA4*del2u(i,j)*cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_w_sidedrag.F |
89 |
MOM_W_SIDEDRAG |
& *cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_w_sidedrag.F |
99 |
MOM_W_SIDEDRAG |
& *cosFacU(j,bi,bj) |
|
./pkg/mom_fluxform/mom_u_xviscflux.F |
60 |
MOM_U_XVISCFLUX |
& *cosFacU(J,bi,bj) |
|
./pkg/mom_fluxform/mom_u_xviscflux.F |
65 |
MOM_U_XVISCFLUX |
& *cosFacU(J,bi,bj) |
|
./pkg/mom_fluxform/mom_v_yviscflux.F |
61 |
MOM_V_YVISCFLUX |
& *cosFacU(J,bi,bj) |
|
./pkg/mom_fluxform/mom_v_yviscflux.F |
68 |
MOM_V_YVISCFLUX |
& *cosFacU(J,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
159 |
MOM_VI_HDISSIP |
& ( (Dij-Dmj)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
162 |
MOM_VI_HDISSIP |
& *cosFacU(j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
177 |
MOM_VI_HDISSIP |
& viscA4*( (Dij-Dmj)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
180 |
MOM_VI_HDISSIP |
& *cosFacU(j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
192 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
195 |
MOM_VI_HDISSIP |
& *cosFacU(j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
209 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
213 |
MOM_VI_HDISSIP |
& *cosFacU(j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
74 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
77 |
MOM_VI_HDISSIP |
& *cosFacU(j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
95 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
99 |
MOM_VI_HDISSIP |
& *cosFacU(j,bi,bj) |
|
./model/src/calc_gw.F |
338 |
CALC_GW |
& *cosFacU(j,bi,bj) |
|
./model/src/calc_gw.F |
345 |
CALC_GW |
& *cosFacU(j,bi,bj) |
|
./pkg/seaice/diffus.F |
85 |
DIFFUS |
& * cosFacU(J,bi,bj) |
|
./model/src/ini_cartesian_grid.F |
226 |
INI_CARTESIAN_GRID |
cosFacU(j,bi,bj)=1. |
|
./model/src/ini_curvilinear_grid.F |
90 |
INI_CURVILINEAR_GRID |
cosFacU(j,bi,bj)=1. |
|
./model/src/ini_cylinder_grid.F |
236 |
INI_CYLINDER_GRID |
cosFacU(j,bi,bj)=1. |
|
./model/src/ini_spherical_polar_grid.F |
334 |
INI_SPHERICAL_POLAR_GRID |
cosFacU(j,bi,bj)=COS(yC(1,j,bi,bj)*deg2rad) |
|
./model/src/ini_spherical_polar_grid.F |
338 |
INI_SPHERICAL_POLAR_GRID |
cosFacU(j,bi,bj)=ABS(cosFacU(j,bi,bj)) |
|
./model/src/ini_spherical_polar_grid.F |
340 |
INI_SPHERICAL_POLAR_GRID |
sqcosFacU(j,bi,bj)=SQRT(cosFacU(j,bi,bj)) |
|
./model/src/ini_spherical_polar_grid.F |
343 |
INI_SPHERICAL_POLAR_GRID |
cosFacU(j,bi,bj)=1. |
|
./model/inc/GRID.h |
314 |
NO PROCEDURE |
& cosFacU, cosFacV, sqCosFacU, sqCosFacV, |
|
./model/inc/GRID.h |
318 |
NO PROCEDURE |
_RL cosFacU (1-Oly:sNy+Oly,nSx,nSy) |