IF ( OPPSdebugLevel.GE.debLevB ) THEN
IF ( debugLevel .GE. debLevB )
if ( debugLevel .GE. debLevB ) then
IF ( debugLevel .GE. debLevB ) THEN
CALL WRITE_0D_I( debLevB, INDEX_NONE,
IF ( debugMode ) debugLevel = debLevB
If ( debugLevel .GE. debLevB ) THEN
INTEGER debLevB
PARAMETER(debLevB=2)
IF ( debugLevel.GE.debLevB ) THEN
dBugFlag = debugLevel.GT.debLevB
IF ( debugLevel .GE. debLevB
if ( debugLevel .ge. debLevB ) then
& ( myiter.EQ.niter0 .OR. debugLevel.GE.debLevB ) ) then