_RL PTRACERS_taveFreq
& PTRACERS_taveFreq,
IF ( PTRACERS_taveFreq.GT.0. .AND. myIter.NE.nIter0 ) THEN
CALL WRITE_0D_RL(PTRACERS_taveFreq, INDEX_NONE,
PTRACERS_taveFreq = taveFreq
IF ( PTRACERS_taveFreq.GT.0. _d 0 ) THEN
& DIFFERENT_MULTIPLE( PTRACERS_taveFreq, myTime, deltaTClock )
PTRACERS_taveFreq = 0.
IF ( DIFFERENT_MULTIPLE( PTRACERS_taveFreq, myTime, deltaTClock )