diff options
author | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2004-01-22 21:35:22 +0000 |
---|---|---|
committer | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2004-01-22 21:35:22 +0000 |
commit | e121eed6101ffee1b5d4ba74ef601c8ceb0c9d61 (patch) | |
tree | e6f839288b0cefea34e5c373554049eee79bc550 | |
parent | 2ab6b7dd6ce481c7acbb7bb49e7658c88dbfb795 (diff) |
Get the local sizes and place them in nx, ny and nz. Now ellipsoids should
work.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@164 2a26948c-0e4f-0410-aee8-f1d3e353619c
-rw-r--r-- | src/EHFinder_Init.F90 | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/EHFinder_Init.F90 b/src/EHFinder_Init.F90 index 2375492..b7f2a25 100644 --- a/src/EHFinder_Init.F90 +++ b/src/EHFinder_Init.F90 @@ -24,6 +24,11 @@ subroutine EHFinder_Init_F(CCTK_ARGUMENTS) CCTK_REAL :: theta, dtheta, thetamin, thetamax, r_el CCTK_INT, dimension(1) :: lsh, lbnd +! Get the size of the local grid. + nx = cctk_lsh(1) + ny = cctk_lsh(2) + nz = cctk_lsh(3) + ! Initialize the last_time varible. Note the parameters should be ! chosen to be consistent with the run producing the numerical data. ! F.ex. if dt was 0.1 but the data was only stored every 4 iterations, the |