[cig-commits] [commit] devel: improved a stop statement (16bebb7)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Tue Jul 1 09:37:22 PDT 2014


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

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d/compare/fbd64d2f96b11829239d15d4d124dfb13eaf88be...8bb89bad6a40cbe495495c3fdaddbb8ff3374bd7

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

commit 16bebb77ba8986f3536cbb259e41e6de346c4fe7
Author: Dimitri Komatitsch <komatitsch at lma.cnrs-mrs.fr>
Date:   Tue Jul 1 18:34:27 2014 +0200

    improved a stop statement


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

16bebb77ba8986f3536cbb259e41e6de346c4fe7
 src/specfem3D/initialize_simulation.f90 | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/specfem3D/initialize_simulation.f90 b/src/specfem3D/initialize_simulation.f90
index 5436676..5aa3217 100644
--- a/src/specfem3D/initialize_simulation.f90
+++ b/src/specfem3D/initialize_simulation.f90
@@ -61,8 +61,7 @@
 !! DK DK added this for now (March 2013) because CPML is not yet implemented for fluid-solid coupling;
 !! DK DK we will soon add it (in a month or so)
   if(PML_CONDITIONS .and. (SAVE_FORWARD .or. SIMULATION_TYPE==3)) &
-    stop 'It is still under test for adjoint simulation'
-
+    stop 'PML_CONDITIONS is still under test for adjoint simulation'
 
   ! GPU_MODE is in par_file
   call read_gpu_mode(GPU_MODE,GRAVITY)



More information about the CIG-COMMITS mailing list