diff options
| author | allen <allen@c78560ca-4b45-4335-b268-5f3340f3cb52> | 2001-05-10 17:13:37 +0000 |
|---|---|---|
| committer | allen <allen@c78560ca-4b45-4335-b268-5f3340f3cb52> | 2001-05-10 17:13:37 +0000 |
| commit | bb4898d9778932478898e6297c9eac1b388ce900 (patch) | |
| tree | 3a9b505a23bf1e0b2943d13d8a850f6b91fb649e | |
| parent | c1c5e52d55d71027f219c135147fa804f42dc162 (diff) | |
New timelevel indexing
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/CartGrid3D/trunk@138 c78560ca-4b45-4335-b268-5f3340f3cb52
| -rw-r--r-- | src/SymmetryWrappers.c | 19 |
1 files changed, 13 insertions, 6 deletions
diff --git a/src/SymmetryWrappers.c b/src/SymmetryWrappers.c index 68b1171..abc8e97 100644 --- a/src/SymmetryWrappers.c +++ b/src/SymmetryWrappers.c @@ -14,6 +14,13 @@ #include "cctk_FortranString.h" #include "Symmetry.h" +void CCTK_FCALL CCTK_FNAME(CartSymGI)(int *ierr, cGH *GH, int *gi); +void CCTK_FCALL CCTK_FNAME(CartSymGN) + (int *ierr, cGH *GH, ONE_FORTSTRING_ARG); +void CCTK_FCALL CCTK_FNAME(CartSymVI)(int *ierr, cGH *GH, int *vi); +void CCTK_FCALL CCTK_FNAME(CartSymVN) + (int *ierr, cGH *GH, ONE_FORTSTRING_ARG); + int CartApplySym3Di(cGH *GH, int gdim, int *doSym, @@ -108,11 +115,11 @@ int CartSymGI(cGH *GH, int gi) cntstag[2] = no_origin && no_originz && avoid_origin && avoid_originz; /* Use next time level, if present */ - time = CCTK_NumTimeLevelsFromVarI(first_vi) - 1; - if (time < 0) + time = 0; + /*if (time < 0) { time = 0; - } + }*/ for (vi=first_vi; vi<first_vi+numvars; vi++) { @@ -300,11 +307,11 @@ int CartSymVI(cGH *GH, int vi) cntstag[2] = no_origin && no_originz && avoid_origin && avoid_originz; /* Use next time level, if present */ - time = CCTK_NumTimeLevelsFromVarI(vi) - 1; - if (time < 0) + time = 0; + /* if (time < 0) { time = 0; - } + }*/ /* Apply Symmetries to lower sides [0,2,4] if: |