mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-09-01 21:53:40 +02:00
changed threshold in src/non_hermit_dav/biorthog.irp.f
This commit is contained in:
parent
877d1e621a
commit
f00c234782
@ -314,7 +314,7 @@ subroutine non_hrmt_bieig(n, A, leigvec, reigvec, n_real_eigv, eigval)
|
||||
! write(*, '(1000(F16.10,X))') VL(:,i)
|
||||
!enddo
|
||||
|
||||
thr_diag = 1d-10
|
||||
thr_diag = 1d-08
|
||||
thr_norm = 1d+10
|
||||
call check_EIGVEC(n, n, A, WR, VL, VR, thr_diag, thr_norm, .false.)
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user