mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-12-23 03:53:29 +01:00
fixed complex/real bug
This commit is contained in:
parent
072067c4fa
commit
8e615f6788
@ -2777,7 +2777,7 @@ subroutine i_H_j_single_spin_complex(key_i,key_j,Nint,spin,hij)
|
|||||||
PROVIDE big_array_exchange_integrals_complex mo_two_e_integrals_in_map
|
PROVIDE big_array_exchange_integrals_complex mo_two_e_integrals_in_map
|
||||||
|
|
||||||
call get_single_excitation_spin(key_i(1,spin),key_j(1,spin),exc,phase,Nint)
|
call get_single_excitation_spin(key_i(1,spin),key_j(1,spin),exc,phase,Nint)
|
||||||
call get_single_excitation_from_fock(key_i,key_j,exc(1,1),exc(1,2),spin,phase,hij)
|
call get_single_excitation_from_fock_complex(key_i,key_j,exc(1,1),exc(1,2),spin,phase,hij)
|
||||||
end
|
end
|
||||||
|
|
||||||
subroutine i_H_j_double_spin_complex(key_i,key_j,Nint,hij)
|
subroutine i_H_j_double_spin_complex(key_i,key_j,Nint,hij)
|
||||||
|
Loading…
Reference in New Issue
Block a user