[cig-commits] r22396 - seismo/3D/SPECFEM3D_GLOBE/trunk/src/meshfem3D

[elliott.sales.de.andrade at geodynamics.org]

Author: elliott.sales.de.andrade
Date: 2013-06-20 15:05:04 -0700 (Thu, 20 Jun 2013)
New Revision: 22396

Modified:
   seismo/3D/SPECFEM3D_GLOBE/trunk/src/meshfem3D/model_crustmaps.f90
Log:
Remove two unused variables.

Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/src/meshfem3D/model_crustmaps.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/src/meshfem3D/model_crustmaps.f90	2013-06-20 22:04:52 UTC (rev 22395)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/src/meshfem3D/model_crustmaps.f90	2013-06-20 22:05:04 UTC (rev 22396)
@@ -147,7 +147,7 @@
   type (model_crustmaps_variables) GC_V
   !model_crustmaps_variables
 
-  integer ila,iln,i,l
+  integer i,l
 
   do i=3,7
     l = i - 2