aboutsummaryrefslogtreecommitdiff
path: root/src/InitSymBound.F90
diff options
context:
space:
mode:
Diffstat (limited to 'src/InitSymBound.F90')
-rw-r--r--src/InitSymBound.F9039
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