Symbol Description Uses
c3d matrix upper diagnonal 47



File Line number Procedure Code
./pkg/generic_advdiff/gad_c2_impl_r.F 12 GAD_C2_IMPL_R
     O           a3d, b3d, c3d,
./pkg/generic_advdiff/gad_c2_impl_r.F 49 GAD_C2_IMPL_R
      _RL     c3d   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/generic_advdiff/gad_c2_impl_r.F 78 GAD_C2_IMPL_R
           c3d(i,j,k-1) = c3d(i,j,k-1)
./pkg/generic_advdiff/gad_dst2u1_impl_r.F 101 GAD_DST2U1_IMPL_R
           c3d(i,j,k-1) = c3d(i,j,k-1)
./pkg/generic_advdiff/gad_dst2u1_impl_r.F 12 GAD_DST2U1_IMPL_R
     O           a3d, b3d, c3d,
./pkg/generic_advdiff/gad_dst2u1_impl_r.F 55 GAD_DST2U1_IMPL_R
      _RL     c3d   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 126 GAD_FLUXLIMIT_IMPL_R
           c3d(i,j,k-1) = c3d(i,j,k-1)
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 12 GAD_FLUXLIMIT_IMPL_R
     O           a3d, b3d, c3d,
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 53 GAD_FLUXLIMIT_IMPL_R
      _RL     c3d   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/ggl90/ggl90_calc.F 115 GGL90_CALC
      _RL     c3d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/ggl90/ggl90_calc.F 182 GGL90_CALC
         c3d(i,j,k) = 0. _d 0
./pkg/ggl90/ggl90_calc.F 573 GGL90_CALC
         c3d(i,j,1)  = 0. _d 0
./pkg/ggl90/ggl90_calc.F 583 GGL90_CALC
         c3d(i,j,k) = -deltaTggl90
./pkg/ggl90/ggl90_calc.F 597 GGL90_CALC
          c3d(i,j,k) = c3d(i,j,k)*recip_hFacI(i,j,k)
./pkg/ggl90/ggl90_calc.F 609 GGL90_CALC
         c3d(i,j,kBottom) = 0. _d 0
./pkg/ggl90/ggl90_calc.F 619 GGL90_CALC
         b3d(i,j,k) = 1. _d 0 - c3d(i,j,k) - a3d(i,j,k)
./pkg/ggl90/ggl90_calc.F 654 GGL90_CALC
     &                              - GGL90TKEbottom*c3d(i,j,kBottom)
./pkg/ggl90/ggl90_calc.F 655 GGL90_CALC
         c3d(i,j,kBottom) = 0. _d 0
./pkg/ggl90/ggl90_calc.F 663 GGL90_CALC
     I                        a3d, b3d, c3d,
./pkg/ggl90/ggl90_idemix.F 344 GGL90_IDEMIX
         c3d(i,j,k) = -delta(i,j,k)*c0(i,j,kp1)
./pkg/ggl90/ggl90_idemix.F 353 GGL90_IDEMIX
         c3d(i,j,1) = 0. _d 0
./pkg/ggl90/ggl90_idemix.F 355 GGL90_IDEMIX
         c3d(i,j,kBottom) = 0. _d 0
./pkg/ggl90/ggl90_idemix.F 427 GGL90_IDEMIX
     I                        a3d, b3d, c3d,
./pkg/ggl90/ggl90_idemix.F 72 GGL90_IDEMIX
      _RL  c3d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/ggl90/ggl90_idemix.F 94 GGL90_IDEMIX
         c3d(i,j,k)     = 0. _d 0
./pkg/gmredi/gmredi_calc_eigs.F 128 GMREDI_CALC_EIGS
             c3d(i,j,k) = fCori2(i,j)*recip_hFac(i,j,k)
./pkg/gmredi/gmredi_calc_eigs.F 130 GMREDI_CALC_EIGS
             b3d(i,j,k) = -c3d(i,j,k)
./pkg/gmredi/gmredi_calc_eigs.F 135 GMREDI_CALC_EIGS
             c3d(i,j,k) = fCori2(i,j)*recip_hFac(i,j,k)
./pkg/gmredi/gmredi_calc_eigs.F 137 GMREDI_CALC_EIGS
             b3d(i,j,k) = -a3d(i,j,k)-c3d(i,j,k)
./pkg/gmredi/gmredi_calc_eigs.F 142 GMREDI_CALC_EIGS
             c3d(i,j,k) = zeroRL
./pkg/gmredi/gmredi_calc_eigs.F 148 GMREDI_CALC_EIGS
             c3d(i,j,k) = zeroRL
./pkg/gmredi/gmredi_calc_eigs.F 154 GMREDI_CALC_EIGS
           c3d(i,j,k) = zeroRL
./pkg/gmredi/gmredi_calc_eigs.F 171 GMREDI_CALC_EIGS
          array(k,k+1) = c3d(i,j,k)
./pkg/gmredi/gmredi_calc_eigs.F 175 GMREDI_CALC_EIGS
           array(k,k+1) = c3d(i,j,k)
./pkg/gmredi/gmredi_calc_eigs.F 397 GMREDI_CALC_EIGS
        CALL DIAGNOSTICS_FILL(c3d, 'GM_C3D  ',0,Nr,0,1,1,myThid)
./pkg/gmredi/gmredi_calc_eigs.F 71 GMREDI_CALC_EIGS
      _RL c3d(   1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr)
./model/src/solve_tridiagonal.F 103 SOLVE_TRIDIAGONAL
          tmpVar = b3d(i,j,k) - a3d(i,j,k)*c3d(i,j,k-1)*b3d(i,j,k-1)
./model/src/solve_tridiagonal.F 11 SOLVE_TRIDIAGONAL
     I                     a3d, b3d, c3d,
./model/src/solve_tridiagonal.F 138 SOLVE_TRIDIAGONAL
     &               - c3d(i,j,k)*b3d(i,j,k)*y3d(i,j,k+1)
./model/src/solve_tridiagonal.F 152 SOLVE_TRIDIAGONAL
         c3d_m1(i,j,k) = c3d(i,j,k)
./model/src/solve_tridiagonal.F 235 SOLVE_TRIDIAGONAL
             c3d_prime(i,j,1) = c3d(i,j,1)*recVar
./model/src/solve_tridiagonal.F 246 SOLVE_TRIDIAGONAL
             c3d_prime(i,j,k) = c3d(i,j,k)*recVar
./model/src/solve_tridiagonal.F 58 SOLVE_TRIDIAGONAL
      _RL c3d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)