init_get_helement_hubbard Subroutine

public subroutine init_get_helement_hubbard()

Arguments

None

Source Code

    subroutine init_get_helement_hubbard

        get_helement_lattice_ex_mat => get_helement_rs_hub_ex_mat
        get_helement_lattice_general => get_helement_rs_hub_general
        if (t_trans_corr_hop .or. t_spin_dependent_transcorr) then
            call init_hopping_transcorr()
        end if

        call init_tmat(lat)

    end subroutine init_get_helement_hubbard