F4P DINIT=DINIT.FTN/CO:20
MAC ITIME=ITIME
MAC RND=RND