*CDK FLUX2                                                                         FLUX2.1          
      COMMON/FLUX2/FLUXNO(IMXP),IBNDNO,FLUXCO(IMXP),IBNDCO                         FLUX2.2