diff options
author | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2002-05-21 19:15:14 +0000 |
---|---|---|
committer | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2002-05-21 19:15:14 +0000 |
commit | 50fab556ec3bde3bfc4c5b448c9c463628a9d92f (patch) | |
tree | 56d2286733d97dcde5a796a1d4f9f5f6188c440d /src/EHFinder_mod.F90 | |
parent | 249497155be163f902ef9606ebc41d5598982524 (diff) |
Changed the way I handle boundaries on the local grid. Should now
work for full, bitant, quadrant and octant mode for the event horizon
evolution and for re-parametrization with euler pde. Still need testing though.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@13 2a26948c-0e4f-0410-aee8-f1d3e353619c
Diffstat (limited to 'src/EHFinder_mod.F90')
-rw-r--r-- | src/EHFinder_mod.F90 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/EHFinder_mod.F90 b/src/EHFinder_mod.F90 index 2c88ee5..3979003 100644 --- a/src/EHFinder_mod.F90 +++ b/src/EHFinder_mod.F90 @@ -8,6 +8,7 @@ module EHFinder_mod CCTK_INT, dimension(0:5), parameter :: jy = (/ 0, 0, -1, 1, 0, 0 /) CCTK_INT, dimension(0:5), parameter :: kz = (/ 0, 0, 0, 0, -1, 1 /) CCTK_INT, dimension(0:5), parameter :: ll = (/ 1, 2, 4, 8, 16, 32 /) + CCTK_INT :: ixl, ixr, jyl, jyr, kzl, kzr ! CCTK_INT, parameter :: ixl = 1 ! CCTK_INT, parameter :: ixr = 2 ! CCTK_INT, parameter :: iyl = 4 |