MODULE MODA_BITBUF #ifndef MXMSGL_H #define MXMSGL_H USE MODV_MXMSGL #endif #ifndef NFILES_H #define NFILES_H USE MODV_NFILES #endif INTEGER :: MAXBYT INTEGER :: IBIT #ifdef DYNAMIC_ALLOCATION INTEGER, ALLOCATABLE :: IBAY(:) INTEGER, ALLOCATABLE :: MBYT(:) INTEGER, ALLOCATABLE :: MBAY(:,:) #else INTEGER :: IBAY(MXMSGLD4) INTEGER :: MBYT(NFILES) INTEGER :: MBAY(MXMSGLD4,NFILES) #endif END MODULE