Commit 95bc0740 authored by Gregor Michalicek's avatar Gregor Michalicek

Assign nmop to nkpt3 in r_inpXML.F90

This is done to make gen_bz work with the XML code path.
parent f1e9cc3a
......@@ -1962,6 +1962,7 @@ SUBROUTINE r_inpXML(&
DO i = 1, kpts%nkpt
kpts%wtkpt(i) = kpts%wtkpt(i) / sumWeight
END DO
kpts%nkpt3(:) = kpts%nmop(:)
! Generate missing general parameters
......
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