moda_ufbcpl.F

    MODULE moda_ufbcpl

#ifndef NFILES_H
#define NFILES_H
      USE modv_nfiles
#endif

#ifdef DYNAMIC_ALLOCATION
      INTEGER, ALLOCATABLE :: luncpy(:)
#else
      INTEGER :: luncpy(nfiles)
#endif

    END MODULE