[cig-commits] r8505 - seismo/2D/SPECFEM2D/trunk
walter at geodynamics.org
walter at geodynamics.org
Fri Dec 7 15:51:42 PST 2007
Author: walter
Date: 2007-12-07 15:51:41 -0800 (Fri, 07 Dec 2007)
New Revision: 8505
Modified:
seismo/2D/SPECFEM2D/trunk/plotpost.f90
Log:
changed "Max norme" to "Max norm"
Modified: seismo/2D/SPECFEM2D/trunk/plotpost.f90
===================================================================
--- seismo/2D/SPECFEM2D/trunk/plotpost.f90 2007-02-18 21:26:11 UTC (rev 8504)
+++ seismo/2D/SPECFEM2D/trunk/plotpost.f90 2007-12-07 23:51:41 UTC (rev 8505)
@@ -1281,7 +1281,7 @@
! recherche de la valeur maximum de la norme du deplacement
dispmax = maxval(sqrt(displ(1,:)**2 + displ(2,:)**2))
- write(IOUT,*) 'Max norme = ',dispmax
+ write(IOUT,*) 'Max norm = ',dispmax
! hauteur des numeros de domaine en CM
height = 0.25d0
More information about the cig-commits
mailing list