[cig-commits] r13924 - in seismo/3D/SPECFEM3D_GLOBE/trunk: . version41_beta/src

dkomati1 at geodynamics.org dkomati1 at geodynamics.org
Thu Jan 22 15:11:57 PST 2009


Author: dkomati1
Date: 2009-01-22 15:11:57 -0800 (Thu, 22 Jan 2009)
New Revision: 13924

Modified:
   seismo/3D/SPECFEM3D_GLOBE/trunk/model_ak135.f90
   seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/src/model_ak135.f90
Log:
removed an old comment from model ak135


Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_ak135.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_ak135.f90	2009-01-22 22:27:32 UTC (rev 13923)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_ak135.f90	2009-01-22 23:11:57 UTC (rev 13924)
@@ -66,10 +66,6 @@
 
   double precision r,frac,scaleval
 
-!! DK DK UGLY implementation of model ak135 below and its radii in
-!! DK DK UGLY subroutine read_parameter_file.f90 has not been thoroughly
-!! DK DK UGLY checked yet
-
 ! compute real physical radius in meters
   r = x * R_EARTH
 

Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/src/model_ak135.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/src/model_ak135.f90	2009-01-22 22:27:32 UTC (rev 13923)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/version41_beta/src/model_ak135.f90	2009-01-22 23:11:57 UTC (rev 13924)
@@ -66,10 +66,6 @@
 
   double precision r,frac,scaleval
 
-!! DK DK UGLY implementation of model ak135 below and its radii in
-!! DK DK UGLY subroutine read_parameter_file.f90 has not been thoroughly
-!! DK DK UGLY checked yet
-
 ! compute real physical radius in meters
   r = x * R_EARTH
 



More information about the CIG-COMMITS mailing list