MODULE MODA_MSTABS

#ifndef MAXCD_H
#define MAXCD_H
	  USE MODV_MAXCD
#endif

#ifndef MXMTBB_H
#define MXMTBB_H
	  USE MODV_MXMTBB
#endif

#ifndef MXMTBD_H
#define MXMTBD_H
	  USE MODV_MXMTBD
#endif

#ifdef DYNAMIC_ALLOCATION
	  INTEGER :: NMTB
	  INTEGER :: NMTD
	  INTEGER, ALLOCATABLE :: IBFXYN(:)
	  CHARACTER*4, ALLOCATABLE :: CBSCL(:)
	  CHARACTER*12, ALLOCATABLE :: CBSREF(:)
	  CHARACTER*4, ALLOCATABLE :: CBBW(:)
	  CHARACTER*14, ALLOCATABLE :: CBUNIT(:)
	  CHARACTER*8, ALLOCATABLE :: CBMNEM(:)
	  CHARACTER*120, ALLOCATABLE :: CBELEM(:)
	  INTEGER, ALLOCATABLE :: IDFXYN(:)
	  CHARACTER*120, ALLOCATABLE :: CDSEQ(:)
	  CHARACTER*8, ALLOCATABLE :: CDMNEM(:)
	  INTEGER, ALLOCATABLE :: NDELEM(:)
	  INTEGER, ALLOCATABLE :: IDEFXY(:)
#else
	  INTEGER, BIND(C) :: NMTB
	  INTEGER, BIND(C) :: NMTD
	  INTEGER, BIND(C) :: IBFXYN(MXMTBB)
	  CHARACTER*4, BIND(C) :: CBSCL(MXMTBB)
	  CHARACTER*12, BIND(C) :: CBSREF(MXMTBB)
	  CHARACTER*4, BIND(C) :: CBBW(MXMTBB)
	  CHARACTER*14, BIND(C) :: CBUNIT(MXMTBB)
	  CHARACTER*8, BIND(C) :: CBMNEM(MXMTBB)
	  CHARACTER*120, BIND(C) :: CBELEM(MXMTBB)
	  INTEGER, BIND(C) :: IDFXYN(MXMTBD)
	  CHARACTER*120, BIND(C) :: CDSEQ(MXMTBD)
	  CHARACTER*8, BIND(C) :: CDMNEM(MXMTBD)
	  INTEGER, BIND(C) :: NDELEM(MXMTBD)
	  INTEGER, BIND(C) :: IDEFXY(MXMTBD*MAXCD)
#endif

	END MODULE