& implicitDiffusion, implicitViscosity,
LOGICAL implicitDiffusion
IF (implicitDiffusion) THEN
& (.NOT.implicitDiffusion .OR. trUseDiffKr4 .OR. trUseGMRedi)
diagDif = implicitDiffusion
IF ( implicitDiffusion .AND. k.GE.2 ) THEN
IF (.NOT.implicitDiffusion ) THEN
IF ( .NOT.implicitDiffusion ) THEN
IF ( useDiagnostics .AND. implicitDiffusion .AND.
IF ( dTtracerLev(1).NE.dTtracerLev(Nr) .AND. implicitDiffusion
CALL WRITE_0D_L( implicitDiffusion, INDEX_NONE,
& .AND. implicitDiffusion ) THEN
IF ( PTRACERS_ImplVertAdv(iTracer) .OR. implicitDiffusion ) THEN
ELSEIF ( implicitDiffusion ) THEN
IF ( implicitDiffusion ) THEN
& implicitDiffusion, implicitViscosity, selectImplicitDrag,
IF ( ivdc_kappa.NE.zeroRL .AND. .NOT.implicitDiffusion ) THEN
IF ( saltImplVertAdv .OR. implicitDiffusion ) THEN
implicitDiffusion = .FALSE.
IF ( tempImplVertAdv .OR. implicitDiffusion ) THEN
& .AND.implicitDiffusion ) THEN