mirror of
https://github.com/pfloos/quack
synced 2025-05-06 23:24:58 +02:00
changed DIIS extrapolation
This commit is contained in:
parent
7e10d0a01d
commit
fcfcec6f43
@ -47,8 +47,6 @@ subroutine complex_DIIS_extrapolation(rcond,n_err,n_e,n_diis,error,e,error_in,e_
|
|||||||
|
|
||||||
! Solve linear system
|
! Solve linear system
|
||||||
call complex_linear_solve(n_diis+1,A,b,w,rcond)
|
call complex_linear_solve(n_diis+1,A,b,w,rcond)
|
||||||
! Perform extrapolation only if the system is well-conditioned
|
|
||||||
e_inout(:) = matmul(w(1:n_diis),transpose(e(:,1:n_diis)))
|
|
||||||
|
|
||||||
! Extrapolate
|
! Extrapolate
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user