diff options
-rw-r--r-- | src/extrapolate.F90 | 2 | ||||
-rw-r--r-- | src/findboundary.F90 | 2 | ||||
-rw-r--r-- | src/findnormals.F90 | 2 | ||||
-rw-r--r-- | src/findnormals_erik.F90 | 2 | ||||
-rw-r--r-- | src/fixedsphere.F90 | 2 |
5 files changed, 10 insertions, 0 deletions
diff --git a/src/extrapolate.F90 b/src/extrapolate.F90 index aa79d83..19ca1b6 100644 --- a/src/extrapolate.F90 +++ b/src/extrapolate.F90 @@ -7,6 +7,8 @@ #include "cctk.h" #include "cctk_Parameters.h" +#include "cctk_Functions.h" + #include "maskvalues.h" subroutine excision_extrapolate (ierr, var, oldvar, & diff --git a/src/findboundary.F90 b/src/findboundary.F90 index 0dbc5b6..454c91a 100644 --- a/src/findboundary.F90 +++ b/src/findboundary.F90 @@ -6,6 +6,8 @@ #include "cctk.h" #include "cctk_Parameters.h" +#include "cctk_Functions.h" + #include "maskvalues.h" subroutine excision_findboundary (ierr, mask, ni, nj, nk) diff --git a/src/findnormals.F90 b/src/findnormals.F90 index 518679c..ecd4d43 100644 --- a/src/findnormals.F90 +++ b/src/findnormals.F90 @@ -6,6 +6,8 @@ #include "cctk.h" #include "cctk_Parameters.h" +#include "cctk_Functions.h" + #include "maskvalues.h" subroutine excision_findnormals (ierr, mask, dirx, diry, dirz, ni, nj, nk) diff --git a/src/findnormals_erik.F90 b/src/findnormals_erik.F90 index 8feccf2..6740d0f 100644 --- a/src/findnormals_erik.F90 +++ b/src/findnormals_erik.F90 @@ -6,6 +6,8 @@ #include "cctk.h" #include "cctk_Parameters.h" +#include "cctk_Functions.h" + #include "maskvalues.h" subroutine excision_findnormals (ierr, mask, dirx, diry, dirz, ni, nj, nk) diff --git a/src/fixedsphere.F90 b/src/fixedsphere.F90 index 9b4fba6..7d2294d 100644 --- a/src/fixedsphere.F90 +++ b/src/fixedsphere.F90 @@ -3,6 +3,8 @@ #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" + subroutine Lego_FixedSphere(CCTK_ARGUMENTS) implicit none |