[cig-commits] r16340 - in seismo/3D/SPECFEM3D_GLOBE/trunk: . UTILS UTILS/Cluster UTILS/Cluster/estimate_best_values_runs UTILS/Cluster/sge UTILS/Profiles UTILS/Visualization/opendx_AVS UTILS/s362ani
danielpeter at geodynamics.org
danielpeter at geodynamics.org
Thu Feb 25 07:04:41 PST 2010
Author: danielpeter
Date: 2010-02-25 07:04:32 -0800 (Thu, 25 Feb 2010)
New Revision: 16340
Modified:
seismo/3D/SPECFEM3D_GLOBE/trunk/Makefile.in
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/estimate_best_values_runs/estimate_best_values_runs.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/sge/go_mesher_sge.bash
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/sge/go_solver_sge.bash
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/test_cache_size.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Profiles/write_profile.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/constants_topo.h
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_DX_to_AVS_slices.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_DX_to_AVS_surface.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_avs2dx_quads.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_lat_long_epicenter_OpenDX.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_lat_long_main_cities_OpenDX.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_palette_GMT_OpenDX.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_topo_bathy_to_OpenDX.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/longlatdepth2xyz.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/permute_cubit_2_opendx.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/extract_all_seismos_from_large_file.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/filter_station_list.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_NS.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_equator.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_one_fourth.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/s362ani/program_test_s362ani.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/add_missing_nodes.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_410_650.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_cmb.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_icb.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_central_cube.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_scalar.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_vector.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/auto_ner.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/broadcast_compute_parameters.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/calc_jacobian.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_1D.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_2D.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_corners_chunks.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_faces_chunks.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/check_simulation_stability.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/combine_AVS_DX.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/combine_surf_data.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/combine_vol_data.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/comp_source_spectrum.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/comp_source_time_function.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_add_sources.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_arrays_source.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_boundary_kernel.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_coordinates_grid.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_coupling.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_element_properties.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_crust_mantle.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_crust_mantle_Dev.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_inner_core.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_inner_core_Dev.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_outer_core.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_outer_core_Dev.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_kernels.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_seismograms.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_stacey_crust_mantle.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/compute_stacey_outer_core.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/configure
seismo/3D/SPECFEM3D_GLOBE/trunk/constants.h.in
seismo/3D/SPECFEM3D_GLOBE/trunk/convolve_source_timefunction.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/count_number_of_sources.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_central_cube.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_central_cube_buffers.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_chunk_buffers.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_doubling_elements.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_header_file.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_mass_matrices.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_AVS_DX.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_GMT_global.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_name_database.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_regions_mesh.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_regular_elements.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/create_serial_name_database.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/define_derivation_matrices.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/define_superbrick.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/euler_angles.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/exit_mpi.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_1D_buffers.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_cutplanes_eta.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_cutplanes_xi.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_absorb.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_attenuation.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_backazimuth.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_cmt.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_ellipticity.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_event_info.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_global.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_jacobian_boundaries.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_jacobian_discontinuities.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_model.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_model_parameters.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_shape2D.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_shape3D.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/get_value_parameters.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/hex_nodes.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/initialize_simulation.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/intgrl.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/lagrange_poly.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/lgndr.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/locate_receivers.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/locate_sources.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/make_ellipticity.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/make_gravity.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/memory_eval.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/meshfem3D.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/meshfem3D_models.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_1066a.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_1dref.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_ak135.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_aniso_inner_core.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_aniso_mantle.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_atten3D_QRFSI12.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_attenuation.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_crust.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_crustmaps.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_eucrust.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_gll.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_heterogen_mantle.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_iasp91.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_jp1d.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_jp3d.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_ppm.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_prem.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_s20rts.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_s362ani.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_sea1d.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_sea99_s.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/model_topo_bathy.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/moho_stretching.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/param_reader.c
seismo/3D/SPECFEM3D_GLOBE/trunk/precision.h.in
seismo/3D/SPECFEM3D_GLOBE/trunk/prepare_timerun.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/read_arrays_buffers_solver.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/read_arrays_solver.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/read_compute_parameters.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/read_forward_arrays.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/read_mesh_databases.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/read_parameter_file.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/read_value_parameters.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/recompute_jacobian.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/reduce.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/rthetaphi_xyz.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/save_arrays_solver.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/save_forward_arrays.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/save_header_file.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/save_kernels.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/setup_sources_receivers.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/sort_array_coordinates.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/specfem3D.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/spline_routines.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/stretching_function.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_chunks_data.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_data.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_faces_data.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_surface_data.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/write_c_binary.c
seismo/3D/SPECFEM3D_GLOBE/trunk/write_movie_surface.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/write_movie_volume.f90
seismo/3D/SPECFEM3D_GLOBE/trunk/write_seismograms.f90
Log:
updated copyright and date information in the source file headers
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/Makefile.in
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/Makefile.in 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/Makefile.in 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
# --------------------------------------------------
#
# Main authors: Dimitri Komatitsch and Jeroen Tromp
-# Seismological Laboratory, California Institute of Technology, USA
+# Seismological Laboratory, California Institute of Technology / Princeton University, USA
# and University of Pau / CNRS / INRIA, France
-# (c) California Institute of Technology and University of Pau / CNRS / INRIA
-# February 2008
+# (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+# March 2010
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/estimate_best_values_runs/estimate_best_values_runs.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/estimate_best_values_runs/estimate_best_values_runs.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/estimate_best_values_runs/estimate_best_values_runs.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/sge/go_mesher_sge.bash
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/sge/go_mesher_sge.bash 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/sge/go_mesher_sge.bash 2010-02-25 15:04:32 UTC (rev 16340)
@@ -44,11 +44,6 @@
cp -p *.h OUTPUT_FILES/src/
-# obtain job information
-cat $PBS_NODEFILE > OUTPUT_FILES/compute_nodes
-echo "$PBS_JOBID" > OUTPUT_FILES/jobid
-
-
echo starting run in current directory $PWD
echo " "
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/sge/go_solver_sge.bash
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/sge/go_solver_sge.bash 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/sge/go_solver_sge.bash 2010-02-25 15:04:32 UTC (rev 16340)
@@ -44,11 +44,6 @@
cp -p *.h OUTPUT_FILES/src/
-# obtain job information
-cat $PBS_NODEFILE > OUTPUT_FILES/compute_nodes
-echo "$PBS_JOBID" > OUTPUT_FILES/jobid
-
-
echo starting run in current directory $PWD
echo " "
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/test_cache_size.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/test_cache_size.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Cluster/test_cache_size.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau, France
-! (c) California Institute of Technology and University of Pau, October 2007
+! (c) California Institute of Technology / Princeton University and University of Pau, October 2007
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Profiles/write_profile.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Profiles/write_profile.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Profiles/write_profile.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/constants_topo.h
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/constants_topo.h 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/constants_topo.h 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_DX_to_AVS_slices.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_DX_to_AVS_slices.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_DX_to_AVS_slices.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_DX_to_AVS_surface.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_DX_to_AVS_surface.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_DX_to_AVS_surface.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_avs2dx_quads.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_avs2dx_quads.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_avs2dx_quads.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_lat_long_epicenter_OpenDX.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_lat_long_epicenter_OpenDX.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_lat_long_epicenter_OpenDX.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_lat_long_main_cities_OpenDX.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_lat_long_main_cities_OpenDX.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_lat_long_main_cities_OpenDX.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_palette_GMT_OpenDX.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_palette_GMT_OpenDX.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_palette_GMT_OpenDX.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_topo_bathy_to_OpenDX.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_topo_bathy_to_OpenDX.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/convert_topo_bathy_to_OpenDX.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/longlatdepth2xyz.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/longlatdepth2xyz.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/longlatdepth2xyz.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/permute_cubit_2_opendx.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/permute_cubit_2_opendx.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/Visualization/opendx_AVS/permute_cubit_2_opendx.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/extract_all_seismos_from_large_file.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/extract_all_seismos_from_large_file.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/extract_all_seismos_from_large_file.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/filter_station_list.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/filter_station_list.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/filter_station_list.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_NS.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_NS.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_NS.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_equator.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_equator.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_equator.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_one_fourth.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_one_fourth.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/generate_station_list_one_fourth.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/s362ani/program_test_s362ani.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/s362ani/program_test_s362ani.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/UTILS/s362ani/program_test_s362ani.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/add_missing_nodes.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/add_missing_nodes.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/add_missing_nodes.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_410_650.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_410_650.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_410_650.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_cmb.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_cmb.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_cmb.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_icb.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_icb.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/add_topography_icb.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_central_cube.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_central_cube.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_central_cube.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_scalar.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_scalar.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_scalar.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_vector.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_vector.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/assemble_MPI_vector.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/auto_ner.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/auto_ner.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/auto_ner.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/broadcast_compute_parameters.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/broadcast_compute_parameters.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/broadcast_compute_parameters.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/calc_jacobian.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/calc_jacobian.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/calc_jacobian.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_1D.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_1D.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_1D.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_2D.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_2D.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_2D.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_corners_chunks.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_corners_chunks.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_corners_chunks.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_faces_chunks.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_faces_chunks.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/check_buffers_faces_chunks.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/check_simulation_stability.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/check_simulation_stability.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/check_simulation_stability.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/combine_AVS_DX.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/combine_AVS_DX.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/combine_AVS_DX.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/combine_surf_data.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/combine_surf_data.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/combine_surf_data.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/combine_vol_data.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/combine_vol_data.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/combine_vol_data.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/comp_source_spectrum.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/comp_source_spectrum.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/comp_source_spectrum.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/comp_source_time_function.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/comp_source_time_function.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/comp_source_time_function.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_add_sources.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_add_sources.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_add_sources.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_arrays_source.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_arrays_source.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_arrays_source.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_boundary_kernel.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_boundary_kernel.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_boundary_kernel.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_coordinates_grid.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_coordinates_grid.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_coordinates_grid.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_coupling.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_coupling.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_coupling.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_element_properties.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_element_properties.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_element_properties.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
@@ -30,7 +30,7 @@
xstore,ystore,zstore,nspec,myrank,ABSORBING_CONDITIONS, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME, &
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
- xelm,yelm,zelm,shape3D,dershape3D,rmin,rmax,rhostore,dvpstore, &
+ xelm,yelm,zelm,shape3D,rmin,rmax,rhostore,dvpstore, &
kappavstore,kappahstore,muvstore,muhstore,eta_anisostore, &
xixstore,xiystore,xizstore,etaxstore,etaystore,etazstore, &
gammaxstore,gammaystore,gammazstore,nspec_actually, &
@@ -65,7 +65,6 @@
! 3D shape functions and their derivatives
double precision, dimension(NGNOD,NGLLX,NGLLY,NGLLZ) :: shape3D
- double precision, dimension(NDIM,NGNOD,NGLLX,NGLLY,NGLLZ) :: dershape3D
double precision, dimension(NGNOD) :: xelm,yelm,zelm
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_crust_mantle.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_crust_mantle.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_crust_mantle.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_crust_mantle_Dev.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_crust_mantle_Dev.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_crust_mantle_Dev.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_inner_core.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_inner_core.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_inner_core.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_inner_core_Dev.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_inner_core_Dev.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_inner_core_Dev.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_outer_core.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_outer_core.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_outer_core.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_outer_core_Dev.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_outer_core_Dev.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_forces_outer_core_Dev.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
@@ -86,14 +86,12 @@
real(kind=CUSTOM_REAL), dimension(NGLLX,NGLLY,NGLLZ) :: source_euler_A,source_euler_B
integer ispec,iglob
- integer i,j,k,l
+ integer i,j,k
real(kind=CUSTOM_REAL) xixl,xiyl,xizl,etaxl,etayl,etazl,gammaxl,gammayl,gammazl,jacobianl
real(kind=CUSTOM_REAL) dpotentialdxl,dpotentialdyl,dpotentialdzl
- real(kind=CUSTOM_REAL) tempx1l,tempx2l,tempx3l,sum_terms
+ real(kind=CUSTOM_REAL) sum_terms
- double precision grad_x_ln_rho,grad_y_ln_rho,grad_z_ln_rho
-
! manually inline the calls to the Deville et al. (2002) routines
real(kind=CUSTOM_REAL), dimension(NGLLX,NGLLY,NGLLZ) :: dummyx_loc
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_kernels.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_kernels.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_kernels.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_seismograms.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_seismograms.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_seismograms.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_stacey_crust_mantle.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_stacey_crust_mantle.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_stacey_crust_mantle.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/compute_stacey_outer_core.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/compute_stacey_outer_core.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/compute_stacey_outer_core.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/configure
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/configure 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/configure 2010-02-25 15:04:32 UTC (rev 16340)
@@ -2,7 +2,7 @@
# Guess values for system-dependent variables and create Makefiles.
# Generated by GNU Autoconf 2.61 for Specfem3D Globe 5.0.0.
#
-# Report bugs to <jtromp AT caltech.edu>.
+# Report bugs to <jtromp AT princeton.edu>.
#
# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001,
# 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc.
@@ -1250,7 +1250,7 @@
Use these variables to override the choices made by `configure' or to help
it to find libraries and programs with nonstandard names/locations.
-Report bugs to <jtromp AT caltech.edu>.
+Report bugs to <jtromp AT princeton.edu>.
_ACEOF
ac_status=$?
fi
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/constants.h.in
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/constants.h.in 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/constants.h.in 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/convolve_source_timefunction.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/convolve_source_timefunction.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/convolve_source_timefunction.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/count_number_of_sources.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/count_number_of_sources.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/count_number_of_sources.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_central_cube.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_central_cube.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_central_cube.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
@@ -32,7 +32,7 @@
idoubling,iregion_code,xstore,ystore,zstore, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME,&
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
- shape3D,dershape3D,rmin,rmax,rhostore,dvpstore,&
+ shape3D,rmin,rmax,rhostore,dvpstore,&
kappavstore,kappahstore,muvstore,muhstore,eta_anisostore, &
xixstore,xiystore,xizstore,etaxstore,etaystore,etazstore,&
gammaxstore,gammaystore,gammazstore,nspec_actually, &
@@ -76,7 +76,6 @@
! 3D shape functions and their derivatives
double precision shape3D(NGNOD,NGLLX,NGLLY,NGLLZ)
- double precision dershape3D(NDIM,NGNOD,NGLLX,NGLLY,NGLLZ)
integer idoubling(nspec)
@@ -259,7 +258,7 @@
xstore,ystore,zstore,nspec,myrank,ABSORBING_CONDITIONS, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME, &
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
- xelm,yelm,zelm,shape3D,dershape3D,rmin,rmax,rhostore,dvpstore, &
+ xelm,yelm,zelm,shape3D,rmin,rmax,rhostore,dvpstore, &
kappavstore,kappahstore,muvstore,muhstore,eta_anisostore, &
xixstore,xiystore,xizstore,etaxstore,etaystore,etazstore, &
gammaxstore,gammaystore,gammazstore,nspec_actually, &
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_central_cube_buffers.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_central_cube_buffers.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_central_cube_buffers.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_chunk_buffers.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_chunk_buffers.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_chunk_buffers.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_doubling_elements.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_doubling_elements.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_doubling_elements.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
@@ -31,7 +31,7 @@
NPROC_XI,NPROC_ETA,NEX_PER_PROC_XI,NEX_PER_PROC_ETA, &
ner,ratio_sampling_array,r_top,r_bottom, &
xstore,ystore,zstore,xigll,yigll,zigll, &
- shape3D,dershape3D,dershape2D_bottom, &
+ shape3D,dershape2D_bottom, &
INCLUDE_CENTRAL_CUBE,ABSORBING_CONDITIONS, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME, &
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
@@ -80,7 +80,6 @@
! 3D shape functions and their derivatives
double precision shape3D(NGNOD,NGLLX,NGLLY,NGLLZ)
- double precision dershape3D(NDIM,NGNOD,NGLLX,NGLLY,NGLLZ)
! 2D shape functions and their derivatives
double precision dershape2D_bottom(NDIM2D,NGNOD2D,NGLLX,NGLLY)
@@ -336,7 +335,7 @@
xstore,ystore,zstore,nspec,myrank,ABSORBING_CONDITIONS, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME, &
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
- xelm,yelm,zelm,shape3D,dershape3D,rmin,rmax,rhostore,dvpstore, &
+ xelm,yelm,zelm,shape3D,rmin,rmax,rhostore,dvpstore, &
kappavstore,kappahstore,muvstore,muhstore,eta_anisostore, &
xixstore,xiystore,xizstore,etaxstore,etaystore,etazstore, &
gammaxstore,gammaystore,gammazstore,nspec_actually, &
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_header_file.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_header_file.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_header_file.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_mass_matrices.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_mass_matrices.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_mass_matrices.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_AVS_DX.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_AVS_DX.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_AVS_DX.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_GMT_global.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_GMT_global.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_movie_GMT_global.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_name_database.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_name_database.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_name_database.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_regions_mesh.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_regions_mesh.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_regions_mesh.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
@@ -486,7 +486,7 @@
ner_without_doubling,ner,ratio_sampling_array,r_top,r_bottom, &
xstore,ystore,zstore, &
iaddx,iaddy,iaddz,xigll,yigll,zigll, &
- shape3D,dershape3D,dershape2D_bottom, &
+ shape3D,dershape2D_bottom, &
INCLUDE_CENTRAL_CUBE,ABSORBING_CONDITIONS, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME, &
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
@@ -517,7 +517,7 @@
NPROC_XI,NPROC_ETA,NEX_PER_PROC_XI,NEX_PER_PROC_ETA, &
ner,ratio_sampling_array,r_top,r_bottom, &
xstore,ystore,zstore,xigll,yigll,zigll, &
- shape3D,dershape3D,dershape2D_bottom, &
+ shape3D,dershape2D_bottom, &
INCLUDE_CENTRAL_CUBE,ABSORBING_CONDITIONS, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME, &
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
@@ -550,7 +550,7 @@
idoubling,iregion_code,xstore,ystore,zstore, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME,&
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
- shape3D,dershape3D,rmin,rmax,rhostore,dvpstore,&
+ shape3D,rmin,rmax,rhostore,dvpstore,&
kappavstore,kappahstore,muvstore,muhstore,eta_anisostore, &
xixstore,xiystore,xizstore,etaxstore,etaystore,etazstore,&
gammaxstore,gammaystore,gammazstore,nspec_actually, &
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_regular_elements.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_regular_elements.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_regular_elements.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
@@ -32,7 +32,7 @@
ner_without_doubling,ner,ratio_sampling_array,r_top,r_bottom, &
xstore,ystore,zstore, &
iaddx,iaddy,iaddz,xigll,yigll,zigll, &
- shape3D,dershape3D,dershape2D_bottom, &
+ shape3D,dershape2D_bottom, &
INCLUDE_CENTRAL_CUBE,ABSORBING_CONDITIONS, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME, &
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
@@ -85,7 +85,6 @@
! 3D shape functions and their derivatives
double precision shape3D(NGNOD,NGLLX,NGLLY,NGLLZ)
- double precision dershape3D(NDIM,NGNOD,NGLLX,NGLLY,NGLLZ)
! 2D shape functions and their derivatives
double precision dershape2D_bottom(NDIM2D,NGNOD2D,NGLLX,NGLLY)
@@ -255,7 +254,7 @@
xstore,ystore,zstore,nspec,myrank,ABSORBING_CONDITIONS, &
RICB,RCMB,R670,RMOHO,RMOHO_FICTITIOUS_IN_MESHER,RTOPDDOUBLEPRIME, &
R600,R220,R771,R400,R120,R80,RMIDDLE_CRUST,ROCEAN, &
- xelm,yelm,zelm,shape3D,dershape3D,rmin,rmax,rhostore,dvpstore, &
+ xelm,yelm,zelm,shape3D,rmin,rmax,rhostore,dvpstore, &
kappavstore,kappahstore,muvstore,muhstore,eta_anisostore, &
xixstore,xiystore,xizstore,etaxstore,etaystore,etazstore, &
gammaxstore,gammaystore,gammazstore,nspec_actually, &
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/create_serial_name_database.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/create_serial_name_database.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/create_serial_name_database.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/define_derivation_matrices.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/define_derivation_matrices.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/define_derivation_matrices.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/define_superbrick.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/define_superbrick.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/define_superbrick.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/euler_angles.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/euler_angles.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/euler_angles.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/exit_mpi.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/exit_mpi.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/exit_mpi.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_1D_buffers.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_1D_buffers.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_1D_buffers.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_cutplanes_eta.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_cutplanes_eta.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_cutplanes_eta.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_cutplanes_xi.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_cutplanes_xi.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_MPI_cutplanes_xi.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_absorb.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_absorb.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_absorb.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_attenuation.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_attenuation.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_attenuation.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_backazimuth.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_backazimuth.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_backazimuth.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_cmt.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_cmt.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_cmt.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_ellipticity.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_ellipticity.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_ellipticity.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_event_info.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_event_info.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_event_info.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_global.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_global.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_global.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_jacobian_boundaries.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_jacobian_boundaries.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_jacobian_boundaries.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_jacobian_discontinuities.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_jacobian_discontinuities.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_jacobian_discontinuities.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_model.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_model.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_model.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
@@ -89,7 +89,7 @@
double precision vpv,vph,vsv,vsh,eta_aniso
double precision Qkappa,Qmu
double precision r,r_prem,moho
- integer i,j,k,ia
+ integer i,j,k
! loops over all gll points for this spectral element
do k=1,NGLLZ
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_model_parameters.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_model_parameters.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_model_parameters.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_shape2D.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_shape2D.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_shape2D.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_shape3D.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_shape3D.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_shape3D.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/get_value_parameters.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/get_value_parameters.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/get_value_parameters.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/hex_nodes.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/hex_nodes.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/hex_nodes.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/initialize_simulation.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/initialize_simulation.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/initialize_simulation.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/intgrl.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/intgrl.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/intgrl.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/lagrange_poly.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/lagrange_poly.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/lagrange_poly.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/lgndr.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/lgndr.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/lgndr.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/locate_receivers.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/locate_receivers.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/locate_receivers.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/locate_sources.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/locate_sources.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/locate_sources.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/make_ellipticity.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/make_ellipticity.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/make_ellipticity.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/make_gravity.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/make_gravity.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/make_gravity.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/memory_eval.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/memory_eval.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/memory_eval.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/meshfem3D.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/meshfem3D.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/meshfem3D.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/meshfem3D_models.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/meshfem3D_models.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/meshfem3D_models.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
@@ -1197,7 +1197,7 @@
endif ! CRUSTAL
! gets value according to radius/theta/phi location and idoubling flag
- call model_atten3D_QRFSI12(r_used,theta_degrees,phi_degrees,Qmu,QRFSI12_Q,idoubling)
+ call model_atten3D_QRFSI12(r_used,theta_degrees,phi_degrees,Qmu,QRFSI12_Q,idoubling)
else
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_1066a.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_1066a.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_1066a.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_1dref.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_1dref.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_1dref.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_ak135.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_ak135.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_ak135.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,9 +4,9 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
! August 2008
!
! This program is free software; you can redistribute it and/or modify
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_aniso_inner_core.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_aniso_inner_core.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_aniso_inner_core.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_aniso_mantle.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_aniso_mantle.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_aniso_mantle.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_atten3D_QRFSI12.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_atten3D_QRFSI12.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_atten3D_QRFSI12.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_attenuation.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_attenuation.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_attenuation.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_crust.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_crust.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_crust.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_crustmaps.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_crustmaps.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_crustmaps.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_eucrust.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_eucrust.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_eucrust.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_gll.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_gll.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_gll.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_heterogen_mantle.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_heterogen_mantle.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_heterogen_mantle.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_iasp91.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_iasp91.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_iasp91.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_jp1d.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_jp1d.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_jp1d.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_jp3d.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_jp3d.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_jp3d.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_ppm.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_ppm.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_ppm.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_prem.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_prem.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_prem.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_s20rts.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_s20rts.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_s20rts.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_s362ani.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_s362ani.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_s362ani.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_sea1d.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_sea1d.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_sea1d.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_sea99_s.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_sea99_s.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_sea99_s.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/model_topo_bathy.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/model_topo_bathy.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/model_topo_bathy.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/moho_stretching.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/moho_stretching.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/moho_stretching.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/param_reader.c
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/param_reader.c 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/param_reader.c 2010-02-25 15:04:32 UTC (rev 16340)
@@ -5,10 +5,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
- ! Seismological Laboratory, California Institute of Technology, USA
+ ! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
- ! (c) California Institute of Technology and University of Pau / CNRS / INRIA
- ! February 2008
+ ! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+ ! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/precision.h.in
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/precision.h.in 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/precision.h.in 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/prepare_timerun.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/prepare_timerun.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/prepare_timerun.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/read_arrays_buffers_solver.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/read_arrays_buffers_solver.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/read_arrays_buffers_solver.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/read_arrays_solver.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/read_arrays_solver.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/read_arrays_solver.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/read_compute_parameters.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/read_compute_parameters.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/read_compute_parameters.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/read_forward_arrays.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/read_forward_arrays.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/read_forward_arrays.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/read_mesh_databases.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/read_mesh_databases.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/read_mesh_databases.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/read_parameter_file.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/read_parameter_file.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/read_parameter_file.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/read_value_parameters.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/read_value_parameters.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/read_value_parameters.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/recompute_jacobian.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/recompute_jacobian.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/recompute_jacobian.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/reduce.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/reduce.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/reduce.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/rthetaphi_xyz.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/rthetaphi_xyz.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/rthetaphi_xyz.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/save_arrays_solver.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/save_arrays_solver.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/save_arrays_solver.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/save_forward_arrays.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/save_forward_arrays.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/save_forward_arrays.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/save_header_file.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/save_header_file.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/save_header_file.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/save_kernels.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/save_kernels.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/save_kernels.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/setup_sources_receivers.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/setup_sources_receivers.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/setup_sources_receivers.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/sort_array_coordinates.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/sort_array_coordinates.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/sort_array_coordinates.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/specfem3D.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/specfem3D.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/specfem3D.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/spline_routines.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/spline_routines.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/spline_routines.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/stretching_function.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/stretching_function.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/stretching_function.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_chunks_data.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_chunks_data.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_chunks_data.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_data.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_data.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_data.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_faces_data.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_faces_data.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_global_faces_data.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_surface_data.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_surface_data.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/write_AVS_DX_surface_data.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/write_c_binary.c
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/write_c_binary.c 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/write_c_binary.c 2010-02-25 15:04:32 UTC (rev 16340)
@@ -5,10 +5,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/write_movie_surface.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/write_movie_surface.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/write_movie_surface.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/write_movie_volume.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/write_movie_volume.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/write_movie_volume.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/write_seismograms.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/write_seismograms.f90 2010-02-25 14:17:06 UTC (rev 16339)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/write_seismograms.f90 2010-02-25 15:04:32 UTC (rev 16340)
@@ -4,10 +4,10 @@
! --------------------------------------------------
!
! Main authors: Dimitri Komatitsch and Jeroen Tromp
-! Seismological Laboratory, California Institute of Technology, USA
+! Seismological Laboratory, California Institute of Technology / Princeton University, USA
! and University of Pau / CNRS / INRIA, France
-! (c) California Institute of Technology and University of Pau / CNRS / INRIA
-! February 2008
+! (c) California Institute of Technology / Princeton University and University of Pau / CNRS / INRIA
+! March 2010
!
! This program is free software; you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
More information about the CIG-COMMITS
mailing list