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 |