module global
      integer                              :: ndim, nvol
      integer, dimension(:), allocatable   :: lsize
      integer, dimension(:,:), allocatable :: nn
end module global
