From db9092c819ce052db595a589074723b081fbb607 Mon Sep 17 00:00:00 2001 From: lanfer Date: Wed, 15 Dec 1999 09:18:56 +0000 Subject: changed include path to Develoment, for now. Has to be set abck to CactusEinstein later git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/RotatingDBHIVP/trunk@5 535fb057-194f-0410-b5a5-c63992f15602 --- src/RotatingDBHIVP.F | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/src/RotatingDBHIVP.F b/src/RotatingDBHIVP.F index 4f2e6b1..f018296 100644 --- a/src/RotatingDBHIVP.F +++ b/src/RotatingDBHIVP.F @@ -158,8 +158,8 @@ c do k = 1,np do j = 1,nq do i = 1,ne -#include "CactusEinstein/RotatingDBHIVP/src/gauss.x" -#include "CactusEinstein/RotatingDBHIVP/src/ksq_odd.x" +#include "Development/RotatingDBHIVP/src/gauss.x" +#include "Development/RotatingDBHIVP/src/ksq_odd.x" enddo enddo enddo @@ -689,10 +689,10 @@ c do j=1,ny do i=1,nx c psix = \partial psi / \partial x / psi -#include "CactusEinstein/RotatingDBHIVP/src/psi_1st_deriv.x" +#include "Development/RotatingDBHIVP/src/psi_1st_deriv.x" c psixx = \partial^2\psi / \partial x^2 / psi -#include "CactusEinstein/RotatingDBHIVP/src/psi_2nd_deriv.x" +#include "Development/RotatingDBHIVP/src/psi_2nd_deriv.x" enddo enddo enddo @@ -706,7 +706,7 @@ c do k= 1,nz do j= 1,ny do i= 1,nx -#include "CactusEinstein/RotatingDBHIVP/src/gij.x" +#include "Development/RotatingDBHIVP/src/gij.x" enddo enddo enddo @@ -714,8 +714,8 @@ c Extrinsic Curvture:Cactus only needs physical extrinsic curvature do k= 1,nz do j= 1,ny do i= 1,nx -#include "CactusEinstein/RotatingDBHIVP/src/cgauss.x" -#include "CactusEinstein/RotatingDBHIVP/src/kij_odd.x" +#include "Development/RotatingDBHIVP/src/cgauss.x" +#include "Development/RotatingDBHIVP/src/kij_odd.x" enddo enddo enddo -- cgit v1.2.3