[cig-commits] [commit] devel: improved a variable declaration (8e77f34)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Wed May 7 16:12:12 PDT 2014


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

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d_globe/compare/7cbcde805f7d958d26f78c434c3b9f0fe3f4a350...d2496e9d1ee801b35cabc43ebeea15747190d6bc

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

commit 8e77f34f79d240aa5dc7def1a3cb401491ce6948
Author: Dimitri Komatitsch <komatitsch at lma.cnrs-mrs.fr>
Date:   Thu May 8 01:11:39 2014 +0200

    improved a variable declaration


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

8e77f34f79d240aa5dc7def1a3cb401491ce6948
 src/shared/make_ellipticity.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/shared/make_ellipticity.f90 b/src/shared/make_ellipticity.f90
index 4b9aa51..5049139 100644
--- a/src/shared/make_ellipticity.f90
+++ b/src/shared/make_ellipticity.f90
@@ -30,7 +30,7 @@
 ! creates a spline for the ellipticity profile in PREM
 ! radius and density are non-dimensional
 
-  use constants,only: NR,TWO_PI,PI,GRAV,RHOAV,HOURS_PER_DAY,SECONDS_PER_HOUR
+  use constants,only: NR,TWO_PI,PI,GRAV,RHOAV,HOURS_PER_DAY,SECONDS_PER_HOUR,R_UNIT_SPHERE
 
   implicit none
 



More information about the CIG-COMMITS mailing list