chi_imfreq.hpp

/*******************************************************************************
 *
 * TRIQS: a Toolbox for Research in Interacting Quantum Systems
 *
 * Copyright (C) 2017, H. U.R. Strand
 * Copyright (C) 2020, S. Käser
 * Authors: H. U.R. Strand, S. Käser 
 *
 * TRIQS is free software: you can redistribute it and/or modify it under the
 * terms of the GNU General Public License as published by the Free Software
 * Foundation, either version 3 of the License, or (at your option) any later
 * version.
 *
 * TRIQS is distributed in the hope that it will be useful, but WITHOUT ANY
 * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
 * details.
 *
 * You should have received a copy of the GNU General Public License along with
 * TRIQS. If not, see <http://www.gnu.org/licenses/>.
 *
 ******************************************************************************/
#pragma once
 
#include "../types.hpp"
 
namespace triqs_tprf {

chi_wnr_t chi0r_from_gr_PH(int nw, int nn, g_wr_cvt g_nr);
chi_nr_t chi0_nr_from_gr_PH_at_specific_w(int nw_index, int nn, g_wr_cvt g_nr);

chi_wnr_t chi0r_from_gr_PH_nompi(int nw, int nn, g_wr_cvt g_nr);

chi_wnk_t chi0q_from_g_wk_PH(int nw, int nn, g_wk_cvt g_wk);

chi_wnr_t chi0r_from_chi0q(chi_wnk_cvt chi_wnk);

chi_wnk_t chi0q_from_chi0r(chi_wnr_cvt chi_wnr);

chi_wk_t chi0q_sum_nu(chi_wnk_cvt chi_wnk);

chi_wk_t chi0q_sum_nu_tail_corr_PH(chi_wnk_cvt chi_wnk);

chi_w_t chi0q_sum_nu_q(chi_wnk_cvt chi_wnk);

chi_kwnn_t chiq_from_chi0q_and_gamma_PH(chi_wnk_cvt chi0_wnk, chi_wnn_cvt gamma_ph_wnn);

chi_kw_t chiq_sum_nu_from_chi0q_and_gamma_PH(chi_wnk_cvt chi0_wnk, chi_wnn_cvt gamma_ph_wnn);

chi_kw_t chiq_sum_nu_from_chi0q_and_gamma_and_L_wn_PH(chi_wnk_cvt chi0_wnk, chi_wnn_cvt gamma_ph_wnn, chi_nn_cvt L_wn);
  
gf<prod<brzone, imfreq>, tensor_valued<4>>
chiq_sum_nu_from_g_wk_and_gamma_PH(gk_iw_t g_wk, g2_iw_vt gamma_ph_wnn, int tail_corr_nwf=-1);
 
gf<prod<brzone, imfreq>, tensor_valued<4>> chiq_sum_nu_from_e_k_sigma_w_and_gamma_PH(double mu, ek_vt e_k, g_iw_vt sigma_w, g2_iw_vt gamma_ph_wnn, int tail_corr_nwf=-1);
 
gf<prod<brzone, imfreq>, tensor_valued<4>>
chiq_sum_nu(chiq_t chiq);
  
gf<imfreq, tensor_valued<4>> chiq_sum_nu_q(chiq_t chiq);
 
chi_wk_t attatch_tri_vert(chi_nn_cvt L_wn, chi_kwnn_cvt chi_kwnn);
 
} // namespace triqs_tprf