diff options
| -rw-r--r-- | src/InitSymBound.F | 3 | ||||
| -rw-r--r-- | src/WaveToy.F | 2 |
2 files changed, 3 insertions, 2 deletions
diff --git a/src/InitSymBound.F b/src/InitSymBound.F index 912f0e2..d077848 100644 --- a/src/InitSymBound.F +++ b/src/InitSymBound.F @@ -31,9 +31,10 @@ DECLARE_CCTK_ARGUMENTS + INTEGER :: ierr INTEGER, DIMENSION(3) :: sym = 1 - call SetCartSymmetry(cctkGH, sym, 'wavetoy::phi') + call SetCartSymVN(ierr, cctkGH, sym, 'wavetoy::phi') end subroutine WaveToyF90_InitSymbound diff --git a/src/WaveToy.F b/src/WaveToy.F index 59d52ca..b234128 100644 --- a/src/WaveToy.F +++ b/src/WaveToy.F @@ -117,7 +117,7 @@ CCTK_REAL,parameter :: zero = 0.0 CCTK_REAL,parameter :: one = 1.0 - call CartSymBCGroup(ierr,cctkGH,"wavetoy::scalarevolve") + call CartSymGN(ierr,cctkGH,"wavetoy::scalarevolve") if (CCTK_EQUALS(bound,"flat")) then call FlatBCVar(ierr,cctkGH,sw,"wavetoy::phi") |