Symbol Description Uses
diagonalNumber number of non-zero diagonals in the matrix 28



File Line number Procedure Code
./pkg/generic_advdiff/gad_implicit_r.F 119 GAD_IMPLICIT_R
      diagonalNumber = 1
./pkg/generic_advdiff/gad_implicit_r.F 123 GAD_IMPLICIT_R
       diagonalNumber = 3
./pkg/generic_advdiff/gad_implicit_r.F 215 GAD_IMPLICIT_R
          diagonalNumber = 3
./pkg/generic_advdiff/gad_implicit_r.F 222 GAD_IMPLICIT_R
          diagonalNumber = 3
./pkg/generic_advdiff/gad_implicit_r.F 229 GAD_IMPLICIT_R
          diagonalNumber = 3
./pkg/generic_advdiff/gad_implicit_r.F 237 GAD_IMPLICIT_R
          diagonalNumber = 5
./pkg/generic_advdiff/gad_implicit_r.F 244 GAD_IMPLICIT_R
          diagonalNumber = 5
./pkg/generic_advdiff/gad_implicit_r.F 261 GAD_IMPLICIT_R
      IF ( diagonalNumber .EQ. 3 ) THEN
./pkg/generic_advdiff/gad_implicit_r.F 272 GAD_IMPLICIT_R
      ELSEIF ( diagonalNumber .EQ. 5 ) THEN
./pkg/generic_advdiff/gad_implicit_r.F 283 GAD_IMPLICIT_R
      ELSEIF ( diagonalNumber .NE. 1 ) THEN
./pkg/generic_advdiff/gad_implicit_r.F 370 GAD_IMPLICIT_R
           IF ( diagonalNumber .EQ. 5 ) THEN
./pkg/generic_advdiff/gad_implicit_r.F 81 GAD_IMPLICIT_R
      INTEGER diagonalNumber, errCode
./pkg/mom_common/mom_u_implicit_r.F 143 MOM_U_IMPLICIT_R
        diagonalNumber = 3
./pkg/mom_common/mom_u_implicit_r.F 216 MOM_U_IMPLICIT_R
      IF ( diagonalNumber .EQ. 1 ) THEN
./pkg/mom_common/mom_u_implicit_r.F 238 MOM_U_IMPLICIT_R
      ELSEIF ( diagonalNumber .EQ. 3 ) THEN
./pkg/mom_common/mom_u_implicit_r.F 263 MOM_U_IMPLICIT_R
       IF ( diagonalNumber .EQ. 1 ) THEN
./pkg/mom_common/mom_u_implicit_r.F 271 MOM_U_IMPLICIT_R
       ELSEIF ( diagonalNumber .EQ. 3 ) THEN
./pkg/mom_common/mom_u_implicit_r.F 53 MOM_U_IMPLICIT_R
      INTEGER diagonalNumber, errCode
./pkg/mom_common/mom_u_implicit_r.F 85 MOM_U_IMPLICIT_R
      diagonalNumber = 1
./pkg/mom_common/mom_u_implicit_r.F 90 MOM_U_IMPLICIT_R
       diagonalNumber = 3
./pkg/mom_common/mom_v_implicit_r.F 143 MOM_V_IMPLICIT_R
        diagonalNumber = 3
./pkg/mom_common/mom_v_implicit_r.F 216 MOM_V_IMPLICIT_R
      IF ( diagonalNumber .EQ. 1 ) THEN
./pkg/mom_common/mom_v_implicit_r.F 238 MOM_V_IMPLICIT_R
      ELSEIF ( diagonalNumber .EQ. 3 ) THEN
./pkg/mom_common/mom_v_implicit_r.F 263 MOM_V_IMPLICIT_R
       IF ( diagonalNumber .EQ. 1 ) THEN
./pkg/mom_common/mom_v_implicit_r.F 271 MOM_V_IMPLICIT_R
       ELSEIF ( diagonalNumber .EQ. 3 ) THEN
./pkg/mom_common/mom_v_implicit_r.F 53 MOM_V_IMPLICIT_R
      INTEGER diagonalNumber, errCode
./pkg/mom_common/mom_v_implicit_r.F 85 MOM_V_IMPLICIT_R
      diagonalNumber = 1
./pkg/mom_common/mom_v_implicit_r.F 90 MOM_V_IMPLICIT_R
       diagonalNumber = 3