MOMODL(9)='KOCKS'
.... .... * 'KOCKS' INATU = 70 .... .... .... ELSE IF (IMOD.EQ.9 ) THEN * KOCK INATU = 70