[cig-commits] [commit] devel: major restructuring by Etienne Bachmann: use modules instead of subroutine arguments, as in the 3D codes; this drastically simplifies the source code and is much easier to understand and maintain (6fd85c3)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Fri Nov 28 09:14:38 PST 2014


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

On branch  : devel
Link       : https://github.com/geodynamics/specfem2d/compare/5d9efe58abc32c6e0d8866576796e0332e4bb653...6fd85c32c411b3193f4432c358d167d66badab09

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

commit 6fd85c32c411b3193f4432c358d167d66badab09
Author: Dimitri Komatitsch <komatitsch at lma.cnrs-mrs.fr>
Date:   Fri Nov 28 18:03:39 2014 +0100

    major restructuring by Etienne Bachmann: use modules instead of subroutine arguments, as in the 3D codes; this drastically simplifies the source code and is much easier to understand and maintain


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

6fd85c32c411b3193f4432c358d167d66badab09
 src/specfem2D/Makefile.in                          |   63 +
 src/specfem2D/acoustic_forcing_boundary.f90        |   49 +-
 src/specfem2D/assemble_MPI.F90                     |  133 +-
 src/specfem2D/attenuation_model.f90                |   87 +-
 src/specfem2D/axisymmetric_routines.f90            |   30 +-
 src/specfem2D/check_stability.F90                  |   37 +-
 src/specfem2D/checkgrid.F90                        |   79 +-
 src/specfem2D/compute_arrays_source.f90            |   39 +-
 src/specfem2D/compute_coupling_acoustic_el.f90     |   56 +-
 src/specfem2D/compute_coupling_viscoelastic_ac.f90 |   58 +-
 src/specfem2D/compute_curl_one_element.f90         |   34 +-
 src/specfem2D/compute_energy.f90                   |  112 +-
 src/specfem2D/compute_forces_acoustic.f90          |  117 +-
 src/specfem2D/compute_forces_gravitoacoustic.f90   |   70 +-
 src/specfem2D/compute_forces_poro_fluid.f90        |  131 +-
 src/specfem2D/compute_forces_poro_solid.f90        |  129 +-
 src/specfem2D/compute_forces_viscoelastic.F90      |  193 +--
 src/specfem2D/compute_pressure.f90                 |  140 +-
 src/specfem2D/compute_vector_field.f90             |   99 +-
 src/specfem2D/construct_acoustic_surface.f90       |   11 +-
 src/specfem2D/create_color_image.f90               |  109 +-
 src/specfem2D/createnum_fast.f90                   |   14 +-
 src/specfem2D/createnum_slow.f90                   |    8 +-
 src/specfem2D/define_derivation_matrices.f90       |   27 +-
 src/specfem2D/enforce_acoustic_free_surface.f90    |   16 +-
 src/specfem2D/get_MPI.F90                          |   62 +-
 src/specfem2D/get_global.f90                       |    9 +-
 src/specfem2D/gmat01.f90                           |  109 +-
 src/specfem2D/initialize_simulation.F90            |   31 +-
 src/specfem2D/invert_mass_matrix.F90               |  103 +-
 src/specfem2D/noise_tomography.f90                 |   94 +-
 src/specfem2D/paco_beyond_critical.f90             |   39 +-
 src/specfem2D/plotgll.f90                          |    9 +-
 src/specfem2D/plotpost.F90                         |  248 +--
 src/specfem2D/pml_init.F90                         |   70 +-
 src/specfem2D/prepare_absorb.f90                   |   74 +-
 src/specfem2D/prepare_assemble_MPI.F90             |   36 +-
 src/specfem2D/prepare_color_image.F90              |   91 +-
 src/specfem2D/prepare_initialfield.F90             |   67 +-
 src/specfem2D/prepare_source_time_function.f90     |   49 +-
 src/specfem2D/read_databases.F90                   |  287 +---
 src/specfem2D/read_external_model.f90              |   56 +-
 src/specfem2D/set_sources.f90                      |   23 +-
 src/specfem2D/setup_sources_receivers.F90          |   59 +-
 src/specfem2D/specfem2D.F90                        | 1716 ++------------------
 src/specfem2D/specfem2D_par.f90                    |  786 +++++++++
 src/specfem2D/update_displacement_scheme.F90       |   61 +-
 src/specfem2D/write_seismograms.F90                |   35 +-
 48 files changed, 1967 insertions(+), 3988 deletions(-)

Diff suppressed because of size. To see it, use:

    git diff-tree --root --patch-with-stat --no-color --find-copies-harder --ignore-space-at-eol --cc 6fd85c32c411b3193f4432c358d167d66badab09


More information about the CIG-COMMITS mailing list