10
1
mirror of https://github.com/pfloos/quack synced 2025-05-06 15:14:55 +02:00

removed unnecessary sort

This commit is contained in:
Loris Burth 2025-04-02 20:00:56 +02:00
parent 12a87a9f45
commit 7d81113730

View File

@ -200,7 +200,6 @@ subroutine complex_diagonalize_matrix_without_sort(N,A,e)
allocate(work(lwork))
call zgeev('N','V',N,A,N,e,VL,N,VR,N,work,lwork,rwork,info)
call complex_sort_eigenvalues(N,e,VR)
deallocate(work)