diff options
Diffstat (limited to 'src/Write2D.c')
-rw-r--r-- | src/Write2D.c | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/src/Write2D.c b/src/Write2D.c index 87922cd..f064c69 100644 --- a/src/Write2D.c +++ b/src/Write2D.c @@ -35,8 +35,7 @@ CCTK_FILEVERSION(CactusBase_IOASCII_Write2D_c) int _i, _j; \ const cctk_type *_hdata = hdata[0]; \ const CCTK_REAL *_coord[2]; \ - const int _dic = hsize[0]; \ - const int _did = hsize[0] * (is_complex ? 2 : 1); \ + const int _di = is_complex ? 2 : 1; \ \ \ _coord[0] = (const CCTK_REAL *) hdata[1]; \ @@ -47,26 +46,28 @@ CCTK_FILEVERSION(CactusBase_IOASCII_Write2D_c) { \ if (_coord[0]) \ { \ - fprintf (file, fmt, (double) _coord[0][_i+_dic*_j], \ - (double) _coord[1][_i+_dic*_j], \ - (c_type) _hdata[_i+_did*_j]); \ + fprintf (file, fmt, (double) _coord[0][_i+hsize[0]*_j], \ + (double) _coord[1][_i+hsize[0]*_j], \ + (c_type) _hdata[_di*(_i+hsize[0]*_j)]); \ } \ else \ { \ - fprintf (file, fmt, _i, _j, (c_type) _hdata[_i+_did*_j]); \ + fprintf (file, fmt, _i, _j, \ + (c_type) _hdata[_di*(_i+hsize[0]*_j)]); \ } \ \ if (is_complex) \ { \ - fprintf (file, format[2], (c_type) _hdata[_i+1+_did*_j]); \ + fprintf (file, format[2], \ + (c_type) _hdata[_di*(_i+hsize[0]*_j)+1]); \ } \ fputc ('\n', file); \ } \ fputc ('\n', file); \ } \ - _coord[0] += _dic*_j; \ - _coord[1] += _dic*_j; \ - _hdata += _did*_j; \ + _coord[0] += hsize[0]*_j; \ + _coord[1] += hsize[0]*_j; \ + _hdata += _di*hsize[0]*_j; \ } |