_RL tauRelaxPTR(PTRACERS_num)
& tauRelaxPTR
rec_tauRlx = rbcsVanishingFac/tauRelaxPTR(iTracer)
& tauRelaxPTR(iTr)
tauRelaxPTR(iTracer) = 0.
IF ( tauRelaxPTR(iTracer).LE.0. ) THEN
& useRBCpTrNum, tauRelaxPTR,