*CDK PARAMS                                                                        PARAMS.1         
      PARAMETER (KMX=95,IMX=20)                                                    PARAMS.2         
      PARAMETER (KMXP=KMX+1,IMXP=IMX+4)                                            PARAMS.3         
      PARAMETER (KMXP2=2*KMXP,KMXP3=3*KMXP,KMXP4=4*KMXP,                           PARAMS.4         
     1  KMXP5=5*KMXP,KMXP6=6*KMXP,KMXP7=7*KMXP,KMXP8=8*KMXP,KMXP9=9*KMXP           PARAMS.5         
     2  ,KMXP10=10*KMXP,KMXP11=11*KMXP,KMXP12=12*KMXP,KMXP13=13*KMXP,              PARAMS.6         
     3  KMXP14=14*KMXP,KMXP15=15*KMXP,KMXP16=16*KMXP,KMXP17=17*KMXP,               PARAMS.7         
     4  KMXP18=18*KMXP,KMXP19=19*KMXP,KMXP20=20*KMXP,KMXP21=21*KMXP,               PARAMS.8         
     5  KMXP22=22*KMXP,KMXP23=23*KMXP,KMXP24=24*KMXP,KMXP25=25*KMXP,               PARAMS.9         
     6  KMXP26=26*KMXP,KMP27P=27*KMXP+1,KMP54P=54*KMXP+1,KMXP55=55*KMXP)           PARAMS.10