| File |
Line number |
Procedure |
Code |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
108 |
MOM_VI_DEL2UV |
if(southWestCorner.and.i.eq.1.and.j.eq.0) Dmj=hDiv(0,1) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
119 |
MOM_VI_DEL2UV |
if(northWestCorner.and.i.eq.1.and.j.eq.sNy+1) Dmj=hDiv(0,sNy) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
154 |
MOM_VI_DEL2UV |
& + ( uDij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
36 |
MOM_VI_DEL2UV |
_RL Zip,Zij,Zpj,Dim,Dij,Dmj,uDij |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
87 |
MOM_VI_DEL2UV |
Dmj= hDiv(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
288 |
MOM_VI_HDISSIP |
Dmj=hDiv(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
299 |
MOM_VI_HDISSIP |
Dmj=Dmj*viscAh_D(i-1,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
304 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
312 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
343 |
MOM_VI_HDISSIP |
Dmj=dyF(i-1, j ,bi,bj)*dStar(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
351 |
MOM_VI_HDISSIP |
Dmj=dStar(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
364 |
MOM_VI_HDISSIP |
Dmj=Dmj*viscA4_D(i-1,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
371 |
MOM_VI_HDISSIP |
& ( (Dij-Dmj)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
378 |
MOM_VI_HDISSIP |
& viscA4*( (Dij-Dmj)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
385 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
393 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
47 |
MOM_VI_HDISSIP |
_RL Zip,Zij,Zpj,Dim,Dij,Dmj,uD2,vD2,uD4,vD4 |