[cig-commits] r16451 - seismo/3D/SPECFEM3D_GLOBE/trunk

danielpeter at geodynamics.org danielpeter at geodynamics.org
Wed Mar 24 12:02:13 PDT 2010


Author: danielpeter
Date: 2010-03-24 12:02:13 -0700 (Wed, 24 Mar 2010)
New Revision: 16451

Modified:
   seismo/3D/SPECFEM3D_GLOBE/trunk/configure
   seismo/3D/SPECFEM3D_GLOBE/trunk/configure.ac
   seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_GMT_global.f90
   seismo/3D/SPECFEM3D_GLOBE/trunk/write_seismograms.f90
Log:
updating few version number in SAC headers; slightly modified create_movie_GMT_global.f90

Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/configure
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/configure	2010-03-24 14:53:25 UTC (rev 16450)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/configure	2010-03-24 19:02:13 UTC (rev 16451)
@@ -1,6 +1,6 @@
 #! /bin/sh
 # Guess values for system-dependent variables and create Makefiles.
-# Generated by GNU Autoconf 2.61 for Specfem3D Globe 5.0.0.
+# Generated by GNU Autoconf 2.61 for Specfem3D Globe 5.0.1.
 #
 # Report bugs to <jtromp AT princeton.edu>.
 #
@@ -574,8 +574,8 @@
 # Identity of this package.
 PACKAGE_NAME='Specfem3D Globe'
 PACKAGE_TARNAME='Specfem3DGlobe'
-PACKAGE_VERSION='5.0.0'
-PACKAGE_STRING='Specfem3D Globe 5.0.0'
+PACKAGE_VERSION='5.0.1'
+PACKAGE_STRING='Specfem3D Globe 5.0.1'
 PACKAGE_BUGREPORT='jtromp AT princeton.edu'
 
 ac_unique_file="specfem3D.f90"
@@ -1156,7 +1156,7 @@
   # Omit some internal or obsolete options to make the list less imposing.
   # This message is too long to be a string in the A/UX 3.1 sh.
   cat <<_ACEOF
-\`configure' configures Specfem3D Globe 5.0.0 to adapt to many kinds of systems.
+\`configure' configures Specfem3D Globe 5.0.1 to adapt to many kinds of systems.
 
 Usage: $0 [OPTION]... [VAR=VALUE]...
 
@@ -1217,7 +1217,7 @@
 
 if test -n "$ac_init_help"; then
   case $ac_init_help in
-     short | recursive ) echo "Configuration of Specfem3D Globe 5.0.0:";;
+     short | recursive ) echo "Configuration of Specfem3D Globe 5.0.1:";;
    esac
   cat <<\_ACEOF
 
@@ -1311,7 +1311,7 @@
 test -n "$ac_init_help" && exit $ac_status
 if $ac_init_version; then
   cat <<\_ACEOF
-Specfem3D Globe configure 5.0.0
+Specfem3D Globe configure 5.0.1
 generated by GNU Autoconf 2.61
 
 Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001,
@@ -1325,7 +1325,7 @@
 This file contains any messages produced by compilers while
 running configure, to aid debugging if configure makes a mistake.
 
-It was created by Specfem3D Globe $as_me 5.0.0, which was
+It was created by Specfem3D Globe $as_me 5.0.1, which was
 generated by GNU Autoconf 2.61.  Invocation command line was
 
   $ $0 $@
@@ -5210,7 +5210,7 @@
 # report actual input values of CONFIG_FILES etc. instead of their
 # values after options handling.
 ac_log="
-This file was extended by Specfem3D Globe $as_me 5.0.0, which was
+This file was extended by Specfem3D Globe $as_me 5.0.1, which was
 generated by GNU Autoconf 2.61.  Invocation command line was
 
   CONFIG_FILES    = $CONFIG_FILES
@@ -5259,7 +5259,7 @@
 _ACEOF
 cat >>$CONFIG_STATUS <<_ACEOF
 ac_cs_version="\\
-Specfem3D Globe config.status 5.0.0
+Specfem3D Globe config.status 5.0.1
 configured by $0, generated by GNU Autoconf 2.61,
   with options \\"`echo "$ac_configure_args" | sed 's/^ //; s/[\\""\`\$]/\\\\&/g'`\\"
 

Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/configure.ac
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/configure.ac	2010-03-24 14:53:25 UTC (rev 16450)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/configure.ac	2010-03-24 19:02:13 UTC (rev 16451)
@@ -10,7 +10,7 @@
 
 
 AC_PREREQ(2.61)
-AC_INIT([Specfem3D Globe], [5.0.0], [jtromp AT princeton.edu], [Specfem3DGlobe])
+AC_INIT([Specfem3D Globe], [5.0.1], [jtromp AT princeton.edu], [Specfem3DGlobe])
 AC_CONFIG_SRCDIR([specfem3D.f90])
 AC_CONFIG_HEADER([config.h])
 AC_CONFIG_MACRO_DIR([m4])

Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_GMT_global.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_GMT_global.f90	2010-03-24 14:53:25 UTC (rev 16450)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_GMT_global.f90	2010-03-24 19:02:13 UTC (rev 16451)
@@ -56,8 +56,8 @@
 
   ! muting source region
   logical, parameter :: MUTE_SOURCE = .true.
-  real(kind=CUSTOM_REAL) :: RADIUS_TO_MUTE = 10.0    ! start radius in degrees  
-  real(kind=CUSTOM_REAL) :: STARTTIME_TO_MUTE = 20.0 ! factor times hdur_movie
+  real(kind=CUSTOM_REAL) :: RADIUS_TO_MUTE = 1.0    ! start radius in degrees  
+  real(kind=CUSTOM_REAL) :: STARTTIME_TO_MUTE = 2.0 ! factor times hdur_movie
 
   ! normalizes output values
   logical, parameter :: NORMALIZE_VALUES = .true.
@@ -393,23 +393,23 @@
             ! approximate wavefront travel distance in degrees (~3.5 km/s wave speed for surface waves)
             mute_factor = 3.5 * (it-1)*DT / 6371. * 180./PI
             
-            ! approximate distance to source
+            ! approximate distance to source (in degrees)
             do while ( mute_factor > 360. )
               mute_factor = mute_factor - 360.
             enddo
             if( mute_factor > 180. ) mute_factor = 360. - mute_factor
 
-            ! limit size around source
-            if( mute_factor < 10. ) then
-              mute_factor = 0.0
-            endif
+            ! limit size around source (in degrees)
+            !if( mute_factor < 10. ) then
+            !  mute_factor = 0.0
+            !endif
             if( mute_factor > 80. ) then
               mute_factor = 80.0
             endif
             
-            print*,'muting radius: ',0.5 * mute_factor
+            print*,'muting radius: ',0.7 * mute_factor
                         
-            RADIUS_TO_MUTE = 0.5 * mute_factor * PI/180.
+            RADIUS_TO_MUTE = 0.7 * mute_factor * PI/180.
             
           else
             ! mute_factor used at the beginning for scaling displacement values

Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/write_seismograms.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/write_seismograms.f90	2010-03-24 14:53:25 UTC (rev 16450)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/write_seismograms.f90	2010-03-24 19:02:13 UTC (rev 16451)
@@ -693,7 +693,7 @@
       ! indicates SEM synthetics
       ! by Ebru
       KUSER0 = 'SEM'          !  A8
-      KUSER1 = 'v5.0.0 '
+      KUSER1 = 'v5.0.1'
       KUSER2 = 'Tiger' ! aka. awesome (princeton) tiger version :)
 
       !KUSER0 = 'PDE_LAT_'          !  A8



More information about the CIG-COMMITS mailing list