Symbol Description Uses
dBug 71


File Line number Procedure Code
./pkg/thsice/thsice_solve4temp.F 117 THSICE_SOLVE4TEMP 
      LOGICAL dBug
./pkg/thsice/thsice_solve4temp.F 123 THSICE_SOLVE4TEMP 
      dBug = .FALSE.
./pkg/thsice/thsice_solve4temp.F 126 THSICE_SOLVE4TEMP 
      IF (dBug) WRITE(6,'(A,2I4,2I2)') 'ThSI_SOLVE4T: i,j=',i,j,bi,bj
./pkg/thsice/thsice_solve4temp.F 162 THSICE_SOLVE4TEMP 
      IF (dBug) WRITE(6,1010) 'ThSI_SOLVE4T: k, Ts, Tice=',0,Tsf,Tice
./pkg/thsice/thsice_solve4temp.F 202 THSICE_SOLVE4TEMP 
        IF ( dBug ) WRITE(6,1020) 'ThSI_SOLVE4T: flx0,df0dT,k12,D=',
./pkg/thsice/thsice_solve4temp.F 215 THSICE_SOLVE4TEMP 
            IF(dBug) WRITE(6,1010) 'ThSI_SOLVE4T: k,ts,t1,dTs=',
./pkg/thsice/thsice_solve4temp.F 248 THSICE_SOLVE4TEMP 
         IF ( dBug ) WRITE(6,1010) 'ThSI_SOLVE4T: k,ts,t1,dTs=',
./pkg/thsice/thsice_solve4temp.F 277 THSICE_SOLVE4TEMP 
      IF (dBug) WRITE(6,1010) 'ThSI_SOLVE4T: k, Ts, Tice=',k,Tsf,Tice
./pkg/thsice/thsice_solve4temp.F 302 THSICE_SOLVE4TEMP 
      IF (dBug) WRITE(6,1020) 'ThSI_SOLVE4T: flx0,fct,Dif,flxCnB=',
./pkg/thsice/thsice_calc_thickn.F 118 THSICE_CALC_THICKN 
      LOGICAL dBug
./pkg/thsice/thsice_calc_thickn.F 125 THSICE_CALC_THICKN 
      dBug = .FALSE.
./pkg/thsice/thsice_calc_thickn.F 165 THSICE_CALC_THICKN 
      IF (dBug) WRITE(6,1020) 'ThSI_CALC_TH: evpAtm, frzmlt, Fbot =',
./pkg/thsice/thsice_calc_thickn.F 215 THSICE_CALC_THICKN 
      IF (dBug) WRITE(6,1020) 'ThSI_CALC_TH: etop,etope,ebot,ebote=',
./pkg/thsice/thsice_calc_thickn.F 318 THSICE_CALC_THICKN 
      IF (dBug) WRITE(6,1020) 'ThSI_CALC_TH:   etop, ebot, hi, hs =',
./pkg/thsice/thsice_calc_thickn.F 334 THSICE_CALC_THICKN 
         IF (dBug) WRITE(6,1020) 'ThSI_CALC_TH: -1 : esurp=',esurp
./pkg/thsice/thsice_calc_thickn.F 422 THSICE_CALC_THICKN 
         IF (dBug) WRITE(6,1020) 'ThSI_CALC_TH: -2 : esurp,fresh=',
./pkg/thsice/thsice_calc_thickn.F 468 THSICE_CALC_THICKN 
      IF (dBug) WRITE(6,1020) 'ThSI_CALC_TH: b-Winton: hnew, qice =',
./pkg/thsice/thsice_calc_thickn.F 476 THSICE_CALC_THICKN 
      IF (dBug) WRITE(6,1020) 'ThSI_CALC_TH: compact,hi, qtot, hs =',
./pkg/thsice/thsice_calc_thickn.F 487 THSICE_CALC_THICKN 
       IF(dBug) WRITE(6,1020)'ThSI_CALC_TH: [esurp,etop+ebot]/dt ='
./pkg/thsice/thsice_calc_thickn.F 508 THSICE_CALC_THICKN 
      IF (dBug) WRITE(6,1020)'ThSI_CALC_TH:dH2O,Ev[kg],fresh,fsalt',
./pkg/thsice/thsice_calc_thickn.F 510 THSICE_CALC_THICKN 
      IF (dBug) WRITE(6,1020)'ThSI_CALC_TH: Qleft,Fbot,extend/dt =',
./pkg/thsice/thsice_impl_temp.F 117 THSICE_IMPL_TEMP 
          IF ( dBug ) THEN
./pkg/thsice/thsice_impl_temp.F 68 THSICE_IMPL_TEMP 
      LOGICAL dBug
./pkg/thsice/thsice_impl_temp.F 74 THSICE_IMPL_TEMP 
      dBug = .FALSE.
./pkg/thsice/thsice_impl_temp.F 96 THSICE_IMPL_TEMP 
          IF ( dBug ) THEN
./pkg/thsice/thsice_check_conserv.F 34 THSICE_CHECK_CONSERV 
      LOGICAL dBug
./pkg/thsice/thsice_check_conserv.F 62 THSICE_CHECK_CONSERV 
         IF (dBug) WRITE(6,1010) 'ThSI_CHK: Ener0,Water0,Salt0 =',
./pkg/thsice/thsice_check_conserv.F 74 THSICE_CHECK_CONSERV 
         IF (dBug) WRITE(6,1010) 'ThSI_CHK: dEner,dH20,dSal /dt=',
./pkg/thsice/thsice_check_conserv.F 76 THSICE_CHECK_CONSERV 
         IF (dBug) WRITE(6,1010) 'ThSI_CHK: fxH,fxW,fxS=',flxAtm-qleft,
./pkg/thsice/thsice_check_conserv.F 91 THSICE_CHECK_CONSERV 
         IF (dBug) WRITE(6,1010) 'ThSI_CHK: resid.H,W,S=',
./pkg/thsice/thsice_check_conserv.F 93 THSICE_CHECK_CONSERV 
         IF (dBug) WRITE(6,1010) 'ThSI_CHK: hIc,hSn,snow*dt=',
./pkg/thsice/thsice_check_conserv.F 9 THSICE_CHECK_CONSERV 
     I             dBug, i, j, bi, bj, iceStart,
./pkg/thsice/thsice_extend.F 113 THSICE_EXTEND 
        IF (dBug) WRITE(6,1020) 'ThSI_EXT: iceH, newIce, newIceFrac=',
./pkg/thsice/thsice_extend.F 70 THSICE_EXTEND 
      LOGICAL dBug
./pkg/thsice/thsice_extend.F 74 THSICE_EXTEND 
      dBug = .FALSE.
./pkg/thsice/thsice_step_fwd.F 123 THSICE_STEP_FWD 
          IF ( dBug ) THEN
./pkg/thsice/thsice_step_fwd.F 154 THSICE_STEP_FWD 
          IF ( dBug ) THEN
./pkg/thsice/thsice_step_fwd.F 165 THSICE_STEP_FWD 
      dBug = .FALSE.
./pkg/thsice/thsice_step_fwd.F 196 THSICE_STEP_FWD 
        IF (dBug .AND. (frzmltMxL.GT.0. .OR. compact.GT.0.) ) THEN
./pkg/thsice/thsice_step_fwd.F 221 THSICE_STEP_FWD 
     I          dBug, myThid)
./pkg/thsice/thsice_step_fwd.F 242 THSICE_STEP_FWD 
      IF (dBug) WRITE(6,1010) 'ThSI_FWD: icFrac,flxAtm,evpAtm,flxSnw=',
./pkg/thsice/thsice_step_fwd.F 244 THSICE_STEP_FWD 
      IF (dBug) WRITE(6,1010) 'ThSI_FWD: compact,flx2oc,fsalt,frw2oc=',
./pkg/thsice/thsice_step_fwd.F 248 THSICE_STEP_FWD 
          CALL THSICE_CHECK_CONSERV( dBug, i, j, bi, bj, 0,
./pkg/thsice/thsice_step_fwd.F 274 THSICE_STEP_FWD 
          IF (dBug) WRITE(6,1010)
./pkg/thsice/thsice_step_fwd.F 303 THSICE_STEP_FWD 
     I               dBug, myThid )
./pkg/thsice/thsice_step_fwd.F 305 THSICE_STEP_FWD 
      IF (dBug) WRITE(6,1010) 'ThSI_FWD: compact,flx2oc,fsalt,frw2oc='
./pkg/thsice/thsice_step_fwd.F 310 THSICE_STEP_FWD 
          CALL THSICE_CHECK_CONSERV( dBug, i, j, bi, bj, 1,
./pkg/thsice/thsice_step_fwd.F 331 THSICE_STEP_FWD 
          IF (dBug) WRITE(6,1010)
./pkg/thsice/thsice_step_fwd.F 95 THSICE_STEP_FWD 
      LOGICAL dBug
./pkg/thsice/thsice_step_fwd.F 98 THSICE_STEP_FWD 
      dBug = .FALSE.
./pkg/land/land_impl_temp.F 150 LAND_IMPL_TEMP 
          dBug = bi.eq.lprt .AND. i.EQ.iprt .AND. j.EQ.jprt
./pkg/land/land_impl_temp.F 151 LAND_IMPL_TEMP 
          IF (dBug) write(6,1010)
./pkg/land/land_impl_temp.F 153 LAND_IMPL_TEMP 
          IF (dBug) write(6,1010)
./pkg/land/land_impl_temp.F 168 LAND_IMPL_TEMP 
          IF (dBug) write(6,1010)
./pkg/land/land_impl_temp.F 240 LAND_IMPL_TEMP 
              IF (dBug) write(6,1010)
./pkg/land/land_impl_temp.F 282 LAND_IMPL_TEMP 
              IF (dBug) write(6,1010)
./pkg/land/land_impl_temp.F 315 LAND_IMPL_TEMP 
              IF (dBug) write(6,1010)
./pkg/land/land_impl_temp.F 351 LAND_IMPL_TEMP 
          IF (dBug) write(6,1010) 'LAND_IMPL_TEMP: 9, ts,tg1&2,dTs=',9,
./pkg/land/land_impl_temp.F 353 LAND_IMPL_TEMP 
          IF (dBug) write(6,1010) 'LAND_IMPL_TEMP: 9, Eg1,Eg2,mPmE=',9,
./pkg/land/land_impl_temp.F 92 LAND_IMPL_TEMP 
      LOGICAL dBug, debugFlag
./pkg/land/land_stepfwd.F 163 LAND_STEPFWD 
            dBug = bi.eq.lprt .AND. i.EQ.iprt .AND. j.EQ.jprt
./pkg/land/land_stepfwd.F 164 LAND_STEPFWD 
            IF (dBug) write(6,1010)
./pkg/land/land_stepfwd.F 184 LAND_STEPFWD 
           dBug = bi.eq.lprt .AND. i.EQ.iprt .AND. j.EQ.jprt
./pkg/land/land_stepfwd.F 185 LAND_STEPFWD 
           IF (dBug) write(6,1010)
./pkg/land/land_stepfwd.F 216 LAND_STEPFWD 
            IF (dBug) write(6,1010)
./pkg/land/land_stepfwd.F 239 LAND_STEPFWD 
            IF (dBug) write(6,1010)
./pkg/land/land_stepfwd.F 285 LAND_STEPFWD 
          dBug = bi.eq.lprt .AND. i.EQ.iprt .AND. j.EQ.jprt
./pkg/land/land_stepfwd.F 342 LAND_STEPFWD 
           IF(dBug)write(6,1010)'LAND_STEPFWD: grdW-1,fx_ku,kd,grdW-1='
./pkg/land/land_stepfwd.F 374 LAND_STEPFWD 
           IF (dBug) write(6,1010) 'LAND_STEPFWD: Temp,FlxE,FlxW=',
./pkg/land/land_stepfwd.F 380 LAND_STEPFWD 
           IF (dBug) write(6,1010) 'LAND_STEPFWD: RO,enRO=',
./pkg/land/land_stepfwd.F 84 LAND_STEPFWD 
      LOGICAL dBug