[cig-commits] r17884 - seismo/2D/SPECFEM2D/trunk

[dkomati1 at geodynamics.org]

Author: dkomati1
Date: 2011-02-16 07:53:48 -0800 (Wed, 16 Feb 2011)
New Revision: 17884

Modified:
   seismo/2D/SPECFEM2D/trunk/part_unstruct.F90
Log:
cut a print statement that was too long


Modified: seismo/2D/SPECFEM2D/trunk/part_unstruct.F90
===================================================================
--- seismo/2D/SPECFEM2D/trunk/part_unstruct.F90	2011-02-16 15:47:09 UTC (rev 17883)
+++ seismo/2D/SPECFEM2D/trunk/part_unstruct.F90	2011-02-16 15:53:48 UTC (rev 17884)
@@ -303,8 +303,9 @@
     read(994,*) abs_surface(1,i), abs_surface(2,i), abs_surface(3,i), abs_surface(4,i)
     if (abs_surface(2,i) /= 2) then
       print *,'The input format is currently limited: only two nodes per element can be listed.'
-      print *,'If one of your elements has more than one edge along a given absorbing contour (e.g., if that contour has a corner)'
-      print *,'then list it twice, putting the first edge on the first line and the second edge on the second line.'
+      print *,'If one of your elements has more than one edge along a given absorbing contour'
+      print *,'(e.g., if that contour has a corner) then list it twice,'
+      print *,'putting the first edge on the first line and the second edge on the second line.'
       print *,'if one of your elements has a single point along the absording contour rather than a full edge, do NOT list it'
       print *,'(it would have no weight in the contour integral anyway because it would consist of a single point).'
       print *,'If you are using 9-node elements, list only the first and last points of the edge and not the intermediate point'