Symbol Description Uses
SM 5



File Line number Procedure Code
./pkg/my82/my82_calc.F 112 MY82_CALC
         SM(I,J,K)   = SHtmp*(beta1-beta2*RiFlux)/(beta3-beta4*RiFlux)
./pkg/my82/my82_calc.F 115 MY82_CALC
     &        b1*(SH(I,J,K)*GH(I,J) + SM(I,J,K)*GM(I,J)) )
./pkg/my82/my82_calc.F 164 MY82_CALC
         MYviscAr(I,J,K,bi,bj) = MYhbl(I,J,bi,bj)*tkel*SM(I,J,K)
./pkg/my82/my82_calc.F 70 MY82_CALC
      _RL     SM(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/my82/my82_calc.F 89 MY82_CALC
         SM(I,J,K)  = 0. _d 0