File |
Line number |
Procedure |
Code |
./pkg/mom_fluxform/mom_fluxform.F |
122 |
MOM_FLUXFORM |
_RL fVrUp(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
206 |
MOM_FLUXFORM |
fVrUp(i,j)= 0. |
./pkg/mom_fluxform/mom_fluxform.F |
528 |
MOM_FLUXFORM |
CALL MOM_U_RVISCFLUX( bi,bj, k, uVel,kappaRU,fVrUp,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
546 |
MOM_FLUXFORM |
& +( fVrDw(i,j) - fVrUp(i,j) )*rkSign*ArDudrFac |
./pkg/mom_fluxform/mom_fluxform.F |
557 |
MOM_FLUXFORM |
& CALL DIAGNOSTICS_FILL(fVrUp,'VISrE_Um',k,1,2,bi,bj,myThid) |
./pkg/mom_fluxform/mom_fluxform.F |
760 |
MOM_FLUXFORM |
CALL MOM_V_RVISCFLUX( bi,bj, k, vVel,KappaRV,fVrUp,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
778 |
MOM_FLUXFORM |
& +( fVrDw(i,j) - fVrUp(i,j) )*rkSign*ArDvdrFac |
./pkg/mom_fluxform/mom_fluxform.F |
789 |
MOM_FLUXFORM |
& CALL DIAGNOSTICS_FILL(fVrUp,'VISrE_Vm',k,1,2,bi,bj,myThid) |