_RL layers_taveFreq, layers_diagFreq
COMMON /LAYERS_PARM_RL/ layers_taveFreq, layers_diagFreq
IF ( DIFFERENT_MULTIPLE(layers_diagFreq,myTime,deltaTClock)
& layers_G, layers_taveFreq, layers_diagFreq,
layers_diagFreq = dumpFreq