[cig-commits] [commit] master: make the vtk output similar for coseismic and postseismic deformation. (7e45108)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Wed Dec 3 05:03:21 PST 2014
Repository : https://github.com/geodynamics/relax
On branch : master
Link : https://github.com/geodynamics/relax/compare/51ebb25cbebcdfe57bbf2a849e241709fc823937...7e45108163c32825a865acfcd3c8fa5541eefdcf
>---------------------------------------------------------------
commit 7e45108163c32825a865acfcd3c8fa5541eefdcf
Author: Sylvain Barbot <sbarbot at ntu.edu.sg>
Date: Wed Dec 3 21:02:50 2014 +0800
make the vtk output similar for coseismic and postseismic deformation.
>---------------------------------------------------------------
7e45108163c32825a865acfcd3c8fa5541eefdcf
src/relax.f90 | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/src/relax.f90 b/src/relax.f90
index f9d5bd4..4b80fc7 100644
--- a/src/relax.f90
+++ b/src/relax.f90
@@ -386,7 +386,7 @@ PROGRAM relax
title="coseismic displacement vector field"//char(0)
name="displacement"//char(0)
CALL exportvtk_vectors_legacy(u1,u2,u3,in%sx1,in%sx2,in%sx3/2,in%dx1,in%dx2,in%dx3, &
- 4,4,4,filename,title,name)
+ 4,4,8,filename,title,name)
!CALL exportvtk_vectors_slice(u1,u2,u3,in%sx1,in%sx2,in%sx3/2,in%dx1,in%dx2,in%dx3,in%oz,8,8,filename)
END IF
IF (in%isoutputvtkrelax) THEN
@@ -394,7 +394,7 @@ PROGRAM relax
title="postseismic displacement vector field"//char(0)
name="displacement"//char(0)
CALL exportvtk_vectors_legacy(u1r,u2r,u3r,in%sx1,in%sx2,in%sx3/2,in%dx1,in%dx2,in%dx3, &
- 4,4,4,filename,title,name)
+ 4,4,8,filename,title,name)
END IF
#endif
IF (ALLOCATED(in%ptsname)) THEN
More information about the CIG-COMMITS
mailing list