From 952415f9aea62964c739add0010a3dc1d8f9726a Mon Sep 17 00:00:00 2001 From: tradke Date: Fri, 30 Jun 2000 11:20:02 +0000 Subject: Added support for CCTK_COMPLEX variables. git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGH/PUGHSlab/trunk@26 10716dce-81a3-4424-a2c8-48026a0d3035 --- src/Hyperslab.c | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'src/Hyperslab.c') diff --git a/src/Hyperslab.c b/src/Hyperslab.c index be060ec..8e9cef1 100644 --- a/src/Hyperslab.c +++ b/src/Hyperslab.c @@ -435,6 +435,11 @@ int Hyperslab_GetLocalHyperslab (cGH *GH, int vindex, int vtimelvl, point, startpoint, endpoint, downsample, points_per_dim); break; + case CCTK_VARIABLE_COMPLEX: + PICKUP_HYPERSLAB_DATA (CCTK_COMPLEX, vinfo.dim, vdata, *hdata, + point, startpoint, endpoint, downsample, + points_per_dim); + break; default: CCTK_WARN (1, "Unsupported variable type"); retval = -1; @@ -739,6 +744,8 @@ int Hyperslab_GetHyperslab (cGH *GH, int target_proc, int vindex, int vtimelvl, mpi_vtype = PUGH_MPI_INT; break; case CCTK_VARIABLE_REAL: mpi_vtype = PUGH_MPI_REAL; break; + case CCTK_VARIABLE_COMPLEX: + mpi_vtype = PUGH_pGH (GH)->PUGH_mpi_complex; break; default: CCTK_WARN (1, "Unsupported variable type"); break; } -- cgit v1.2.3