[cig-commits] [commit] devel: fixed two comments (e2e4c65)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Fri Dec 12 09:33:01 PST 2014


Repository : https://github.com/geodynamics/specfem2d

On branch  : devel
Link       : https://github.com/geodynamics/specfem2d/compare/ac615429b347b44208cf08988e81863e4b7887e2...b9ebe7067d5477624920c59e5a3eae08d3a427d1

>---------------------------------------------------------------

commit e2e4c65f68a46e83a4818ffa4a432a8c9f37d009
Author: rmodrak <rmodrak at princeton.edu>
Date:   Fri Dec 12 11:02:45 2014 -0500

    fixed two comments


>---------------------------------------------------------------

e2e4c65f68a46e83a4818ffa4a432a8c9f37d009
 src/specfem2D/specfem2D.F90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/specfem2D/specfem2D.F90 b/src/specfem2D/specfem2D.F90
index 4fd96ae..3fb4789 100644
--- a/src/specfem2D/specfem2D.F90
+++ b/src/specfem2D/specfem2D.F90
@@ -2885,7 +2885,7 @@
   endif
 
 !
-!----- Files where absorbing signal are saved during forward wavefield calculation
+!----- Read last frame for forward wavefield reconstruction
 !
 
   if( ((SAVE_FORWARD .and. SIMULATION_TYPE ==1) .or. SIMULATION_TYPE == 3) .and. anyabs &
@@ -2909,7 +2909,7 @@
 
 
 !
-!----- Read last frame for backward wavefield calculation
+!----- Allocate sensitivity kernel arrays
 !
 
   if(SIMULATION_TYPE == 3) then



More information about the CIG-COMMITS mailing list