diff options
| author | schnetter <> | 2002-03-06 16:47:00 +0000 |
|---|---|---|
| committer | schnetter <> | 2002-03-06 16:47:00 +0000 |
| commit | 018574eb13db6cc7af12688ef70dffb3d83397b8 (patch) | |
| tree | 935be2cffd1a8412dc4ca58f0ed07f3fec0d0af3 /CarpetExtra/WaveToyF77/src | |
| parent | 7e128eda1286b9c9a621c4187eaa23e448e9658f (diff) | |
Updated parameter files to new conventions.
Updated parameter files to new conventions.
Removed "static" boundary conditions; these depend on private changes
not available in Cactus.
darcs-hash:20020306164757-07bb3-531f54e20a2bb93536b467dffbb459f6b14777f1.gz
Diffstat (limited to 'CarpetExtra/WaveToyF77/src')
| -rw-r--r-- | CarpetExtra/WaveToyF77/src/WaveToy.F77 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/CarpetExtra/WaveToyF77/src/WaveToy.F77 b/CarpetExtra/WaveToyF77/src/WaveToy.F77 index 77a3401f3..4c8933b04 100644 --- a/CarpetExtra/WaveToyF77/src/WaveToy.F77 +++ b/CarpetExtra/WaveToyF77/src/WaveToy.F77 @@ -162,8 +162,8 @@ c ----------------------------------- call BndFlatVN (ierr, cctkGH, sw, "wavetoy::phi") else if (CCTK_EQUALS(bound, "zero")) then call BndScalarVN (ierr, cctkGH, sw, zero, "wavetoy::phi") - else if (CCTK_EQUALS(bound, "static")) then - call BndCopyTLVN (ierr, cctkGH, sw, 1, 0, "wavetoy::phi") +c$$$ else if (CCTK_EQUALS(bound, "static")) then +c$$$ call BndCopyTLVN (ierr, cctkGH, sw, 1, 0, "wavetoy::phi") else if (CCTK_EQUALS(bound, "radiation")) then call BndRadiativeVN (ierr, cctkGH, sw, zero, one, $ "wavetoy::phi", "wavetoy::phi") |