Commit d7d240ff authored by Matthias Redies's avatar Matthias Redies

fix build

parent 1b59d41a
......@@ -44,7 +44,6 @@ CONTAINS
TYPE(t_atoms), INTENT(IN) :: atoms
TYPE(t_mat), INTENT(IN) :: zmat(:) !for all kpoints
INTEGER, INTENT(IN) :: kpts%nkpt
INTEGER, INTENT(IN) :: jsp
REAL, INTENT(IN) :: vr0(:, :, :)!(jmtd,ntype,jspd)
......
......@@ -151,7 +151,7 @@ CONTAINS
SUBROUTINE waveftrafo_genwavf( &
cmt, z_in, nk, iop, atoms, &
mpdata, hybinp, kpts, sym, jsp, input, nbands, &
lapw_nk, lapw_rkpt, cmt_out, ,z_out)
lapw_nk, lapw_rkpt, cmt_out, z_out)
use m_juDFT
USE m_constants
......
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