Symbol Description Uses
d5d 1rst upper diagonal of the pentadiagonal matrix 59



File Line number Procedure Code
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 12 GAD_DST3FL_IMPL_R
     O           a5d, b5d, c5d, d5d, e5d,
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 163 GAD_DST3FL_IMPL_R
           d5d(i,j,k)   = d5d(i,j,k)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 175 GAD_DST3FL_IMPL_R
           d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 59 GAD_DST3FL_IMPL_R
      _RL     d5d   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/generic_advdiff/gad_implicit_r.F 110 GAD_IMPLICIT_R
         d5d(i,j,k) = 0. _d 0
./pkg/generic_advdiff/gad_implicit_r.F 156 GAD_IMPLICIT_R
           d5d(i,j,k) = -deltaTLev(k)*maskC(i,j,k+1,bi,bj)
./pkg/generic_advdiff/gad_implicit_r.F 166 GAD_IMPLICIT_R
           c5d(i,j,k) = 1. _d 0 - b5d(i,j,k) - d5d(i,j,k)
./pkg/generic_advdiff/gad_implicit_r.F 207 GAD_IMPLICIT_R
     U                        b5d, c5d, d5d,
./pkg/generic_advdiff/gad_implicit_r.F 215 GAD_IMPLICIT_R
     U                        b5d, c5d, d5d,
./pkg/generic_advdiff/gad_implicit_r.F 221 GAD_IMPLICIT_R
     U                        b5d, c5d, d5d,
./pkg/generic_advdiff/gad_implicit_r.F 230 GAD_IMPLICIT_R
     U                        a5d, b5d, c5d, d5d, e5d,
./pkg/generic_advdiff/gad_implicit_r.F 236 GAD_IMPLICIT_R
     U                        a5d, b5d, c5d, d5d, e5d,
./pkg/generic_advdiff/gad_implicit_r.F 253 GAD_IMPLICIT_R
     I                          b5d, c5d, d5d,
./pkg/generic_advdiff/gad_implicit_r.F 263 GAD_IMPLICIT_R
     I                            a5d, b5d, c5d, d5d, e5d,
./pkg/generic_advdiff/gad_implicit_r.F 340 GAD_IMPLICIT_R
     &                 + gTracer(i,j,kp1)*d5d(i,j,k)
./pkg/generic_advdiff/gad_implicit_r.F 84 GAD_IMPLICIT_R
      _RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 12 GAD_U3C4_IMPL_R
     O           a5d, b5d, c5d, d5d, e5d,
./pkg/generic_advdiff/gad_u3c4_impl_r.F 167 GAD_U3C4_IMPL_R
           d5d(i,j,k)   = d5d(i,j,k)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 179 GAD_U3C4_IMPL_R
           d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 59 GAD_U3C4_IMPL_R
      _RL     d5d   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/mom_common/mom_u_implicit_r.F 109 MOM_U_IMPLICIT_R
           c5d(i,j,k) = 1. _d 0 - b5d(i,j,k) - d5d(i,j,k)
./pkg/mom_common/mom_u_implicit_r.F 154 MOM_U_IMPLICIT_R
              d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/mom_common/mom_u_implicit_r.F 171 MOM_U_IMPLICIT_R
              d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/mom_common/mom_u_implicit_r.F 187 MOM_U_IMPLICIT_R
     I                          b5d, c5d, d5d,
./pkg/mom_common/mom_u_implicit_r.F 45 MOM_U_IMPLICIT_R
      _RL d5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr)
./pkg/mom_common/mom_u_implicit_r.F 72 MOM_U_IMPLICIT_R
         d5d(i,j,k) = 0. _d 0
./pkg/mom_common/mom_u_implicit_r.F 99 MOM_U_IMPLICIT_R
     &     d5d(i,j,k) = -deltaTmom
./pkg/mom_common/mom_v_implicit_r.F 109 MOM_V_IMPLICIT_R
           c5d(i,j,k) = 1. _d 0 - b5d(i,j,k) - d5d(i,j,k)
./pkg/mom_common/mom_v_implicit_r.F 154 MOM_V_IMPLICIT_R
              d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/mom_common/mom_v_implicit_r.F 171 MOM_V_IMPLICIT_R
              d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/mom_common/mom_v_implicit_r.F 187 MOM_V_IMPLICIT_R
     I                          b5d, c5d, d5d,
./pkg/mom_common/mom_v_implicit_r.F 45 MOM_V_IMPLICIT_R
      _RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/mom_common/mom_v_implicit_r.F 72 MOM_V_IMPLICIT_R
         d5d(i,j,k) = 0. _d 0
./pkg/mom_common/mom_v_implicit_r.F 99 MOM_V_IMPLICIT_R
     &     d5d(i,j,k) = -deltaTMom
./model/src/solve_pentadiagonal.F 102 SOLVE_PENTADIAGONAL
          c5d(i,j,k) = c5d(i,j,k) - b5d(i,j,k)*d5d(i,j,k-1)
./model/src/solve_pentadiagonal.F 103 SOLVE_PENTADIAGONAL
          d5d(i,j,k) = d5d(i,j,k) - b5d(i,j,k)*e5d(i,j,k-1)
./model/src/solve_pentadiagonal.F 11 SOLVE_PENTADIAGONAL
     U                     a5d, b5d, c5d, d5d, e5d,
./model/src/solve_pentadiagonal.F 120 SOLVE_PENTADIAGONAL
          b5d(i,j,k) = b5d(i,j,k) - a5d(i,j,k)*d5d(i,j,k-2)
./model/src/solve_pentadiagonal.F 124 SOLVE_PENTADIAGONAL
          c5d(i,j,k) = c5d(i,j,k) - b5d(i,j,k)*d5d(i,j,k-1)
./model/src/solve_pentadiagonal.F 125 SOLVE_PENTADIAGONAL
          d5d(i,j,k) = d5d(i,j,k) - b5d(i,j,k)*e5d(i,j,k-1)
./model/src/solve_pentadiagonal.F 152 SOLVE_PENTADIAGONAL
     &                 - d5d(i,j,k)*y5d(i,j,k+1)
./model/src/solve_pentadiagonal.F 160 SOLVE_PENTADIAGONAL
     &                 - d5d(i,j,k)*y5d(i,j,k+1)
./model/src/solve_pentadiagonal.F 202 SOLVE_PENTADIAGONAL
           d5d_prime(k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 209 SOLVE_PENTADIAGONAL
           d5d_prime(k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 219 SOLVE_PENTADIAGONAL
           d5d_prime(k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 297 SOLVE_PENTADIAGONAL
           d5d_prime(i,j,k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 304 SOLVE_PENTADIAGONAL
           d5d_prime(i,j,k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 315 SOLVE_PENTADIAGONAL
           d5d_prime(i,j,k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 51 SOLVE_PENTADIAGONAL
      _RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)