[cig-commits] [commit] devel: Buildbot ran the code beautifier. (a8eb229)

[cig_noreply at geodynamics.org]

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

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d/compare/4ded73c0d0a43c32701e72d78f4473b6db8abbe9...a8eb2299bd1512405f740ac68b5e364f9c967f43

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

commit a8eb2299bd1512405f740ac68b5e364f9c967f43
Author: buildbot <buildbot at seismobot.Princeton.EDU>
Date:   Fri Jan 23 03:25:53 2015 -0500

    Buildbot ran the code beautifier.


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

a8eb2299bd1512405f740ac68b5e364f9c967f43
 src/generate_databases/pml_set_local_dampingcoeff.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/generate_databases/pml_set_local_dampingcoeff.f90 b/src/generate_databases/pml_set_local_dampingcoeff.f90
index e2ae549..e2d1fd6 100644
--- a/src/generate_databases/pml_set_local_dampingcoeff.f90
+++ b/src/generate_databases/pml_set_local_dampingcoeff.f90
@@ -1545,7 +1545,7 @@ subroutine pml_set_local_dampingcoeff(myrank,xstore,ystore,zstore)
                 stop 'error in seperation of alpha_x, alpha_y, alpha_z in case alpha_x > alpha_z .and. alpha_z > alpha_y'
               endif
 
-            elseif (alpha_y > alpha_z .and. alpha_z > alpha_x) then
+            else if (alpha_y > alpha_z .and. alpha_z > alpha_x) then
               call seperate_three_sequential_changeable_value(alpha_y,alpha_z,alpha_x,ALPHA_MAX_PML_y)
 
               if(abs(alpha_x - alpha_y) < const_for_tune_pml_damping_profile * ALPHA_MAX_PML_y .or. &