*CDK PSIB2F                                                                        PSIB2F.1         
      COMMON/PSIB2/PARBF(IMXP,10)                                                  PSIB2F.2