From 37c726b0317cd03d086f34b2792795116cdf66bd Mon Sep 17 00:00:00 2001
From: shawley <>
Date: Wed, 27 Feb 2002 13:34:00 +0000
Subject: cleaned up static boundary condition a bit

darcs-hash:20020227133456-e415b-829fb0a57007e880eedb7a041bfa8ca8d1570045.gz
---
 CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77 | 2 --
 1 file changed, 2 deletions(-)

(limited to 'CarpetExtra/FOWaveToyF77')

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")
-- 
cgit v1.2.3