diff options
| author | yye00 <yye00@daab82bb-f315-4ad1-b6d0-9353ff8b6e27> | 2005-04-29 21:25:30 +0000 |
|---|---|---|
| committer | yye00 <yye00@daab82bb-f315-4ad1-b6d0-9353ff8b6e27> | 2005-04-29 21:25:30 +0000 |
| commit | 4b95038531a96c4f7dc48b25cf44287e90f505cf (patch) | |
| tree | 6fc1fdb9bb33b00990c222ac1dcaab0d77718e39 /src/InitSymBound.F90 | |
| parent | 63a9307937610ee7cbe380199f906fc67ff95765 (diff) | |
more \r to \n conversion
git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/WaveToyFreeF90/trunk@76 daab82bb-f315-4ad1-b6d0-9353ff8b6e27
Diffstat (limited to 'src/InitSymBound.F90')
| -rw-r--r-- | src/InitSymBound.F90 | 39 |
1 files changed, 0 insertions, 39 deletions
diff --git a/src/InitSymBound.F90 b/src/InitSymBound.F90 index 8822a73..e69de29 100644 --- a/src/InitSymBound.F90 +++ b/src/InitSymBound.F90 @@ -1,39 +0,0 @@ - /*@@ - @file InitSymBound.F90 - @date - @author Gabrielle Allen - @desc - Sets the symmetries across the coordinate axes - @enddesc - @@*/ - -#include "cctk.h" -#include "cctk_Arguments.h" - - /*@@ - @routine WaveToyFreeF90_InitSymBound - @date - @author Gabrielle Allen - @desc - Sets the symmetries for Wave Toy - @enddesc - @calls - @calledby - @history - - @endhistory - -@@*/ - -subroutine WaveToyFreeF90_InitSymBound(CCTK_ARGUMENTS) - - implicit none - - DECLARE_CCTK_ARGUMENTS - - INTEGER :: ierr - INTEGER, DIMENSION(3) :: sym = 1 - - call SetCartSymVN(ierr, cctkGH, sym, 'wavetoy::phi') - -end subroutine WaveToyFreeF90_InitSymbound |