init_hopping_transcorr Subroutine

public subroutine init_hopping_transcorr()

Arguments

None

Contents


Source Code

    subroutine init_hopping_transcorr()

        ! we also need the dispersion relation from the k-space hubbard!
        ! should i move this to the lattice class?
        ! this also means i have to additionally initialize parts of the
        ! k-space lattice for this transcorrelation!
        ! and i finally have to get the real-space and k-space vector
        ! relations fully correct!

        call setup_lattice_symmetry()

        call init_dispersion_rel_cache()

        ! i also need a umat array now!
        if (t_trans_corr_hop) then
            call init_umat_rs_hub_transcorr()
        else if (t_spin_dependent_transcorr) then
            call init_tmat_rs_hub_spin_transcorr()
        end if

    end subroutine init_hopping_transcorr