1 2! Copyright (C) 2016 A. Davydov, A. Sanna, J. K. Dewhurst, S. Sharma and 3! E. K. U. Gross. This file is distributed under the terms of the GNU General 4! Public License. See the file COPYING for license details. 5 6module modgw 7 8! maximum Matsubara frequency for the GW calculation 9real(8) wmaxgw 10! maximum number of Matsubara frequencies 11integer nwgw 12! integer grid intervals for Matsubara frequencies 13integer intwgw(2) 14! map from frequency index to FFT array 15integer, allocatable :: iwfft(:) 16! maximum fermionic Matsubara frequency index to be used for the GW calculation 17integer nwfm 18! maximum bosonic frequency index 19integer nwbs 20! imaginary frequencies used for the GW calculation 21real(8), allocatable :: wgw(:) 22! complex fermionic frequencies 23complex(8), allocatable :: wfm(:) 24! twdiag is .true. if the screened interaction W is taken to be diagonal 25logical twdiag 26! tsediag is .true. if the GW self-energy is taken to be diagonal 27logical tsediag 28! type of analytic continuation to be used for determining the self-energy on 29! the real axis 30integer actype 31! number of poles used for fitting the self-energy matrix elements 32integer npole 33! number of complex shifts used in averaging the Pade approximant for the 34! analytic continuation of the self-energy to the real axis 35integer nspade 36 37end module 38 39