[cig-commits] [commit] devel, master: Fixed a small bug with CEM compilation. (0aa2df0)

[cig_noreply at geodynamics.org]

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

On branches: devel,master
Link       : https://github.com/geodynamics/specfem3d_globe/compare/bc58e579b3b0838a0968725a076f5904845437ca...be63f20cbb6f462104e949894dbe205d2398cd7f

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

commit 0aa2df069164153a157cf61edc5ea1bce1e70644
Author: Michael Afanasiev <michael.afanasiev at erdw.ethz.ch>
Date:   Tue Sep 16 14:38:49 2014 +0200

    Fixed a small bug with CEM compilation.


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

0aa2df069164153a157cf61edc5ea1bce1e70644
 src/meshfem3D/get_model.F90        | 2 +-
 src/meshfem3D/meshfem3D_models.F90 | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/meshfem3D/get_model.F90 b/src/meshfem3D/get_model.F90
index 583769a..e07a7fb 100644
--- a/src/meshfem3D/get_model.F90
+++ b/src/meshfem3D/get_model.F90
@@ -157,7 +157,7 @@
                               c11,c12,c13,c14,c15,c16,c22,c23,c24,c25,c26,&
                               c33,c34,c35,c36,c44,c45,c46,c55,c56,c66 &
 #if defined (CEM)
-                              ,ispec,i,j,k
+                              ,ispec,i,j,k &
 #endif
                               )
 
diff --git a/src/meshfem3D/meshfem3D_models.F90 b/src/meshfem3D/meshfem3D_models.F90
index d4d28d5..a50595f 100644
--- a/src/meshfem3D/meshfem3D_models.F90
+++ b/src/meshfem3D/meshfem3D_models.F90
@@ -351,7 +351,7 @@
                               c11,c12,c13,c14,c15,c16,c22,c23,c24,c25,c26,&
                               c33,c34,c35,c36,c44,c45,c46,c55,c56,c66 &
 #if defined (CEM)
-                              ,ispec,i,j,k
+                              ,ispec,i,j,k &
 #endif
                               )