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

[nlegoff at geodynamics.org]

Author: nlegoff
Date: 2008-07-30 07:09:30 -0700 (Wed, 30 Jul 2008)
New Revision: 12496

Modified:
   seismo/2D/SPECFEM2D/trunk/locate_source_moment_tensor.F90
Log:
fixed a truncated line.

Modified: seismo/2D/SPECFEM2D/trunk/locate_source_moment_tensor.F90
===================================================================
--- seismo/2D/SPECFEM2D/trunk/locate_source_moment_tensor.F90	2008-07-30 01:32:28 UTC (rev 12495)
+++ seismo/2D/SPECFEM2D/trunk/locate_source_moment_tensor.F90	2008-07-30 14:09:30 UTC (rev 12496)
@@ -45,7 +45,8 @@
 !----
 
   subroutine locate_source_moment_tensor(ibool,coord,nspec,npoin,xigll,zigll,x_source,z_source, &
-               ispec_selected_source,is_proc_source,nb_proc_source,nproc,myrank,xi_source,gamma_source,coorg,knods,ngnod,npgeo,ipass)
+               ispec_selected_source,is_proc_source,nb_proc_source,nproc,myrank, &
+               xi_source,gamma_source,coorg,knods,ngnod,npgeo,ipass)
 
   implicit none