diff options
-rw-r--r-- | src/WaveToy.F77 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/WaveToy.F77 b/src/WaveToy.F77 index fdf5dcb..c6036a0 100644 --- a/src/WaveToy.F77 +++ b/src/WaveToy.F77 @@ -152,7 +152,7 @@ c ----------------------------------- else if (CCTK_EQUALS(bound,"zero")) then call ApplyConstantBC(ierr,cctkGH,zero,sw,"wavetoyf77::phi_next") else if (CCTK_Equals(bound,"radiation").eq.1) then - call ApplyRadiativeBC(ierr,cctkGH,zero,sw,"wavetoyf77::phi_next", + call ApplyRadiativeBC(ierr,cctkGH,zero,zero,sw,"wavetoyf77::phi_next", & "wavetoy::phi") end if |