[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