Symbol Description Uses
kUp Index for interface above and below. kUp and kDown are 165


File Line number Procedure Code
./pkg/generic_advdiff/gad_advection.F 1014 GAD_ADVECTION 
     &      -deltaTLev(k)*( fVerT(i,j,kDown)-fVerT(i,j,kUp) )
./pkg/generic_advdiff/gad_advection.F 1043 GAD_ADVECTION 
     &       *( fVerT(i,j,kDown)-fVerT(i,j,kUp)
./pkg/generic_advdiff/gad_advection.F 1055 GAD_ADVECTION 
          CALL DIAGNOSTICS_FILL( fVerT(1-OLx,1-OLy,kUp),
./pkg/generic_advdiff/gad_advection.F 1060 GAD_ADVECTION 
          CALL LAYERS_FILL( fVerT(1-OLx,1-OLy,kUp), trIdentity,
./pkg/generic_advdiff/gad_advection.F 133 GAD_ADVECTION 
      INTEGER i,j,k,kUp,kDown
./pkg/generic_advdiff/gad_advection.F 904 GAD_ADVECTION 
        kUp  = 1+MOD(k+1,2)
./pkg/generic_advdiff/gad_advection.F 929 GAD_ADVECTION 
           fVerT(i,j,kUp) = 0.
./pkg/generic_advdiff/gad_advection.F 942 GAD_ADVECTION 
           fVerT(i,j,kUp) = 0.
./pkg/generic_advdiff/gad_advection.F 958 GAD_ADVECTION 
     O              fVerT(1-OLx,1-OLy,kUp), myThid )
./pkg/generic_advdiff/gad_advection.F 962 GAD_ADVECTION 
     O              fVerT(1-OLx,1-OLy,kUp), myThid )
./pkg/generic_advdiff/gad_advection.F 966 GAD_ADVECTION 
     O              fVerT(1-OLx,1-OLy,kUp), myThid )
./pkg/generic_advdiff/gad_advection.F 970 GAD_ADVECTION 
     O              fVerT(1-OLx,1-OLy,kUp), myThid )
./pkg/generic_advdiff/gad_advection.F 975 GAD_ADVECTION 
     O              fVerT(1-OLx,1-OLy,kUp), myThid )
./pkg/generic_advdiff/gad_advection.F 985 GAD_ADVECTION 
             fVerT(i,j,kUp) = afr(i,j,k)
./pkg/generic_advdiff/gad_calc_rhs.F 11 GAD_CALC_RHS 
     I           bi,bj,iMin,iMax,jMin,jMax,k,kM1,kUp,kDown,
./pkg/generic_advdiff/gad_calc_rhs.F 177 GAD_CALC_RHS 
        fVerT(i,j,kUp) = 0. _d 0
./pkg/generic_advdiff/gad_calc_rhs.F 587 GAD_CALC_RHS 
          fVerT(i,j,kUp) = fVerT(i,j,kUp) + af(i,j)*maskInC(i,j,bi,bj)
./pkg/generic_advdiff/gad_calc_rhs.F 636 GAD_CALC_RHS 
        fVerT(i,j,kUp) = fVerT(i,j,kUp) + df(i,j)*maskUp(i,j)
./pkg/generic_advdiff/gad_calc_rhs.F 689 GAD_CALC_RHS 
         fVerT(i,j,kUp) = fVerT(i,j,kUp)
./pkg/generic_advdiff/gad_calc_rhs.F 728 GAD_CALC_RHS 
     &      +MAX(0. _d 0,-fVerT(i,j,kUp)*rkSign)
./pkg/generic_advdiff/gad_calc_rhs.F 742 GAD_CALC_RHS 
           IF (-fVerT(i,j,kUp)*rkSign .GT.0. _d 0)
./pkg/generic_advdiff/gad_calc_rhs.F 743 GAD_CALC_RHS 
     &       fVerT(i,j,kUp)=fac*fVerT(i,j,kUp)
./pkg/generic_advdiff/gad_calc_rhs.F 780 GAD_CALC_RHS 
     &     +(fVerT(i,j,kDown)-fVerT(i,j,kUp))*rkSign
./pkg/generic_advdiff/gad_calc_rhs.F 89 GAD_CALC_RHS 
      INTEGER k,kUp,kDown,kM1
./pkg/generic_advdiff/gad_som_adv_r.F 11 GAD_SOM_ADV_R 
     I           bi,bj,k, kUp, kDw,
./pkg/generic_advdiff/gad_som_adv_r.F 160 GAD_SOM_ADV_R 
          fp_v (i,j,kUp) = MAX( zeroRL,  wLoc )
./pkg/generic_advdiff/gad_som_adv_r.F 161 GAD_SOM_ADV_R 
          alp  (i,j,kUp) = fp_v(i,j,kUp)/sm_v(i,j,k)
./pkg/generic_advdiff/gad_som_adv_r.F 162 GAD_SOM_ADV_R 
          alpq           = alp(i,j,kUp)*alp(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 163 GAD_SOM_ADV_R 
          alp1           = 1. _d 0 - alp(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 166 GAD_SOM_ADV_R 
          fp_o (i,j,kUp) = alp(i,j,kUp)*
./pkg/generic_advdiff/gad_som_adv_r.F 168 GAD_SOM_ADV_R 
     &                   + alp1*(alp1-alp(i,j,kUp))*sm_zz(i,j, k )
./pkg/generic_advdiff/gad_som_adv_r.F 170 GAD_SOM_ADV_R 
          fp_z (i,j,kUp) = alpq*
./pkg/generic_advdiff/gad_som_adv_r.F 172 GAD_SOM_ADV_R 
          fp_zz(i,j,kUp) = alp(i,j,kUp)*alpq*sm_zz(i,j, k )
./pkg/generic_advdiff/gad_som_adv_r.F 173 GAD_SOM_ADV_R 
          fp_x (i,j,kUp) = alp(i,j,kUp)*
./pkg/generic_advdiff/gad_som_adv_r.F 175 GAD_SOM_ADV_R 
          fp_y (i,j,kUp) = alp(i,j,kUp)*
./pkg/generic_advdiff/gad_som_adv_r.F 177 GAD_SOM_ADV_R 
          fp_xz(i,j,kUp) = alpq        *sm_xz(i,j, k )
./pkg/generic_advdiff/gad_som_adv_r.F 178 GAD_SOM_ADV_R 
          fp_yz(i,j,kUp) = alpq        *sm_yz(i,j, k )
./pkg/generic_advdiff/gad_som_adv_r.F 179 GAD_SOM_ADV_R 
          fp_xx(i,j,kUp) = alp(i,j,kUp)*sm_xx(i,j, k )
./pkg/generic_advdiff/gad_som_adv_r.F 180 GAD_SOM_ADV_R 
          fp_yy(i,j,kUp) = alp(i,j,kUp)*sm_yy(i,j, k )
./pkg/generic_advdiff/gad_som_adv_r.F 181 GAD_SOM_ADV_R 
          fp_xy(i,j,kUp) = alp(i,j,kUp)*sm_xy(i,j, k )
./pkg/generic_advdiff/gad_som_adv_r.F 192 GAD_SOM_ADV_R 
          fn_v (i,j,kUp) = MAX( zeroRL, -wLoc )
./pkg/generic_advdiff/gad_som_adv_r.F 193 GAD_SOM_ADV_R 
          aln  (i,j,kUp) = fn_v(i,j,kUp)/sm_v(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 194 GAD_SOM_ADV_R 
          alnq           = aln(i,j,kUp)*aln(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 195 GAD_SOM_ADV_R 
          aln1           = 1. _d 0 - aln(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 198 GAD_SOM_ADV_R 
          fn_o (i,j,kUp) = aln(i,j,kUp)*sm_o(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 199 GAD_SOM_ADV_R 
          fn_z (i,j,kUp) = zeroRL
./pkg/generic_advdiff/gad_som_adv_r.F 200 GAD_SOM_ADV_R 
          fn_zz(i,j,kUp) = zeroRL
./pkg/generic_advdiff/gad_som_adv_r.F 201 GAD_SOM_ADV_R 
          fn_x (i,j,kUp) = aln(i,j,kUp)*sm_x(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 202 GAD_SOM_ADV_R 
          fn_y (i,j,kUp) = aln(i,j,kUp)*sm_y(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 203 GAD_SOM_ADV_R 
          fn_xz(i,j,kUp) = zeroRL
./pkg/generic_advdiff/gad_som_adv_r.F 204 GAD_SOM_ADV_R 
          fn_yz(i,j,kUp) = zeroRL
./pkg/generic_advdiff/gad_som_adv_r.F 205 GAD_SOM_ADV_R 
          fn_xx(i,j,kUp) = aln(i,j,kUp)*sm_xx(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 206 GAD_SOM_ADV_R 
          fn_yy(i,j,kUp) = aln(i,j,kUp)*sm_yy(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 207 GAD_SOM_ADV_R 
          fn_xy(i,j,kUp) = aln(i,j,kUp)*sm_xy(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 209 GAD_SOM_ADV_R 
          wT(i,j) = ( fp_o(i,j,kUp) - fn_o(i,j,kUp) )*recip_dT
./pkg/generic_advdiff/gad_som_adv_r.F 219 GAD_SOM_ADV_R 
          fn_v (i,j,kUp) = MAX( zeroRL, -wLoc )
./pkg/generic_advdiff/gad_som_adv_r.F 220 GAD_SOM_ADV_R 
          aln  (i,j,kUp) = fn_v(i,j,kUp)/sm_v(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 221 GAD_SOM_ADV_R 
          alnq           = aln(i,j,kUp)*aln(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 222 GAD_SOM_ADV_R 
          aln1           = 1. _d 0 - aln(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 225 GAD_SOM_ADV_R 
          fn_o (i,j,kUp) = aln(i,j,kUp)*
./pkg/generic_advdiff/gad_som_adv_r.F 227 GAD_SOM_ADV_R 
     &                   + aln1*(aln1-aln(i,j,kUp))*sm_zz(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 229 GAD_SOM_ADV_R 
          fn_z (i,j,kUp) = alnq*
./pkg/generic_advdiff/gad_som_adv_r.F 231 GAD_SOM_ADV_R 
          fn_zz(i,j,kUp) = aln(i,j,kUp)*alnq*sm_zz(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 232 GAD_SOM_ADV_R 
          fn_x (i,j,kUp) = aln(i,j,kUp)*
./pkg/generic_advdiff/gad_som_adv_r.F 234 GAD_SOM_ADV_R 
          fn_y (i,j,kUp) = aln(i,j,kUp)*
./pkg/generic_advdiff/gad_som_adv_r.F 236 GAD_SOM_ADV_R 
          fn_xz(i,j,kUp) = alnq        *sm_xz(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 237 GAD_SOM_ADV_R 
          fn_yz(i,j,kUp) = alnq        *sm_yz(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 238 GAD_SOM_ADV_R 
          fn_xx(i,j,kUp) = aln(i,j,kUp)*sm_xx(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 239 GAD_SOM_ADV_R 
          fn_yy(i,j,kUp) = aln(i,j,kUp)*sm_yy(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 240 GAD_SOM_ADV_R 
          fn_xy(i,j,kUp) = aln(i,j,kUp)*sm_xy(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 242 GAD_SOM_ADV_R 
          wT(i,j) = ( fp_o(i,j,kUp) - fn_o(i,j,kUp) )*recip_dT
./pkg/generic_advdiff/gad_som_adv_r.F 260 GAD_SOM_ADV_R 
          fn_v (i,j,kUp) = MAX( zeroRL, -wLoc )
./pkg/generic_advdiff/gad_som_adv_r.F 261 GAD_SOM_ADV_R 
          aln  (i,j,kUp) = fn_v(i,j,kUp)/sm_v(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 264 GAD_SOM_ADV_R 
          fn_o (i,j,kUp) = aln(i,j,kUp)*sm_o(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 265 GAD_SOM_ADV_R 
          fn_x (i,j,kUp) = aln(i,j,kUp)*sm_x(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 266 GAD_SOM_ADV_R 
          fn_y (i,j,kUp) = aln(i,j,kUp)*sm_y(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 267 GAD_SOM_ADV_R 
          fn_xx(i,j,kUp) = aln(i,j,kUp)*sm_xx(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 268 GAD_SOM_ADV_R 
          fn_yy(i,j,kUp) = aln(i,j,kUp)*sm_yy(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 269 GAD_SOM_ADV_R 
          fn_xy(i,j,kUp) = aln(i,j,kUp)*sm_xy(i,j,km1)
./pkg/generic_advdiff/gad_som_adv_r.F 271 GAD_SOM_ADV_R 
          wT(i,j) = ( fp_o(i,j,kUp) - fn_o(i,j,kUp) )*recip_dT
./pkg/generic_advdiff/gad_som_adv_r.F 285 GAD_SOM_ADV_R 
        alf1  = 1. _d 0 - aln(i,j,kDw) - alp(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 287 GAD_SOM_ADV_R 
        alpmn = alp(i,j,kUp) - aln(i,j,kDw)
./pkg/generic_advdiff/gad_som_adv_r.F 288 GAD_SOM_ADV_R 
        sm_v (i,j,k) = sm_v (i,j,k) - fn_v (i,j,kDw) - fp_v (i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 289 GAD_SOM_ADV_R 
        sm_o (i,j,k) = sm_o (i,j,k) - fn_o (i,j,kDw) - fp_o (i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 294 GAD_SOM_ADV_R 
        sm_x (i,j,k) = sm_x (i,j,k) - fn_x (i,j,kDw) - fp_x (i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 295 GAD_SOM_ADV_R 
        sm_xx(i,j,k) = sm_xx(i,j,k) - fn_xx(i,j,kDw) - fp_xx(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 296 GAD_SOM_ADV_R 
        sm_y (i,j,k) = sm_y (i,j,k) - fn_y (i,j,kDw) - fp_y (i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 297 GAD_SOM_ADV_R 
        sm_yy(i,j,k) = sm_yy(i,j,k) - fn_yy(i,j,kDw) - fp_yy(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 298 GAD_SOM_ADV_R 
        sm_xy(i,j,k) = sm_xy(i,j,k) - fn_xy(i,j,kDw) - fp_xy(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 313 GAD_SOM_ADV_R 
        sm_v (i,j,k) = sm_v (i,j,k) + fp_v (i,j,kDw) + fn_v (i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 315 GAD_SOM_ADV_R 
        alfn = fn_v(i,j,kUp)/sm_v(i,j,k)
./pkg/generic_advdiff/gad_som_adv_r.F 321 GAD_SOM_ADV_R 
        locTn = alfn*sm_o(i,j,k) - aln1*fn_o(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 323 GAD_SOM_ADV_R 
     &                                        + alfn*alfn*fn_zz(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 325 GAD_SOM_ADV_R 
     &                                        - alfn*aln1*fn_z(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 330 GAD_SOM_ADV_R 
     &                                   + alfn*fn_xz(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 332 GAD_SOM_ADV_R 
     &                                   + aln1*fn_x(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 335 GAD_SOM_ADV_R 
     &                                   + alfn*fn_yz(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 337 GAD_SOM_ADV_R 
     &                                   + aln1*fn_y(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 340 GAD_SOM_ADV_R 
     &                                  + alfn*fn_z(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 342 GAD_SOM_ADV_R 
        sm_o (i,j,k) = sm_o (i,j,k) + fp_o (i,j,kDw) + fn_o (i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 343 GAD_SOM_ADV_R 
        sm_x (i,j,k) = sm_x (i,j,k) + fp_x (i,j,kDw) + fn_x (i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 344 GAD_SOM_ADV_R 
        sm_xx(i,j,k) = sm_xx(i,j,k) + fp_xx(i,j,kDw) + fn_xx(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 345 GAD_SOM_ADV_R 
        sm_y (i,j,k) = sm_y (i,j,k) + fp_y (i,j,kDw) + fn_y (i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 346 GAD_SOM_ADV_R 
        sm_yy(i,j,k) = sm_yy(i,j,k) + fp_yy(i,j,kDw) + fn_yy(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 347 GAD_SOM_ADV_R 
        sm_xy(i,j,k) = sm_xy(i,j,k) + fp_xy(i,j,kDw) + fn_xy(i,j,kUp)
./pkg/generic_advdiff/gad_som_adv_r.F 55 GAD_SOM_ADV_R 
      INTEGER bi,bj,k, kUp, kDw
./pkg/generic_advdiff/gad_som_advect.F 475 GAD_SOM_ADVECT 
        kUp  = 1+MOD(Nr-k,2)
./pkg/generic_advdiff/gad_som_advect.F 556 GAD_SOM_ADVECT 
     I                     bi,bj,k, kUp, kDown,
./pkg/generic_advdiff/gad_som_advect.F 94 GAD_SOM_ADVECT 
      INTEGER i,j,k,km1,kUp,kDown
./pkg/ptracers/ptracers_integrate.F 275 PTRACERS_INTEGRATE 
          kUp  = 1+MOD(k+1,2)
./pkg/ptracers/ptracers_integrate.F 314 PTRACERS_INTEGRATE 
     I             bi,bj, iMin,iMax,jMin,jMax, k,kM1, kUp,kDown,
./pkg/ptracers/ptracers_integrate.F 98 PTRACERS_INTEGRATE 
      INTEGER kUp, kDown, kM1
./model/src/dynamics.F 187 DYNAMICS 
      INTEGER k, km1, kp1, kUp, kDown
./model/src/dynamics.F 529 DYNAMICS 
     U         fVerU(1-OLx,1-OLy,kUp),   fVerV(1-OLx,1-OLy,kUp),
./model/src/dynamics.F 539 DYNAMICS 
     I         fVerU(1-OLx,1-OLy,kUp),   fVerV(1-OLx,1-OLy,kUp),
./model/src/salt_integrate.F 121 SALT_INTEGRATE 
      INTEGER kUp, kDown, kM1
./model/src/salt_integrate.F 295 SALT_INTEGRATE 
        kUp  = 1+MOD(k+1,2)
./model/src/salt_integrate.F 342 SALT_INTEGRATE 
     I           bi, bj, iMin,iMax,jMin,jMax, k, kM1, kUp, kDown,
./model/src/salt_integrate.F 357 SALT_INTEGRATE 
     I           bi, bj, iMin,iMax,jMin,jMax, k, kM1, kUp, kDown,
./model/src/temp_integrate.F 125 TEMP_INTEGRATE 
      INTEGER kUp, kDown, kM1
./model/src/temp_integrate.F 303 TEMP_INTEGRATE 
        kUp  = 1+MOD(k+1,2)
./model/src/temp_integrate.F 350 TEMP_INTEGRATE 
     I           bi, bj, iMin,iMax,jMin,jMax, k, kM1, kUp, kDown,
./model/src/temp_integrate.F 365 TEMP_INTEGRATE 
     I           bi, bj, iMin,iMax,jMin,jMax, k, kM1, kUp, kDown,