From c5651fbc152fd53a0c1aa649bab06e564ecbc6a1 Mon Sep 17 00:00:00 2001 From: allen Date: Sun, 6 Jan 2002 18:20:39 +0000 Subject: Added missing argument for CCTK_SyncGroup (hidden in an ifdef :( for excision) git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/ADMConstraints/trunk@54 b7a48df3-cbbf-4440-997f-b4b717c9f7fc --- src/ADMConstraints.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/ADMConstraints.F b/src/ADMConstraints.F index 529bdc4..a267bdc 100644 --- a/src/ADMConstraints.F +++ b/src/ADMConstraints.F @@ -235,7 +235,7 @@ c LegoExcision (must be done before symmetries are applied). call excision_findboundary(ierr,emask,nx,ny,nz) - call CCTK_SyncGroup(cctkGH,"einstein::mask") + call CCTK_SyncGroup(ierr,cctkGH,"einstein::mask") call CartSymGN(ierr,cctkGH,"einstein::mask") call excision_findnormals(ierr,emask,dirx,diry,dirz,nx,ny,nz) -- cgit v1.2.3