diff options
author | miguel <miguel@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2000-04-26 14:11:09 +0000 |
---|---|---|
committer | miguel <miguel@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2000-04-26 14:11:09 +0000 |
commit | 7f91f875d3bfcf2d4cae52ffa8c62ab3ef6c927a (patch) | |
tree | 5a7196f3efe0cdf3ebea7345da0b9cd46b1fc9cc /src | |
parent | 114c891b15740413b6b35aad9549487feff443c6 (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.F | 10 |
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 *** ! *************** |