aboutsummaryrefslogtreecommitdiff
path: root/src/WaveToy.F
diff options
context:
space:
mode:
Diffstat (limited to 'src/WaveToy.F')
-rw-r--r--src/WaveToy.F2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/WaveToy.F b/src/WaveToy.F
index f800edf..7d93465 100644
--- a/src/WaveToy.F
+++ b/src/WaveToy.F
@@ -43,7 +43,7 @@
if (CCTK_Equals(bound,"flat")==1) then
call ApplyFlatBC(cctkGH,sw,"wavetoy::phi")
else if (CCTK_Equals(bound,"radiation")==1) then
- call ApplyRadiativeBC(cctkGH,zero,sw,"wavetoy::phi","wavetoyf90::phi_old")
+ call ApplyRadiativeBC(cctkGH,zero,sw,"wavetoy::phi","wavetoy::phi_old")
end if
end subroutine wavetoyf90_boundaries