! $Header$

#include "cctk.h"

module hyperslab
  implicit none
  public
  
  interface
     
     subroutine hyperslab_fillhyperslab (ierr, cctkgh, target_proc, &
          vindex, vtimelevel, &
          hdim, global_startpoint, directions, lengths, downsample, &
          nhdata, hdata, hsize)
       implicit none
       integer      ierr
       CCTK_POINTER cctkgh
       integer      target_proc
       integer      vindex
       integer      vtimelevel
       integer      hdim
       integer      global_startpoint(*) ! vdim
       integer      directions(*) ! vdim
       integer      lengths(hdim)
       integer      downsample(hdim)
       integer      nhdata
       CCTK_REAL    hdata(*)
       integer      hsize(hdim)
     end subroutine hyperslab_fillhyperslab
     
  end interface
  
end module hyperslab