| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/THSICE_DEBUG.h |
21 |
NO PROCEDURE |
dBug(i,j,bi,bj) = dBugFlag .AND. |
|
./pkg/thsice/thsice_advdiff.F |
105 |
THSICE_ADVDIFF |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_advdiff.F |
132 |
THSICE_ADVDIFF |
dBugFlag = debugLevel.GE.debLevB |
|
./pkg/thsice/thsice_advdiff.F |
254 |
THSICE_ADVDIFF |
IF ( dBugFlag ) THEN |
|
./pkg/thsice/thsice_advdiff.F |
327 |
THSICE_ADVDIFF |
IF ( dBugFlag ) THEN |
|
./pkg/thsice/thsice_advdiff.F |
364 |
THSICE_ADVDIFF |
IF ( dBugFlag ) THEN |
|
./pkg/thsice/thsice_advdiff.F |
482 |
THSICE_ADVDIFF |
IF ( dBugFlag ) THEN |
|
./pkg/thsice/thsice_advection.F |
139 |
THSICE_ADVECTION |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_advection.F |
161 |
THSICE_ADVECTION |
dBugFlag = debugLevel.GE.debLevB |
|
./pkg/thsice/thsice_advection.F |
274 |
THSICE_ADVECTION |
IF (dBugFlag.AND.bi.EQ.biDb ) WRITE(6,'(A,3I4,2I5,4L5)') |
|
./pkg/thsice/thsice_advection.F |
336 |
THSICE_ADVECTION |
IF (dBugFlag.AND.bi.EQ.biDb ) WRITE(6,'(A,1P4E14.6)') |
|
./pkg/thsice/thsice_advection.F |
550 |
THSICE_ADVECTION |
IF (dBugFlag.AND.bi.EQ.biDb ) WRITE(6,'(A,1P4E14.6)') |
|
./pkg/thsice/thsice_advection.F |
709 |
THSICE_ADVECTION |
IF ( dBugFlag ) THEN |
|
./pkg/thsice/thsice_calc_thickn.F |
113 |
THSICE_CALC_THICKN |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_calc_thickn.F |
11 |
THSICE_CALC_THICKN |
I iMin,iMax, jMin,jMax, dBugFlag, |
|
./pkg/thsice/thsice_calc_thickn.F |
895 |
THSICE_CALC_THICKN |
CALL THSICE_CHECK_CONSERV( dBugFlag, i, j, bi, bj, 0, |
|
./pkg/thsice/thsice_check_conserv.F |
34 |
THSICE_CHECK_CONSERV |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_check_conserv.F |
9 |
THSICE_CHECK_CONSERV |
I dBugFlag, i, j, bi, bj, iceStart, |
|
./pkg/thsice/thsice_diffusion.F |
65 |
THSICE_DIFFUSION |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_diffusion.F |
71 |
THSICE_DIFFUSION |
dBugFlag = debugLevel.GE.debLevB |
|
./pkg/thsice/thsice_extend.F |
11 |
THSICE_EXTEND |
I iMin,iMax, jMin,jMax, dBugFlag, |
|
./pkg/thsice/thsice_extend.F |
221 |
THSICE_EXTEND |
CALL THSICE_CHECK_CONSERV( dBugFlag, i, j, bi, bj, 1, |
|
./pkg/thsice/thsice_extend.F |
74 |
THSICE_EXTEND |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_impl_temp.F |
103 |
THSICE_IMPL_TEMP |
I iMin,iMax, jMin,jMax, dBugFlag, .FALSE.,.FALSE., |
|
./pkg/thsice/thsice_impl_temp.F |
62 |
THSICE_IMPL_TEMP |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_impl_temp.F |
75 |
THSICE_IMPL_TEMP |
dBugFlag = debugLevel.GE.debLevB |
|
./pkg/thsice/thsice_solve4temp.F |
11 |
THSICE_SOLVE4TEMP |
I iMin,iMax, jMin,jMax, dBugFlag, |
|
./pkg/thsice/thsice_solve4temp.F |
95 |
THSICE_SOLVE4TEMP |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_step_fwd.F |
102 |
THSICE_STEP_FWD |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_step_fwd.F |
125 |
THSICE_STEP_FWD |
dBugFlag = debugLevel.GE.debLevB |
|
./pkg/thsice/thsice_step_fwd.F |
226 |
THSICE_STEP_FWD |
I iMin,iMax, jMin,jMax, dBugFlag, |
|
./pkg/thsice/thsice_step_fwd.F |
301 |
THSICE_STEP_FWD |
I iMin,iMax, jMin,jMax, dBugFlag, |
|
./pkg/thsice/thsice_step_temp.F |
157 |
THSICE_STEP_TEMP |
I iMin,iMax, jMin,jMax, dBugFlag, |
|
./pkg/thsice/thsice_step_temp.F |
77 |
THSICE_STEP_TEMP |
LOGICAL dBugFlag |
|
./pkg/thsice/thsice_step_temp.F |
99 |
THSICE_STEP_TEMP |
dBugFlag = debugLevel.GE.debLevB |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
122 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.pdiag(n,1,1).NE.nInterval) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
153 |
DIAGNOSTICS_SWITCH_ONOFF |
dBugFlag = debugLevel.GT.debLevB |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
169 |
DIAGNOSTICS_SWITCH_ONOFF |
dBugFlag = dBugFlag.AND.(bi.EQ.1.AND.bj.EQ.1.AND.myThid.EQ.1) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
176 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.qSdiag(0,0,iSp,bi,bj).NE. 0.) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
189 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.qSdiag(0,0,iSp,bi,bj).NE.-1.) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
52 |
DIAGNOSTICS_SWITCH_ONOFF |
LOGICAL dBugFlag |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
64 |
DIAGNOSTICS_SWITCH_ONOFF |
dBugFlag = debugLevel.GT.debLevB .AND. myThid.EQ.1 |