diff options
Diffstat (limited to 'src/ADMConstraints.F')
-rw-r--r-- | src/ADMConstraints.F | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/src/ADMConstraints.F b/src/ADMConstraints.F index f896b37..23ec87a 100644 --- a/src/ADMConstraints.F +++ b/src/ADMConstraints.F @@ -274,13 +274,6 @@ c Apply flat boundary conditions at outer boundaries. call BndFlatGN(ierr,cctkGH,sw,"admconstraints::momentum") end if -c Synchronize. - - if (constraint_communication.eq.1) then - call CCTK_SyncGroup(ierr,cctkGH,"admconstraints::hamiltonian") - call CCTK_SyncGroup(ierr,cctkGH,"admconstraints::momentum") - end if - c Cartoon. if (cartoon==1) then |