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 |
106 |
THSICE_ADVDIFF |
LOGICAL dBugFlag |
./pkg/thsice/thsice_advdiff.F |
133 |
THSICE_ADVDIFF |
dBugFlag = debugLevel.GE.debLevC |
./pkg/thsice/thsice_advdiff.F |
288 |
THSICE_ADVDIFF |
IF ( dBugFlag ) THEN |
./pkg/thsice/thsice_advdiff.F |
361 |
THSICE_ADVDIFF |
IF ( dBugFlag ) THEN |
./pkg/thsice/thsice_advdiff.F |
398 |
THSICE_ADVDIFF |
IF ( dBugFlag ) THEN |
./pkg/thsice/thsice_advdiff.F |
516 |
THSICE_ADVDIFF |
IF ( dBugFlag ) THEN |
./pkg/thsice/thsice_advection.F |
144 |
THSICE_ADVECTION |
LOGICAL dBugFlag |
./pkg/thsice/thsice_advection.F |
167 |
THSICE_ADVECTION |
dBugFlag = debugLevel.GE.debLevC |
./pkg/thsice/thsice_advection.F |
298 |
THSICE_ADVECTION |
IF (dBugFlag.AND.bi.EQ.biDb ) WRITE(6,'(A,3I4,2I5,4L5)') |
./pkg/thsice/thsice_advection.F |
363 |
THSICE_ADVECTION |
IF (dBugFlag.AND.bi.EQ.biDb ) WRITE(6,'(A,1P4E14.6)') |
./pkg/thsice/thsice_advection.F |
583 |
THSICE_ADVECTION |
IF (dBugFlag.AND.bi.EQ.biDb ) WRITE(6,'(A,1P4E14.6)') |
./pkg/thsice/thsice_advection.F |
747 |
THSICE_ADVECTION |
IF ( dBugFlag ) THEN |
./pkg/thsice/thsice_calc_thickn.F |
111 |
THSICE_CALC_THICKN |
LOGICAL dBugFlag |
./pkg/thsice/thsice_calc_thickn.F |
1126 |
THSICE_CALC_THICKN |
CALL THSICE_CHECK_CONSERV( dBugFlag, i, j, bi, bj, 0, |
./pkg/thsice/thsice_calc_thickn.F |
11 |
THSICE_CALC_THICKN |
I iMin,iMax, jMin,jMax, dBugFlag, |
./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.debLevC |
./pkg/thsice/thsice_extend.F |
11 |
THSICE_EXTEND |
I iMin,iMax, jMin,jMax, dBugFlag, |
./pkg/thsice/thsice_extend.F |
236 |
THSICE_EXTEND |
CALL THSICE_CHECK_CONSERV( dBugFlag, i, j, bi, bj, 1, |
./pkg/thsice/thsice_extend.F |
71 |
THSICE_EXTEND |
LOGICAL dBugFlag |
./pkg/thsice/thsice_get_exf.F |
153 |
THSICE_GET_EXF |
LOGICAL dBugFlag |
./pkg/thsice/thsice_get_exf.F |
172 |
THSICE_GET_EXF |
dBugFlag = debugLevel.GE.debLevC |
./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.debLevC |
./pkg/thsice/thsice_solve4temp.F |
103 |
THSICE_SOLVE4TEMP |
LOGICAL dBugFlag |
./pkg/thsice/thsice_solve4temp.F |
16 |
THSICE_SOLVE4TEMP |
I iMin,iMax, jMin,jMax, dBugFlag, |
./pkg/thsice/thsice_step_fwd.F |
105 |
THSICE_STEP_FWD |
LOGICAL dBugFlag |
./pkg/thsice/thsice_step_fwd.F |
128 |
THSICE_STEP_FWD |
dBugFlag = debugLevel.GE.debLevC |
./pkg/thsice/thsice_step_fwd.F |
241 |
THSICE_STEP_FWD |
I iMin,iMax, jMin,jMax, dBugFlag, |
./pkg/thsice/thsice_step_fwd.F |
332 |
THSICE_STEP_FWD |
I iMin,iMax, jMin,jMax, dBugFlag, |
./pkg/thsice/thsice_step_temp.F |
108 |
THSICE_STEP_TEMP |
dBugFlag = debugLevel.GE.debLevC |
./pkg/thsice/thsice_step_temp.F |
176 |
THSICE_STEP_TEMP |
I iMin,iMax, jMin,jMax, dBugFlag, |
./pkg/thsice/thsice_step_temp.F |
77 |
THSICE_STEP_TEMP |
LOGICAL dBugFlag |
./pkg/diagnostics/diagnostics_switch_onoff.F |
142 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.pdiag(n,1,1).NE.nInterval) |
./pkg/diagnostics/diagnostics_switch_onoff.F |
173 |
DIAGNOSTICS_SWITCH_ONOFF |
dBugFlag = debugLevel.GE.debLevE |
./pkg/diagnostics/diagnostics_switch_onoff.F |
196 |
DIAGNOSTICS_SWITCH_ONOFF |
dBugFlag = dBugFlag.AND.(bi.EQ.1.AND.bj.EQ.1.AND.myThid.EQ.1) |
./pkg/diagnostics/diagnostics_switch_onoff.F |
203 |
DIAGNOSTICS_SWITCH_ONOFF |
IF (dBugFlag.AND.qSdiag(0,0,iSp,bi,bj).NE. 0.) |
./pkg/diagnostics/diagnostics_switch_onoff.F |
216 |
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 |
65 |
DIAGNOSTICS_SWITCH_ONOFF |
dBugFlag = debugLevel.GE.debLevE .AND. myThid.EQ.1 |