aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authormiguel <miguel@89daf98e-ef62-4674-b946-b8ff9de2216c>2000-04-26 14:11:09 +0000
committermiguel <miguel@89daf98e-ef62-4674-b946-b8ff9de2216c>2000-04-26 14:11:09 +0000
commit7f91f875d3bfcf2d4cae52ffa8c62ab3ef6c927a (patch)
tree5a7196f3efe0cdf3ebea7345da0b9cd46b1fc9cc /src
parent114c891b15740413b6b35aad9549487feff443c6 (diff)
Minor chnage.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@71 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src')
-rw-r--r--src/AHFinder_mask.F10
1 files changed, 9 insertions, 1 deletions
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 ***
! ***************