[cig-commits] [commit] Hiro_latest, master: Add wrapper routines using multi Fourier transforms in FFTW (e4f0ef4)

[cig_noreply at geodynamics.org]

Repository : ssh://geoshell/calypso

On branches: Hiro_latest,master
Link       : https://github.com/geodynamics/calypso/compare/bf5dcaf71a4089a4c2f22940f4edea71b9abedd1...9730b061d69d156b271dfe841a55ae371b4e1c03

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

commit e4f0ef48605f89208a8055d375ace002f176616e
Author: Hiroaki Matsui <h_kemono at mac.com>
Date:   Mon Mar 10 15:12:09 2014 -0700

    Add wrapper routines using multi Fourier transforms in FFTW


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

e4f0ef48605f89208a8055d375ace002f176616e
 .../MHD_src/IO/init_sph_MHD_elapsed_label.f90      |  15 +-
 .../MHD_src/IO/m_ctl_data_noviz_MHD.f90            |  25 +-
 src/Fortran_libraries/MHD_src/IO/range_data_IO.f90 |  54 +--
 .../MHD_src/IO/set_control_4_time_steps.f90        |  91 +----
 .../MHD_src/field_data/output_ucd_file_control.f90 |   8 +-
 .../MHD_src/sph_MHD/cal_diff_adv_src_explicit.f90  |  83 +++-
 .../MHD_src/sph_MHD/cal_explicit_terms.f90         |   4 +-
 .../MHD_src/sph_MHD/cal_nonlinear_sph_MHD.f90      |  28 +-
 .../MHD_src/sph_MHD/cal_sol_sph_fluid_crank.f90    |  64 ++--
 .../MHD_src/sph_MHD/const_r_mat_4_scalar_sph.f90   |  16 +-
 .../MHD_src/sph_MHD/construct_MHD_coefficient.f90  |  12 +-
 .../MHD_src/sph_MHD/copy_snap_4_sph_trans.f90      |   1 +
 .../MHD_src/sph_MHD/m_addresses_trans_sph_MHD.f90  |  12 +-
 .../MHD_src/sph_MHD/m_addresses_trans_sph_snap.f90 |   9 +
 .../MHD_src/sph_MHD/m_initial_field_control.f90    | 129 ++++++-
 .../MHD_src/sph_MHD/set_bc_sph_scalars.f90         |   4 +-
 .../MHD_src/sph_MHD/set_control_sph_data_MHD.f90   |   4 +
 .../MHD_src/sph_MHD/set_scalar_boundary_sph.f90    |  60 +++
 .../MHD_src/sph_MHD/sph_trans_w_coriols.f90        |   2 +-
 .../MHD_src/sph_MHD/sph_transforms_4_MHD.f90       |  11 +-
 .../SPH_SHELL_src/circle_transform_single.f90      |   1 -
 .../SPH_SHELL_src/cvt_nod_fld_and_sph_fld.f90      |   7 +-
 .../SPH_SHELL_src/legendre_bwd_trans_fdout.f90     |  23 +-
 .../SPH_SHELL_src/legendre_bwd_trans_krin.f90      | 146 ++++----
 .../SPH_SHELL_src/legendre_bwd_trans_spin.f90      |  93 +++--
 .../SPH_SHELL_src/legendre_fwd_trans_fdout.f90     |  23 +-
 .../SPH_SHELL_src/legendre_fwd_trans_krin.f90      | 140 +++----
 .../SPH_SHELL_src/legendre_fwd_trans_spin.f90      | 104 ++---
 .../SPH_SHELL_src/legendre_transform_fdout.f90     |  46 ++-
 .../SPH_SHELL_src/legendre_transform_krin.f90      |  46 ++-
 .../SPH_SHELL_src/legendre_transform_select.f90    |  12 +-
 .../SPH_SHELL_src/legendre_transform_spin.f90      |  57 ++-
 .../SPH_SHELL_src/m_work_4_sph_trans.f90           |   2 +-
 .../SPH_SHELL_src/m_work_4_sph_trans_fdout.f90     |  30 +-
 .../SPH_SHELL_src/m_work_4_sph_trans_krin.f90      | 125 ++----
 .../SPH_SHELL_src/m_work_4_sph_trans_spin.f90      | 128 ++-----
 .../SPH_SHELL_src/ordering_leg_trans_fdout.f90     |  63 +++-
 .../SPH_SHELL_src/ordering_schmidt_trans_krin.f90  | 167 +++++----
 .../SPH_SHELL_src/ordering_schmidt_trans_spin.f90  | 182 +++++----
 .../SPH_SHELL_src/pole_sph_transform.f90           |   2 +
 .../SPH_SHELL_src/select_fourier_transform.F90     |  41 +-
 .../SPH_SHELL_src/sum_sph_rms_data.f90             |  14 +-
 .../SERIAL_src/BASE/copy_between_two_fields.f90    |  50 ++-
 .../SERIAL_src/BASE/cvt_nodal_and_sph_field.f90    |  33 +-
 .../SERIAL_src/BASE/m_precision.f90                |  20 +-
 .../SERIAL_src/BASE/m_t_step_parameter.f90         |  50 ++-
 .../SERIAL_src/BASE/t_group_data.f90               |  63 ++--
 .../SERIAL_src/FFT_wrapper/FFTW_wrapper.f90        | 417 +++++++++++++++++----
 .../SERIAL_src/FFT_wrapper/FFT_selector.F90        |  35 +-
 .../SERIAL_src/FFT_wrapper/m_FFTW_wrapper.f90      | 168 ++++++---
 .../SERIAL_src/FFT_wrapper/t_FFTW_wrapper.f90      | 193 +++++++---
 .../SERIAL_src/FFT_wrapper/t_FFT_selector.F90      |  12 +-
 .../SERIAL_src/IO/set_and_cal_udt_data.f90         |  21 +-
 .../SERIAL_src/spherical_harmonics/factorials.f90  |  24 +-
 .../SERIAL_src/spherical_harmonics/legendre.f90    |  39 +-
 .../spherical_harmonics/m_schmidt_polynomial.f90   |  29 +-
 src/programs/SPH_MHD/SPH_analyzer_MHD.f90          |   2 -
 src/programs/SPH_MHD/analyzer_sph_MHD.f90          |   2 +-
 src/programs/SPH_MHD/control_MHD                   |   2 -
 .../INITIAL_FIELD/const_sph_initial_spectr.f90     |  32 +-
 60 files changed, 2021 insertions(+), 1255 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 e4f0ef48605f89208a8055d375ace002f176616e