cplSendFrq_iter = NINT( cpl_atmSendFrq / deltaTClock )
CALL WRITE_0D_R8( cpl_atmSendFrq, INDEX_NONE, 'cpl_atmSendFrq =',
_RL cpl_atmSendFrq
& cpl_atmSendFrq
cpl_atmSendFrq= deltaTClock