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