Commit 340f9d6a authored by Marco Govoni's avatar Marco Govoni
Browse files

Update davidson_diago.f90

parent 7024fc76
......@@ -192,9 +192,7 @@ SUBROUTINE davidson_diago_gamma ( )
ENDDO
!
pccg_res_tr2 = -1._DP
PRINT*, "HERE1"
CALL apply_operator ( mloc, dvg(1,mstart), dng(1,mstart), pccg_res_tr2, 1 )
PRINT*, "HERE2"
dav_iter = -1
IF(n_steps_write_restart == 1) CALL wstat_restart_write( dav_iter, notcnv, nbase, ew, hr_distr, vr_distr )
!
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment