From 7f91f875d3bfcf2d4cae52ffa8c62ab3ef6c927a Mon Sep 17 00:00:00 2001
From: miguel <miguel@89daf98e-ef62-4674-b946-b8ff9de2216c>
Date: Wed, 26 Apr 2000 14:11:09 +0000
Subject: Minor chnage.

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@71 89daf98e-ef62-4674-b946-b8ff9de2216c
---
 src/AHFinder_mask.F | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/AHFinder_mask.F b/src/AHFinder_mask.F
index 0050f2b..058d2d4 100644
--- a/src/AHFinder_mask.F
+++ b/src/AHFinder_mask.F
@@ -28,7 +28,7 @@
       DECLARE_CCTK_FARGUMENTS
       DECLARE_CCTK_PARAMETERS
 
-      integer i,j,k
+      CCTK_INT i,j,k
 
       CCTK_REAL zero,one
       CCTK_REAL aux,rhor
@@ -108,6 +108,14 @@
       end if
 
 
+!     ****************************************************
+!     ***  APPLY SYMMETRY BOUNDARIES AND SYNCHRONIZE   ***
+!     ****************************************************
+
+      call CCTK_SyncGroup(cctkGH,"ahfinder::ahfmask")
+      call CartSymBCGroup(ierr,cctkGH,"ahfinder::ahfmask")
+
+
 !     ***************
 !     ***   END   ***
 !     ***************
-- 
cgit v1.2.3