Symbol Description Uses
errCode > 0 if singular matrix 106



File Line number Procedure Code
./pkg/generic_advdiff/gad_advscheme.F 108 GAD_ADVSCHEME_SET
        errCode = MAX( errCode, 1 )
./pkg/generic_advdiff/gad_advscheme.F 60 GAD_ADVSCHEME_SET
     U                         errCode,
./pkg/generic_advdiff/gad_advscheme.F 89 GAD_ADVSCHEME_SET
      INTEGER errCode
./pkg/generic_advdiff/gad_implicit_r.F 263 GAD_IMPLICIT_R
        errCode = -1
./pkg/generic_advdiff/gad_implicit_r.F 267 GAD_IMPLICIT_R
     O                          errCode,
./pkg/generic_advdiff/gad_implicit_r.F 269 GAD_IMPLICIT_R
        IF (errCode.GE.1) THEN
./pkg/generic_advdiff/gad_implicit_r.F 274 GAD_IMPLICIT_R
        errCode = -1
./pkg/generic_advdiff/gad_implicit_r.F 278 GAD_IMPLICIT_R
     O                            errCode,
./pkg/generic_advdiff/gad_implicit_r.F 280 GAD_IMPLICIT_R
        IF (errCode.GE.1) THEN
./pkg/generic_advdiff/gad_implicit_r.F 81 GAD_IMPLICIT_R
      INTEGER diagonalNumber, errCode
./pkg/generic_advdiff/gad_init_fixed.F 36 GAD_INIT_FIXED
      INTEGER   errCode, n, minSize
./pkg/generic_advdiff/gad_init_fixed.F 46 GAD_INIT_FIXED
      errCode = 0
./pkg/generic_advdiff/gad_init_fixed.F 47 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_UPWIND_1RST   , 1, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 48 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_CENTERED_2ND  , 1, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 49 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_UPWIND_3RD    , 2, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 50 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_CENTERED_4TH  , 2, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 51 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_DST2          , 1, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 52 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_FLUX_LIMIT    , 2, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 53 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_DST3          , 2, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 54 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_DST3_FLUX_LIMIT,2, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 55 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_OS7MP         , 4, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 56 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_SOM_PRATHER   , 1, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 57 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_SOM_LIMITER   , 1, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 58 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_PPM_NULL_LIMIT, 3, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 59 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_PPM_MONO_LIMIT, 3, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 60 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_PPM_WENO_LIMIT, 3, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 61 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_PQM_NULL_LIMIT, 4, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 62 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_PQM_MONO_LIMIT, 4, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 63 GAD_INIT_FIXED
      CALL GAD_ADVSCHEME_SET( ENUM_PQM_WENO_LIMIT, 4, errCode, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 64 GAD_INIT_FIXED
      IF ( errCode.GT.0 ) THEN
./pkg/ggl90/ggl90_calc.F 116 GGL90_CALC
      INTEGER errCode
./pkg/ggl90/ggl90_calc.F 661 GGL90_CALC
      errCode = -1
./pkg/ggl90/ggl90_calc.F 665 GGL90_CALC
     O                        errCode,
./pkg/ggl90/ggl90_idemix.F 425 GGL90_IDEMIX
      errCode = -1
./pkg/ggl90/ggl90_idemix.F 429 GGL90_IDEMIX
     O                        errCode,
./pkg/ggl90/ggl90_idemix.F 61 GGL90_IDEMIX
      INTEGER errCode
./pkg/gmredi/gmredi_calc_psi_bvp.F 159 GMREDI_CALC_PSI_BVP
       errCode = -1
./pkg/gmredi/gmredi_calc_psi_bvp.F 163 GMREDI_CALC_PSI_BVP
     &                         errCode, bi, bj, myThid )
./pkg/gmredi/gmredi_calc_psi_bvp.F 165 GMREDI_CALC_PSI_BVP
       IF ( errCode .GT. 0 ) THEN
./pkg/gmredi/gmredi_calc_psi_bvp.F 231 GMREDI_CALC_PSI_BVP
       errCode = -1
./pkg/gmredi/gmredi_calc_psi_bvp.F 235 GMREDI_CALC_PSI_BVP
     &                         errCode, bi, bj, myThid )
./pkg/gmredi/gmredi_calc_psi_bvp.F 237 GMREDI_CALC_PSI_BVP
       IF ( errCode .GT. 0 ) THEN
./pkg/gmredi/gmredi_calc_psi_bvp.F 52 GMREDI_CALC_PSI_BVP
      INTEGER errCode
./pkg/mom_common/mom_u_implicit_r.F 217 MOM_U_IMPLICIT_R
        errCode = 0
./pkg/mom_common/mom_u_implicit_r.F 225 MOM_U_IMPLICIT_R
             errCode = 1
./pkg/mom_common/mom_u_implicit_r.F 235 MOM_U_IMPLICIT_R
        IF (errCode.GE.1) THEN
./pkg/mom_common/mom_u_implicit_r.F 240 MOM_U_IMPLICIT_R
        errCode = -1
./pkg/mom_common/mom_u_implicit_r.F 244 MOM_U_IMPLICIT_R
     O                          errCode,
./pkg/mom_common/mom_u_implicit_r.F 246 MOM_U_IMPLICIT_R
        IF (errCode.GE.1) THEN
./pkg/mom_common/mom_u_implicit_r.F 275 MOM_U_IMPLICIT_R
     O                          errCode,
./pkg/mom_common/mom_u_implicit_r.F 53 MOM_U_IMPLICIT_R
      INTEGER diagonalNumber, errCode
./pkg/mom_common/mom_v_implicit_r.F 217 MOM_V_IMPLICIT_R
        errCode = 0
./pkg/mom_common/mom_v_implicit_r.F 225 MOM_V_IMPLICIT_R
             errCode = 1
./pkg/mom_common/mom_v_implicit_r.F 235 MOM_V_IMPLICIT_R
        IF (errCode.GE.1) THEN
./pkg/mom_common/mom_v_implicit_r.F 240 MOM_V_IMPLICIT_R
        errCode = -1
./pkg/mom_common/mom_v_implicit_r.F 244 MOM_V_IMPLICIT_R
     O                          errCode,
./pkg/mom_common/mom_v_implicit_r.F 246 MOM_V_IMPLICIT_R
        IF (errCode.GE.1) THEN
./pkg/mom_common/mom_v_implicit_r.F 275 MOM_V_IMPLICIT_R
     O                          errCode,
./pkg/mom_common/mom_v_implicit_r.F 53 MOM_V_IMPLICIT_R
      INTEGER diagonalNumber, errCode
./pkg/rw/read_mflds.F 762 READ_MFLDS_RENAME
     O                              errCode,
./pkg/rw/read_mflds.F 782 READ_MFLDS_RENAME
      INTEGER errCode
./pkg/rw/read_mflds.F 792 READ_MFLDS_RENAME
      errCode = 1
./pkg/rw/read_mflds.F 799 READ_MFLDS_RENAME
            errCode = 0
./pkg/rw/read_mflds.F 803 READ_MFLDS_RENAME
            errCode = 3
./pkg/rw/read_mflds.F 808 READ_MFLDS_RENAME
      IF ( errCode.EQ.0 ) THEN
./pkg/rw/read_mflds.F 811 READ_MFLDS_RENAME
          IF ( fldList(i).EQ.newName ) errCode = 2
./pkg/rw/read_mflds.F 815 READ_MFLDS_RENAME
      IF ( errCode.EQ.0 ) THEN
./pkg/seaice/seaice_lsr.F 111 SEAICE_LSR
      INTEGER errCode
./pkg/seaice/seaice_lsr.F 729 SEAICE_LSR
     O                 uIce, vIce, errCode,
./pkg/streamice/streamice_tridiag_solve.F 108 STREAMICE_TRIDIAG_SOLVE
        errCode = 1
./pkg/streamice/streamice_tridiag_solve.F 45 STREAMICE_TRIDIAG_SOLVE
      INTEGER errCode
./pkg/streamice/streamice_tridiag_solve.F 65 STREAMICE_TRIDIAG_SOLVE
      errCode = 0
./pkg/streamice/streamice_tridiag_solve.F 99 STREAMICE_TRIDIAG_SOLVE
       errCode = 1
./model/src/solve_pentadiagonal.F 102 SOLVE_PENTADIAGONAL
            errCode = 1
./model/src/solve_pentadiagonal.F 118 SOLVE_PENTADIAGONAL
            errCode = 1
./model/src/solve_pentadiagonal.F 139 SOLVE_PENTADIAGONAL
            errCode = 1
./model/src/solve_pentadiagonal.F 13 SOLVE_PENTADIAGONAL
     O                     errCode,
./model/src/solve_pentadiagonal.F 200 SOLVE_PENTADIAGONAL
      errCode = 0
./model/src/solve_pentadiagonal.F 266 SOLVE_PENTADIAGONAL
           errCode = 1
./model/src/solve_pentadiagonal.F 361 SOLVE_PENTADIAGONAL
           errCode = 1
./model/src/solve_pentadiagonal.F 64 SOLVE_PENTADIAGONAL
      INTEGER errCode
./model/src/solve_pentadiagonal.F 90 SOLVE_PENTADIAGONAL
      IF ( errCode .LT. 0 ) THEN
./model/src/solve_pentadiagonal.F 91 SOLVE_PENTADIAGONAL
       errCode = 0
./model/src/solve_tridiagonal.F 108 SOLVE_TRIDIAGONAL
            errCode = 1
./model/src/solve_tridiagonal.F 13 SOLVE_TRIDIAGONAL
     O                     errCode,
./model/src/solve_tridiagonal.F 145 SOLVE_TRIDIAGONAL
      errCode = 0
./model/src/solve_tridiagonal.F 177 SOLVE_TRIDIAGONAL
             errCode = 1
./model/src/solve_tridiagonal.F 189 SOLVE_TRIDIAGONAL
             errCode = 1
./model/src/solve_tridiagonal.F 240 SOLVE_TRIDIAGONAL
             errCode = 1
./model/src/solve_tridiagonal.F 253 SOLVE_TRIDIAGONAL
             errCode = 1
./model/src/solve_tridiagonal.F 60 SOLVE_TRIDIAGONAL
      INTEGER errCode
./model/src/solve_tridiagonal.F 84 SOLVE_TRIDIAGONAL
      IF ( errCode .LT. 0 ) THEN
./model/src/solve_tridiagonal.F 85 SOLVE_TRIDIAGONAL
       errCode = 0
./model/src/solve_tridiagonal.F 94 SOLVE_TRIDIAGONAL
            errCode = 1
./model/src/solve_uv_tridiago.F 119 SOLVE_UV_TRIDIAGO
             errCode = 1
./model/src/solve_uv_tridiago.F 136 SOLVE_UV_TRIDIAGO
             errCode = 1
./model/src/solve_uv_tridiago.F 14 SOLVE_UV_TRIDIAGO
     O                     errCode,
./model/src/solve_uv_tridiago.F 206 SOLVE_UV_TRIDIAGO
             errCode = 1
./model/src/solve_uv_tridiago.F 250 SOLVE_UV_TRIDIAGO
             errCode = 1
./model/src/solve_uv_tridiago.F 318 SOLVE_UV_TRIDIAGO
             errCode = 1
./model/src/solve_uv_tridiago.F 335 SOLVE_UV_TRIDIAGO
             errCode = 1
./model/src/solve_uv_tridiago.F 393 SOLVE_UV_TRIDIAGO
             errCode = 1
./model/src/solve_uv_tridiago.F 437 SOLVE_UV_TRIDIAGO
             errCode = 1
./model/src/solve_uv_tridiago.F 60 SOLVE_UV_TRIDIAGO
      INTEGER errCode
./model/src/solve_uv_tridiago.F 91 SOLVE_UV_TRIDIAGO
      errCode = 0