diff options
author | schnetter <schnetter@ef6f4158-a8ee-47d1-ba14-cb73256398e0> | 2010-05-13 15:02:44 +0000 |
---|---|---|
committer | schnetter <schnetter@ef6f4158-a8ee-47d1-ba14-cb73256398e0> | 2010-05-13 15:02:44 +0000 |
commit | 047e56cb87f7db61217cbbd29ca23a5f37a806a6 (patch) | |
tree | c6cd4e1bc7570657cdd0c1a0766c53302d2c1563 | |
parent | d599a5abfa9eac2ad39f56567b6f18104b1d17d6 (diff) |
Correct the connectivity in the polygonal data of the VTK output,
which right now is wrong across phi=0.
git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/QuasiLocalMeasures/trunk@14 ef6f4158-a8ee-47d1-ba14-cb73256398e0
-rw-r--r-- | src/qlm_output_vtk.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/qlm_output_vtk.F90 b/src/qlm_output_vtk.F90 index 8a1f81f..f1fe9a9 100644 --- a/src/qlm_output_vtk.F90 +++ b/src/qlm_output_vtk.F90 @@ -48,7 +48,7 @@ subroutine qlm_outputvtk(CCTK_ARGUMENTS,nhor,file_name,unit_nr) do i=0, nph-2 write(unit_nr,'(I1,4(I6))') 4, j*nph+i, (j+1)*nph+i, (j+1)*nph+i+1, j*nph+i+1 end do - write(unit_nr,'(I1,4(I6))') 4, j*nph+nph-1, (j+1)*nph+nph-1, (j+1)*nph+1, j*nph+1 + write(unit_nr,'(I1,4(I6))') 4, j*nph+nph-1, (j+1)*nph+nph-1, (j+1)*nph, j*nph end do write(unit_nr,'(A)') '' |