diff options
| author | shawley <> | 2002-02-27 13:34:00 +0000 |
|---|---|---|
| committer | shawley <> | 2002-02-27 13:34:00 +0000 |
| commit | 37c726b0317cd03d086f34b2792795116cdf66bd (patch) | |
| tree | 92c7d0699bc1686a69651875e55b4ee87024e545 /CarpetExtra/FOWaveToyF77 | |
| parent | 629afedf629e04240b8b2e6b3d648c4f5135bdde (diff) | |
cleaned up static boundary condition a bit
darcs-hash:20020227133456-e415b-829fb0a57007e880eedb7a041bfa8ca8d1570045.gz
Diffstat (limited to 'CarpetExtra/FOWaveToyF77')
| -rw-r--r-- | CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77 | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77 b/CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77 index f1784cc55..12e0538b3 100644 --- a/CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77 +++ b/CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77 @@ -182,8 +182,6 @@ c ----------------------------------- call BndScalarVN (ierr, cctkGH, sw, zero, "wavetoy::phiz") call BndScalarVN (ierr, cctkGH, sw, zero, "wavetoy::phi") else if (CCTK_EQUALS(bound, "static")) then - ierr = 0 - call CCTK_WARN (2, "Static boundary conditions chosen") call BndCopyTLVN (ierr, cctkGH, sw, 1, 0, "wavetoy::phi") call BndCopyTLVN (ierr, cctkGH, sw, 1, 0, "wavetoy::pi") call BndCopyTLVN (ierr, cctkGH, sw, 1, 0, "wavetoy::phix") |