diff options
author | miguel <miguel@b6f3ac56-194f-0410-8878-cdf6079d7f1b> | 2001-10-19 12:23:34 +0000 |
---|---|---|
committer | miguel <miguel@b6f3ac56-194f-0410-8878-cdf6079d7f1b> | 2001-10-19 12:23:34 +0000 |
commit | c6cfc95ab964f9b4968c6ec55dd8ef266f79430d (patch) | |
tree | fd093edd326d0ec1e58a01f10e111e4b2720425b /src | |
parent | 5dae8919dc27e53baf338422ee1906a7389fd2b6 (diff) |
Eliminating absolute paths in include files.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/IDAxiOddBrillBH/trunk@36 b6f3ac56-194f-0410-8878-cdf6079d7f1b
Diffstat (limited to 'src')
-rw-r--r-- | src/IDAxiOddBrillBH.F | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/src/IDAxiOddBrillBH.F b/src/IDAxiOddBrillBH.F index 90d0cbe..36d76c7 100644 --- a/src/IDAxiOddBrillBH.F +++ b/src/IDAxiOddBrillBH.F @@ -126,14 +126,14 @@ c Compute K^2: c do j = 1,nq do i = 1,ne -#include "Development/IDAxiOddBrillBH/src/gauss.x" +#include "gauss.x" if(brandt_seidel == 1) then -#include "Development/IDAxiOddBrillBH/src/ksq_bs.x" +#include "ksq_bs.x" else if (sergio == 1) then -#include "Development/IDAxiOddBrillBH/src/kerr.x" -#include "Development/IDAxiOddBrillBH/src/ksq_sergio.x" +#include "kerr.x" +#include "ksq_sergio.x" else -#include "Development/IDAxiOddBrillBH/src/ksq_axi_rdbh.x" +#include "ksq_axi_rdbh.x" endif enddo enddo @@ -430,10 +430,10 @@ c Interpolator handle. do i=1,nx c psix = \partial psi / \partial x / psi -#include "Development/IDAxiOddBrillBH/src/psi_1st_deriv.x" +#include "psi_1st_deriv.x" c psixx = \partial^2\psi / \partial x^2 / psi -#include "Development/IDAxiOddBrillBH/src/psi_2nd_deriv.x" +#include "psi_2nd_deriv.x" enddo enddo @@ -448,22 +448,22 @@ c do k= 1,nz do j= 1,ny do i= 1,nx -#include "Development/IDAxiOddBrillBH/src/gij.x" +#include "gij.x" enddo enddo enddo -c Extrinsic Curvture:Cactus only needs physical extrinsic curvature +c Extrinsic curvature: Cactus only needs physical extrinsic curvature do k= 1,nz do j= 1,ny do i= 1,nx -#include "Development/IDAxiOddBrillBH/src/cgauss.x" +#include "cgauss.x" if (brandt_seidel == 1) then -#include "Development/IDAxiOddBrillBH/src/kij_bs.x" +#include "kij_bs.x" else if (sergio == 1) then -#include "Development/IDAxiOddBrillBH/src/ckerr.x" -#include "Development/IDAxiOddBrillBH/src/kij_sergio.x" +#include "ckerr.x" +#include "kij_sergio.x" else -#include "Development/IDAxiOddBrillBH/src/kij_axi_rdbh.x" +#include "kij_axi_rdbh.x" endif enddo enddo |