diff options
Diffstat (limited to 'src/AHFinder_gau.F')
-rw-r--r-- | src/AHFinder_gau.F | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/src/AHFinder_gau.F b/src/AHFinder_gau.F index 9ecad73..4bc645f 100644 --- a/src/AHFinder_gau.F +++ b/src/AHFinder_gau.F @@ -94,7 +94,7 @@ c CCTK_REAL i2dx,i2dy,i2dz,idxx,idyy,idzz,idxy,idxz,idyz ! Declarations for macros. -c#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing_declare.h" +c#include "EinsteinBase/ADMMacros/src/macro/ADM_Spacing_declare.h" CCTK_REAL :: dt CCTK_REAL :: idx, idy, idz CCTK_REAL :: i2dx, i2dy, i2dz @@ -103,10 +103,10 @@ c#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing_declare.h" CCTK_REAL :: i12dxx, i12dyy, i12dzz CCTK_REAL :: i36dxy, i36dxz, i36dyz -#include "CactusEinstein/ADMMacros/src/macro/UPPERMET_declare.h" -#include "CactusEinstein/ADMMacros/src/macro/CHR2_declare.h" -#include "CactusEinstein/ADMMacros/src/macro/RICCI_declare.h" -#include "CactusEinstein/ADMMacros/src/macro/TRRICCI_declare.h" +#include "EinsteinBase/ADMMacros/src/macro/UPPERMET_declare.h" +#include "EinsteinBase/ADMMacros/src/macro/CHR2_declare.h" +#include "EinsteinBase/ADMMacros/src/macro/RICCI_declare.h" +#include "EinsteinBase/ADMMacros/src/macro/TRRICCI_declare.h" ! Data. @@ -346,7 +346,7 @@ c#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing_declare.h" meri_p1 = zero meri_p2 = zero -#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing.h" +#include "EinsteinBase/ADMMacros/src/macro/ADM_Spacing.h" ! ******************************************************* @@ -374,7 +374,7 @@ c#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing_declare.h" ! Find upper spatial metric using standard macro. -#include "CactusEinstein/ADMMacros/src/macro/UPPERMET_guts.h" +#include "EinsteinBase/ADMMacros/src/macro/UPPERMET_guts.h" ug(1,1) = UPPERMET_UXX ug(2,2) = UPPERMET_UYY @@ -396,7 +396,7 @@ c#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing_declare.h" ! Find Christoffel symbols using standard macros. -#include "CactusEinstein/ADMMacros/src/macro/CHR2_guts.h" +#include "EinsteinBase/ADMMacros/src/macro/CHR2_guts.h" ! Find extrinsic curvature of the 2-surfaces defined ! as the level sets of the horizon function. The @@ -473,8 +473,8 @@ c#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing_declare.h" ! Find 3-Ricci and 3-Ricci scalar using standard macros. -#include "CactusEinstein/ADMMacros/src/macro/RICCI_guts.h" -#include "CactusEinstein/ADMMacros/src/macro/TRRICCI_guts.h" +#include "EinsteinBase/ADMMacros/src/macro/RICCI_guts.h" +#include "EinsteinBase/ADMMacros/src/macro/TRRICCI_guts.h" ! Find 2-Ricci scalar using the contracted Gauss-Codazzi ! relations: @@ -497,10 +497,10 @@ c#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing_declare.h" ! Undefine macros! -#include "CactusEinstein/ADMMacros/src/macro/UPPERMET_undefine.h" -#include "CactusEinstein/ADMMacros/src/macro/CHR2_undefine.h" -#include "CactusEinstein/ADMMacros/src/macro/RICCI_undefine.h" -#include "CactusEinstein/ADMMacros/src/macro/TRRICCI_undefine.h" +#include "EinsteinBase/ADMMacros/src/macro/UPPERMET_undefine.h" +#include "EinsteinBase/ADMMacros/src/macro/CHR2_undefine.h" +#include "EinsteinBase/ADMMacros/src/macro/RICCI_undefine.h" +#include "EinsteinBase/ADMMacros/src/macro/TRRICCI_undefine.h" end do end do |