diff options
| -rw-r--r-- | src/ADMConstraints.F | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ADMConstraints.F b/src/ADMConstraints.F index 33735c5..3c92324 100644 --- a/src/ADMConstraints.F +++ b/src/ADMConstraints.F @@ -175,7 +175,7 @@ c Synchronize and apply flat boundary conditions call CartSymGN(ierr,cctkGH,"admconstraints::admconstraints") if (CCTK_Equals(bound,"flat") == 1) then - call FlatBCGroup(ierr,cctkGH,sw,"admconstraints::admconstraints") + call BndFlatGN(ierr,cctkGH,sw,"admconstraints::admconstraints") end if if (constraint_communication.eq.1) then |