[cig-commits] commit: fix output of slip models in .vtp files (slip was ommitted).

[Mercurial]

changeset:   129:be452d6152f3
tag:         tip
user:        Sylvain Barbot <sbarbot at caltech.edu>
date:        Mon Jun 18 11:47:07 2012 -0700
files:       examples/mojave/landers.sh src/export.f90
description:
fix output of slip models in .vtp files (slip was ommitted).


diff -r 7ef68ed8255c -r be452d6152f3 examples/mojave/landers.sh
--- a/examples/mojave/landers.sh	Mon Jun 18 11:12:01 2012 -0700
+++ b/examples/mojave/landers.sh	Mon Jun 18 11:47:07 2012 -0700
@@ -14,7 +14,7 @@ if [ ! -e $WDIR ]; then
 	mkdir $WDIR
 fi
 
-time relax <<EOF --no-vtk-output --no-proj-output \
+time ../../build/relax <<EOF --no-vtk-output --no-proj-output \
 	--no-stress-output $* | tee $WDIR/in.param
 # grid size (sx1,sx2,sx3)
 512 512 512
diff -r 7ef68ed8255c -r be452d6152f3 src/export.f90
--- a/src/export.f90	Mon Jun 18 11:12:01 2012 -0700
+++ b/src/export.f90	Mon Jun 18 11:47:07 2012 -0700
@@ -1606,9 +1606,7 @@ END SUBROUTINE exportcreep_vtk
                                (s(3)*cos(r)+d(3)*sin(r))*slip
 
        WRITE (15,'("        </DataArray>")')
-       WRITE (15,'("      </CellData>")')
 
-       WRITE (15,'("      <CellData Normals=",a,"opening",a,">")'), q,q
        WRITE (15,'("        <DataArray type=",a,"Float32",a, &
                                & " Name=",a,"opening",a, &
                                & " NumberOfComponents=",a,"3",a, &