[cig-commits] [commit] Hiro_latest: Add subroutines to evaluate Coriolis terms in work array for Legendre transform (115dd54)

[cig_noreply at geodynamics.org]

Repository : ssh://geoshell/calypso

On branch  : Hiro_latest
Link       : https://github.com/geodynamics/calypso/compare/3c548304673360ddedd7d68c8095b3fb74a2b9ce...c4a1173efe5e196ae6c9f3494a66a74b5e60569a

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

commit 115dd547f1d1960cba4c59d9f7fa34231dcbc522
Author: Hiroaki Matsui <h_kemono at mac.com>
Date:   Wed Dec 18 10:08:30 2013 -0800

    Add subroutines to evaluate Coriolis terms in work array for Legendre transform


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

115dd547f1d1960cba4c59d9f7fa34231dcbc522
 .../MHD_src/IO/m_ctl_data_mhd_evo_scheme.f90       |   3 +-
 .../MHD_src/field_data/copy_MHD_4_pole_trans.f90   |  46 +--
 .../field_data/lead_pole_data_4_sph_mhd.f90        |  37 +--
 .../MHD_src/sph_MHD/cal_nonlinear.f90              |  16 +-
 .../MHD_src/sph_MHD/const_coriolis_sph.f90         |  53 ++++
 .../MHD_src/sph_MHD/copy_MHD_4_sph_trans.f90       | 112 +++----
 .../MHD_src/sph_MHD/copy_snap_4_sph_trans.f90      | 132 ++++-----
 .../MHD_src/sph_MHD/m_addresses_trans_sph_MHD.f90  | 173 +++++++----
 .../MHD_src/sph_MHD/m_addresses_trans_sph_snap.f90 | 305 +++++++++++++-------
 .../MHD_src/sph_MHD/m_coriolis_coefs_tri_rlm.f90   | 246 ++++++++++++++++
 .../MHD_src/sph_MHD/m_coriolis_coefs_tri_sph.f90   | 132 ++++-----
 .../MHD_src/sph_MHD/m_coriolis_terms_rlm.f90       | 165 +++++++++++
 .../MHD_src/sph_MHD/m_gaunt_coriolis_rlm.f90       | 192 ++++++++++++
 .../MHD_src/sph_MHD/set_control_sph_data_MHD.f90   |  37 +--
 .../MHD_src/sph_MHD/set_coriolis_tri_sph.f90       | 242 ++++++++--------
 .../MHD_src/sph_MHD/sph_transforms_4_MHD.f90       | 130 ++++++---
 .../sph_MHD/sph_transforms_sph_MHD.f90}            |  37 ++-
 .../MHD_src/sph_MHD/sum_coriolis_terms_rlm.f90     | 321 +++++++++++++++++++++
 .../MHD_src/sph_MHD/sum_div_coriolis_rj_sph.f90    |  88 +++---
 .../MHD_src/sph_MHD/sum_r_coriolis_tri_sph.f90     |  54 ++--
 .../MHD_src/sph_MHD/sum_rot_coriolis_rj_sph.f90    | 157 +++++-----
 .../SPH_SHELL_src/sph_trans_scalar.f90             | 188 ------------
 .../SPH_SPECTR_src/m_schmidt_poly_on_rtm.f90       |   4 +-
 .../SPH_SPECTR_src/m_sph_spectr_data.f90           |   5 -
 .../SPH_SPECTR_src/schmidt_poly_on_rtm_grid.f90    |  14 +-
 .../SPH_SPECTR_src/set_control_sph_data.f90        |   1 -
 .../SPH_SPECTR_src/set_poloidal_rotation.f90       |   2 -
 .../spherical_harmonics/cal_gaunt_itgs.f90         |   6 +-
 .../SERIAL_src/spherical_harmonics/normei.f90      | 132 +++++----
 .../SERIAL_src/spherical_harmonics/normgi.f90      | 122 ++++----
 .../spherical_harmonics/normgi_by_fact.f90         | 300 +++++++++++++++++++
 .../spherical_harmonics/spherical_harmonics.f90    | 144 ++++-----
 src/programs/SPH_MHD/SPH_analyzer_MHD.f90          |   5 +
 src/programs/SPH_MHD/control_MHD                   |   3 +-
 .../SNAPSHOT_MHD/SPH_analyzer_d_bench.f90          |   5 +
 .../SNAPSHOT_MHD/SPH_analyzer_snap.f90             |   5 +
 36 files changed, 2495 insertions(+), 1119 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 115dd547f1d1960cba4c59d9f7fa34231dcbc522