Remove an unused variable.

parent 49dbbdb5
Pipeline #148451599 passed with stage
in 0 seconds
......@@ -30,7 +30,7 @@ subroutine X(eigensolver_evolution)(namespace, mesh, st, hm, te, tol, niter, con
FLOAT, intent(out) :: diff(:) !< (1:st%nst)
FLOAT, intent(in) :: tau
integer :: ib, minst, maxst, ist, iter, maxiter, conv, convb, matvec, i
integer :: ib, minst, maxst, ist, iter, maxiter, conv, convb, matvec
R_TYPE, allocatable :: c(:, :), zeig(:), res(:)
FLOAT, allocatable :: eig(:), norm(:)
type(wfs_elec_t) :: hpsib
......
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