CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC C PRELOAD VALUE OF INIT BLOCK DATA INTEGER INIT COMMON /PARAM3/INIT DATA INIT/0/ END CCCCCCCCCCCCCCCCCCCCCCCC