calc_orbital_pgen_contr_end_pchb Subroutine

public pure subroutine calc_orbital_pgen_contr_end_pchb(csf_i, occ_orbs, a, orb_pgen)

Arguments

Type IntentOptional Attributes Name
type(CSF_Info_t), intent(in) :: csf_i
integer, intent(in) :: occ_orbs(2)
integer, intent(in) :: a
real(kind=dp), intent(out) :: orb_pgen

Contents

Source Code

calc_orbital_pgen_contr_end_pchb

Source Code

    pure subroutine calc_orbital_pgen_contr_end_pchb(csf_i, occ_orbs, a, orb_pgen)
        type(CSF_Info_t), intent(in) :: csf_i
        integer, intent(in) :: occ_orbs(2), a
        real(dp), intent(out) :: orb_pgen
        call pchb_sampler%calc_orbital_pgen_contr_end_pchb(csf_i, occ_orbs, a, orb_pgen)
    end subroutine calc_orbital_pgen_contr_end_pchb