*CDK RATEBLK                                                                       RATEBLK.1        
      COMMON/RATEBLK/RKK(25,KMXP),ALPP(10,KMXP),RBB(20,KMXP),                      RATEBLK.2        
     1RKMM(50,KMXP)                                                                RATEBLK.3