Symbol Description Uses
maskUp tile indices Range of points for which calculation is performed. land/water mask for Wvel points (above tracer level) 34



File Line number Procedure Code
./model/src/calc_gs.F 101 CALC_GS
     I           xA,yA,uTrans,vTrans,rTrans,rTransKp1,maskUp,
./model/src/calc_gs.F 12 CALC_GS
     I           xA,yA,uTrans,vTrans,rTrans,rTransKp1,maskUp,
./model/src/calc_gs.F 77 CALC_GS
      _RS maskUp(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./model/src/thermodynamics.F 156 THERMODYNAMICS
      _RS maskUp  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./model/src/thermodynamics.F 385 THERMODYNAMICS
     O         xA,yA,uTrans,vTrans,rTrans,maskUp,
./model/src/thermodynamics.F 429 THERMODYNAMICS
     I          maskUp,
./model/src/thermodynamics.F 450 THERMODYNAMICS
     I         xA,yA,uTrans,vTrans,rTrans,rTransKp1,maskUp,
./model/src/thermodynamics.F 465 THERMODYNAMICS
     I         xA,yA,uTrans,vTrans,rTrans,rTransKp1,maskUp,
./model/src/thermodynamics.F 480 THERMODYNAMICS
     I            maskUp,
./model/src/thermodynamics.F 489 THERMODYNAMICS
     I         xA,yA,uTrans,vTrans,rTrans,rTransKp1,maskUp,
./pkg/ptracers/ptracers_calc_diff.F 11 PTRACERS_CALC_DIFF
     I        maskUp,
./pkg/ptracers/ptracers_calc_diff.F 127 PTRACERS_CALC_DIFF
          KappaRtr(i,j,iTr) = maskUp(i,j)*KappaRtr(i,j,iTr)
./pkg/ptracers/ptracers_calc_diff.F 47 PTRACERS_CALC_DIFF
      _RS maskUp(1-Olx:sNx+Olx,1-Oly:sNy+Oly)
./pkg/ptracers/ptracers_integrate.F 101 PTRACERS_INTEGRATE
     I                   xA,yA,uTrans,vTrans,rTrans,rTransKp1,maskUp,
./pkg/ptracers/ptracers_integrate.F 13 PTRACERS_INTEGRATE
     I                               rTransKp1,maskUp,
./pkg/ptracers/ptracers_integrate.F 53 PTRACERS_INTEGRATE
      _RS maskUp  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_calc_rhs.F 12 GAD_CALC_RHS
     I           xA,yA,uTrans,vTrans,rTrans,rTransKp1,maskUp,
./pkg/generic_advdiff/gad_calc_rhs.F 453 GAD_CALC_RHS
        fVerT(i,j,kUp) = fVerT(i,j,kUp) + df(i,j)*maskUp(i,j)
./pkg/generic_advdiff/gad_calc_rhs.F 496 GAD_CALC_RHS
         fVerT(i,j,kUp) = fVerT(i,j,kUp) + df(i,j)*maskUp(i,j)
./pkg/generic_advdiff/gad_calc_rhs.F 86 GAD_CALC_RHS
      _RS maskUp(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_advection.F 119 GAD_ADVECTION
      _RS maskUp  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_advection.F 240 GAD_ADVECTION
     O         xA,yA,uTrans,vTrans,rTrans,maskUp,
./model/src/calc_diffusivity.F 12 CALC_DIFFUSIVITY
     I        maskUp,
./model/src/calc_diffusivity.F 158 CALC_DIFFUSIVITY
        KappaRT(i,j) = maskUp(i,j)*KappaRT(i,j)
./model/src/calc_diffusivity.F 159 CALC_DIFFUSIVITY
        KappaRS(i,j) = maskUp(i,j)*KappaRS(i,j)
./model/src/calc_diffusivity.F 47 CALC_DIFFUSIVITY
      _RS maskUp(1-Olx:sNx+Olx,1-Oly:sNy+Oly)
./model/src/calc_gt.F 12 CALC_GT
     I           xA,yA,uTrans,vTrans,rTrans,rTransKp1,maskUp,
./model/src/calc_gt.F 76 CALC_GT
      _RS maskUp(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./model/src/calc_gt.F 99 CALC_GT
     I           xA,yA,uTrans,vTrans,rTrans,rTransKp1,maskUp,
./model/src/calc_common_factors.F 113 CALC_COMMON_FACTORS
          rTrans(i,j) = wVel(i,j,k,bi,bj)*rA(i,j,bi,bj)*maskUp(i,j)
./model/src/calc_common_factors.F 11 CALC_COMMON_FACTORS
     O        xA,yA,uTrans,vTrans,rTrans,maskUp,
./model/src/calc_common_factors.F 54 CALC_COMMON_FACTORS
      _RS maskUp(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./model/src/calc_common_factors.F 79 CALC_COMMON_FACTORS
          maskUp(i,j) = 0.
./model/src/calc_common_factors.F 85 CALC_COMMON_FACTORS
          maskUp(i,j) = maskC(i,j,k-1,bi,bj)*maskC(i,j,k,bi,bj)