diff options
| author | allen <allen@fa3da13c-9f13-4301-a575-cf5b8c5e1907> | 1999-09-27 16:57:54 +0000 |
|---|---|---|
| committer | allen <allen@fa3da13c-9f13-4301-a575-cf5b8c5e1907> | 1999-09-27 16:57:54 +0000 |
| commit | 3c80f3cd682c54a58c32361d44651209e9f09037 (patch) | |
| tree | 75e45c0d60d7d71e8ccdb382783d67a431f19195 | |
| parent | d2056d5d728b8cba7fd39fc8866d90847298ac3d (diff) | |
Changed boundary condition
git-svn-id: http://svn.cactuscode.org/arrangements/CactusElliptic/EllSOR/trunk@19 fa3da13c-9f13-4301-a575-cf5b8c5e1907
| -rw-r--r-- | src/sor_flat.F | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/sor_flat.F b/src/sor_flat.F index a5c19a9..4b0a477 100644 --- a/src/sor_flat.F +++ b/src/sor_flat.F @@ -235,7 +235,7 @@ c Reduce the norm goto 123 endif -c FIXME: what about boudnary conditions, like robin, etc. +c FIXME: what about boundary conditions, like robin, etc. c Apply octant Symmetries c sw(1)=1 @@ -246,7 +246,7 @@ c if (ierr.ne.0) then c call CCTK_WARN(1,"Could not apply BC !") c endif - call ApplySymmetryVarI(cctkGH, var_idx) + call CartSymBCVarI(ierr,cctkGH, var_idx) enddo |