calculate_lifetimeaverage_vis Subroutine
private subroutine calculate_lifetimeaverage_vis(inc, nsqa, nkpts, nkpts_all, kpt2irr, kpoints, fermivel, taukinv, printout, fac, fsRyunit)
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(inc_TYPE), | intent(in) | :: | inc | |||
| integer, | intent(in) | :: | nsqa | |||
| integer, | intent(in) | :: | nkpts | |||
| integer, | intent(in) | :: | nkpts_all | |||
| integer, | intent(in) | :: | kpt2irr(nkpts_all) | |||
| double precision, | intent(in) | :: | kpoints(3,nkpts) | |||
| double precision, | intent(in) | :: | fermivel(3,nkpts) | |||
| double precision, | intent(in) | :: | taukinv(inc%ndegen**2*nsqa,nkpts) | |||
| logical, | intent(in) | :: | printout | |||
| double precision, | intent(in) | :: | fac | |||
| character(len=*), | intent(in) | :: | fsRyunit |