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



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 167 GAD_DST3FL_IMPL_R
           d5d(i,j,k)   = d5d(i,j,k)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 182 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 114 GAD_IMPLICIT_R
         d5d(i,j,k) = 0. _d 0
./pkg/generic_advdiff/gad_implicit_r.F 140 GAD_IMPLICIT_R
           d5d(i,j,k) = -deltaTLev(k)*maskC(i,j,k+1,bi,bj)
./pkg/generic_advdiff/gad_implicit_r.F 152 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 218 GAD_IMPLICIT_R
     U                        b5d, c5d, d5d,
./pkg/generic_advdiff/gad_implicit_r.F 226 GAD_IMPLICIT_R
     U                        b5d, c5d, d5d,
./pkg/generic_advdiff/gad_implicit_r.F 232 GAD_IMPLICIT_R
     U                        b5d, c5d, d5d,
./pkg/generic_advdiff/gad_implicit_r.F 241 GAD_IMPLICIT_R
     U                        a5d, b5d, c5d, d5d, e5d,
./pkg/generic_advdiff/gad_implicit_r.F 247 GAD_IMPLICIT_R
     U                        a5d, b5d, c5d, d5d, e5d,
./pkg/generic_advdiff/gad_implicit_r.F 265 GAD_IMPLICIT_R
     I                          b5d, c5d, d5d,
./pkg/generic_advdiff/gad_implicit_r.F 276 GAD_IMPLICIT_R
     I                            a5d, b5d, c5d, d5d, e5d,
./pkg/generic_advdiff/gad_implicit_r.F 367 GAD_IMPLICIT_R
     &                 + gTracer(i,j,kp1)*d5d(i,j,k)
./pkg/generic_advdiff/gad_implicit_r.F 85 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 172 GAD_U3C4_IMPL_R
           d5d(i,j,k)   = d5d(i,j,k)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 187 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
     &     d5d(i,j,k) = -deltaTMom
./pkg/mom_common/mom_u_implicit_r.F 121 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 181 MOM_U_IMPLICIT_R
              d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/mom_common/mom_u_implicit_r.F 202 MOM_U_IMPLICIT_R
              d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/mom_common/mom_u_implicit_r.F 242 MOM_U_IMPLICIT_R
     I                          b5d, c5d, d5d,
./pkg/mom_common/mom_u_implicit_r.F 273 MOM_U_IMPLICIT_R
     I                          b5d, c5d, d5d,
./pkg/mom_common/mom_u_implicit_r.F 57 MOM_U_IMPLICIT_R
      _RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/mom_common/mom_u_implicit_r.F 80 MOM_U_IMPLICIT_R
         d5d(i,j,k) = 0. _d 0
./pkg/mom_common/mom_v_implicit_r.F 109 MOM_V_IMPLICIT_R
     &     d5d(i,j,k) = -deltaTMom
./pkg/mom_common/mom_v_implicit_r.F 121 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 181 MOM_V_IMPLICIT_R
              d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/mom_common/mom_v_implicit_r.F 202 MOM_V_IMPLICIT_R
              d5d(i,j,k-1) = d5d(i,j,k-1)
./pkg/mom_common/mom_v_implicit_r.F 242 MOM_V_IMPLICIT_R
     I                          b5d, c5d, d5d,
./pkg/mom_common/mom_v_implicit_r.F 273 MOM_V_IMPLICIT_R
     I                          b5d, c5d, d5d,
./pkg/mom_common/mom_v_implicit_r.F 57 MOM_V_IMPLICIT_R
      _RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/mom_common/mom_v_implicit_r.F 80 MOM_V_IMPLICIT_R
         d5d(i,j,k) = 0. _d 0
./model/src/solve_pentadiagonal.F 112 SOLVE_PENTADIAGONAL
           c5d(i,j,k) = c5d(i,j,k) - b5d(i,j,k)*d5d(i,j,k-1)
./model/src/solve_pentadiagonal.F 113 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 129 SOLVE_PENTADIAGONAL
           b5d(i,j,k) = b5d(i,j,k) - a5d(i,j,k)*d5d(i,j,k-2)
./model/src/solve_pentadiagonal.F 133 SOLVE_PENTADIAGONAL
           c5d(i,j,k) = c5d(i,j,k) - b5d(i,j,k)*d5d(i,j,k-1)
./model/src/solve_pentadiagonal.F 134 SOLVE_PENTADIAGONAL
           d5d(i,j,k) = d5d(i,j,k) - b5d(i,j,k)*e5d(i,j,k-1)
./model/src/solve_pentadiagonal.F 181 SOLVE_PENTADIAGONAL
     &                 - d5d(i,j,k)*y5d(i,j,k+1)
./model/src/solve_pentadiagonal.F 189 SOLVE_PENTADIAGONAL
     &                 - d5d(i,j,k)*y5d(i,j,k+1)
./model/src/solve_pentadiagonal.F 230 SOLVE_PENTADIAGONAL
           d5d_prime(k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 237 SOLVE_PENTADIAGONAL
           d5d_prime(k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 247 SOLVE_PENTADIAGONAL
           d5d_prime(k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 322 SOLVE_PENTADIAGONAL
           d5d_prime(i,j,k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 329 SOLVE_PENTADIAGONAL
           d5d_prime(i,j,k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 340 SOLVE_PENTADIAGONAL
           d5d_prime(i,j,k) = d5d(i,j,k)
./model/src/solve_pentadiagonal.F 61 SOLVE_PENTADIAGONAL
      _RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)