| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_v_sidedrag.F |
119 |
MOM_V_SIDEDRAG |
& -viscA4_Z(i ,j)*del2v(i,j)*sqcosFacV(j,bi,bj) ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
126 |
MOM_V_SIDEDRAG |
& -viscA4_Z(i+1,j)*del2v(i,j)*sqcosFacV(j,bi,bj) ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
92 |
MOM_V_SIDEDRAG |
& -viscA4*del2v(i,j)*sqcosFacV(j,bi,bj) |
|
./model/src/ini_spherical_polar_grid.F |
266 |
INI_SPHERICAL_POLAR_GRID |
sqcosFacV(j,bi,bj) = SQRT(cosFacV(j,bi,bj)) |
|
./model/src/ini_spherical_polar_grid.F |
271 |
INI_SPHERICAL_POLAR_GRID |
sqcosFacV(j,bi,bj)=1. |