diff options
Diffstat (limited to 'src/WaveToy.F')
| -rw-r--r-- | src/WaveToy.F | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/WaveToy.F b/src/WaveToy.F index 1c9bc8f..d493fe3 100644 --- a/src/WaveToy.F +++ b/src/WaveToy.F @@ -101,7 +101,7 @@ @desc Boundary conditions for the wave equation @enddesc - @calls ApplyFlatBC,ApplyRadiativeBC + @calls FlatBC,RadiativeBC @calledby @history @@ -122,7 +122,7 @@ CCTK_REAL,parameter :: zero = 0.0 CCTK_REAL,parameter :: one = 1.0 - call ApplySymmetry(cctkGH,"wavetoyf90::temps") + call CartSymBCGroup(ierr,cctkGH,"wavetoyf90::temps") if (CCTK_EQUALS(bound,"flat")) then call ApplyFlatBC(ierr,cctkGH,sw,"wavetoyf90::phi_tmp") |