[cig-commits] r21894 - seismo/3D/SPECFEM3D/trunk/src/specfem3D

[dkomati1 at geodynamics.org]

Author: dkomati1
Date: 2013-04-18 09:27:31 -0700 (Thu, 18 Apr 2013)
New Revision: 21894

Modified:
   seismo/3D/SPECFEM3D/trunk/src/specfem3D/locate_receivers.f90
Log:
changed a comment


Modified: seismo/3D/SPECFEM3D/trunk/src/specfem3D/locate_receivers.f90
===================================================================
--- seismo/3D/SPECFEM3D/trunk/src/specfem3D/locate_receivers.f90	2013-04-18 16:06:47 UTC (rev 21893)
+++ seismo/3D/SPECFEM3D/trunk/src/specfem3D/locate_receivers.f90	2013-04-18 16:27:31 UTC (rev 21894)
@@ -456,7 +456,7 @@
               do j = jmin_temp,jmax_temp
                 do i = imin_temp,imax_temp
                   iglob = ibool(i,j,k,ispec)
-                  ! for comparison purpose, we don't have to do "dsqrt", which is expensive
+                  ! for comparison purpose, we do not have to do "dsqrt", which is expensive
                   dist = ((x_target(irec)-dble(xstore(iglob)))**2 &
                         + (y_target(irec)-dble(ystore(iglob)))**2 &
                         + (z_target(irec)-dble(zstore(iglob)))**2)