From d4556ccd4fa418ec64ece08a56e6fa6a1ad80298 Mon Sep 17 00:00:00 2001 From: allen Date: Fri, 19 Jan 2001 09:43:13 +0000 Subject: Fixed bug in comment statement git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/WaveToyF90/trunk@56 f80f6fb6-8356-4fd4-90bc-d84ad503c100 --- src/WaveToy.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/WaveToy.F b/src/WaveToy.F index 0ae3478..14bac7a 100644 --- a/src/WaveToy.F +++ b/src/WaveToy.F @@ -124,7 +124,7 @@ if (CCTK_EQUALS(bound,"flat")) then call BndFlatVN(ierr,cctkGH,sw,"wavetoy::phi") else if (CCTK_EQUALS(bound,"zero")) then -# call BndScalarVN(ierr,cctkGH,sw,sval,"wavetoy::phi") +c call BndScalarVN(ierr,cctkGH,sw,sval,"wavetoy::phi") call BndScalarDirVN(ierr,cctkGH,swdir,mione ,sval,"wavetoy::phi") call BndScalarDirVN(ierr,cctkGH,swdir,ione ,sval,"wavetoy::phi") call BndScalarDirVN(ierr,cctkGH,swdir,mitwo ,sval,"wavetoy::phi") -- cgit v1.2.3