diff options
Diffstat (limited to 'src/hyperslab.F90')
-rw-r--r-- | src/hyperslab.F90 | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/src/hyperslab.F90 b/src/hyperslab.F90 deleted file mode 100644 index e540cb2..0000000 --- a/src/hyperslab.F90 +++ /dev/null @@ -1,33 +0,0 @@ -! $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 |