| File |
Line number |
Procedure |
Code |
|
./verification/advect_cs/code/ini_vel.F |
38 |
INI_VEL |
_RL psi,omegaprime,fac |
|
./verification/advect_cs/code/ini_vel.F |
41 |
INI_VEL |
psi(i,j,bi,bj)=fac*fCoriG(i,j,bi,bj) |
|
./verification/advect_cs/code/ini_vel.F |
60 |
INI_VEL |
& +(psi(i,j,bi,bj)-psi(i,jp1,bi,bj))*recip_dyG(i,j,bi,bj) |
|
./verification/advect_cs/code/ini_vel.F |
62 |
INI_VEL |
& +(psi(ip1,j,bi,bj)-psi(i,j,bi,bj))*recip_dxG(i,j,bi,bj) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
36 |
INI_VEL |
_RL psi,omegaprime,fac |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
38 |
INI_VEL |
psi(i,j,bi,bj)=fac*fCoriG(i,j,bi,bj) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
57 |
INI_VEL |
& +(psi(i,j,bi,bj)-psi(i,jp1,bi,bj))*recip_dyg(i,j,bi,bj) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
59 |
INI_VEL |
& +(psi(ip1,j,bi,bj)-psi(i,j,bi,bj))*recip_dxg(i,j,bi,bj) |