moda_nmikrp.F

    MODULE moda_nmikrp

#ifndef MAXCD_H
#define MAXCD_H
      USE modv_maxcd
#endif

#ifdef DYNAMIC_ALLOCATION
      CHARACTER*8, ALLOCATABLE :: nem(:,:)
      INTEGER, ALLOCATABLE :: irp(:,:)
      INTEGER, ALLOCATABLE :: krp(:,:)
#else
      CHARACTER*8 :: nem(maxcd,10)
      INTEGER :: irp(maxcd,10)
      INTEGER :: krp(maxcd,10)
#endif

    END MODULE