| File |
Line number |
Procedure |
Code |
|
./pkg/mom_vecinv/mom_vecinv.F |
167 |
MOM_VECINV |
vrF(i,j) = 0. |
|
./pkg/mom_vecinv/mom_vecinv.F |
333 |
MOM_VECINV |
CALL MOM_U_RVISCFLUX(bi,bj,k+1,uVel,KappaRU,vrF,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
338 |
MOM_VECINV |
fVerU(i,j,kDown) = ArDudrFac*vrF(i,j) |
|
./pkg/mom_vecinv/mom_vecinv.F |
398 |
MOM_VECINV |
CALL MOM_V_RVISCFLUX(bi,bj,k+1,vVel,KappaRV,vrF,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
403 |
MOM_VECINV |
fVerV(i,j,kDown) = ArDvdrFac*vrF(i,j) |
|
./pkg/mom_vecinv/mom_vecinv.F |
75 |
MOM_VECINV |
_RL vrF(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |