moda_ival.F

    MODULE moda_ival

#ifndef MAXSS_H
#define MAXSS_H
      USE modv_maxss
#endif

#ifdef DYNAMIC_ALLOCATION
      INTEGER, ALLOCATABLE :: ival(:)
#else
      INTEGER ival(maxss)
#endif

    END MODULE