[Commits] [svn:einsteintoolkit] IDAxiBrillBH/trunk/src/ (Rev. 109)

[knarf at cct.lsu.edu]

User: knarf
Date: 2010/05/04 01:56 PM

Modified:
 /trunk/src/
  IDAxiBrillBH.F

Log:
 correct include file paths (the crude way(

File Changes:

Directory: /trunk/src/
======================

File [modified]: IDAxiBrillBH.F
Delta lines: +4 -4
===================================================================
--- trunk/src/IDAxiBrillBH.F	2010-03-16 22:18:33 UTC (rev 108)
+++ trunk/src/IDAxiBrillBH.F	2010-05-04 18:56:12 UTC (rev 109)
@@ -197,7 +197,7 @@
         qgrd(j) = (j-1.5d0)*dq
         do i=1,neb
           etagrd(i) = (i-2)*deta
-#include "CactusEinstein/IDAxiBrillBH/src/bhbrill.x"
+#include "EinsteinInitialData/IDAxiBrillBH/src/bhbrill.x"
         enddo
       enddo
 c Boundary conditions
@@ -499,10 +499,10 @@
          do j=1,ny
             do i=1,nx
 c     psix = \partial psi / \partial x / psi
-#include "CactusEinstein/IDAxiBrillBH/src/psi_1st_deriv.x"
+#include "EinsteinInitialData/IDAxiBrillBH/src/psi_1st_deriv.x"
 
 c     psixx = \partial^2\psi / \partial x^2 / psi
-#include "CactusEinstein/IDAxiBrillBH/src/psi_2nd_deriv.x"
+#include "EinsteinInitialData/IDAxiBrillBH/src/psi_2nd_deriv.x"
             enddo
          enddo
       enddo
@@ -514,7 +514,7 @@
 c       gxx = ...
 c     Derivatives of the metric (currently commented-out)
 c       dxgxx = 1/2 \partial gxx / \partial x
-#include "CactusEinstein/IDAxiBrillBH/src/gij.x"
+#include "EinsteinInitialData/IDAxiBrillBH/src/gij.x"
 
                if (r(i,j,k) < 1.0d-10) then