| File |
Line number |
Procedure |
Code |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
120 |
MOM_VI_DEL2UV |
if(northWestCorner.and.i.eq.0.and.j.eq.sNy+1) Dij=hDiv(1,sNy+1) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
143 |
MOM_VI_DEL2UV |
Dij=hDiv(sNx,sNy+1) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
165 |
MOM_VI_DEL2UV |
& + ( Dij-Dim )*recip_DYC(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 |
86 |
MOM_VI_DEL2UV |
Dij= hDiv( i , j ) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
97 |
MOM_VI_DEL2UV |
uDij=Dij |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
287 |
MOM_VI_HDISSIP |
Dij=hDiv( i , j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
297 |
MOM_VI_HDISSIP |
Dij=Dij*viscAh_D(i,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 |
309 |
MOM_VI_HDISSIP |
& +( Dij-Dim )*recip_DYC(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 |
317 |
MOM_VI_HDISSIP |
& + viscAhD* ( Dij-Dim )*recip_DYC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
342 |
MOM_VI_HDISSIP |
Dij=dyF( i , j ,bi,bj)*dStar( i , j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
350 |
MOM_VI_HDISSIP |
Dij=dStar( i , j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
362 |
MOM_VI_HDISSIP |
Dij=Dij*viscA4_D(i,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 |
375 |
MOM_VI_HDISSIP |
& + ( Dij-Dim ) ) |
|
./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 |
382 |
MOM_VI_HDISSIP |
& + viscA4*( Dij-Dim ) ) |
|
./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 |
390 |
MOM_VI_HDISSIP |
& +( Dij-Dim )*recip_DYC(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 |
398 |
MOM_VI_HDISSIP |
& + viscA4D* ( Dij-Dim )*recip_DYC(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 |