diff options
-rw-r--r-- | src/WaveToy.F77 | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/WaveToy.F77 b/src/WaveToy.F77 index f79022f..4254986 100644 --- a/src/WaveToy.F77 +++ b/src/WaveToy.F77 @@ -8,9 +8,9 @@ @@*/ #include "cctk.h" -#include "cctk_Faces.h" -#include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" +#include "cctk_Parameters.h" /*@@ @@ -35,7 +35,7 @@ c Declare variables in argument list DECLARE_CCTK_ARGUMENTS - INTEGER i,j,k,ierr + INTEGER i,j,k INTEGER istart, jstart, kstart, iend, jend, kend CCTK_REAL dx,dy,dz,dt CCTK_REAL dx2,dy2,dz2,dt2 @@ -109,7 +109,6 @@ c ---------------- DECLARE_CCTK_ARGUMENTS DECLARE_CCTK_PARAMETERS DECLARE_CCTK_FUNCTIONS - CCTK_INT Boundary_SelectVarForBC c Local declarations CCTK_INT ierr |