Variables dvxc_rr, dvxc_sr, dvxc_ss, dvxc_s were declared intent OUT but I'mp pretty sure they should have been intent IN, as they are used here, not defined

This commit is contained in:
Lorenzo Paulatto (naquite) 2018-04-23 10:25:28 +02:00
parent 018a8185d9
commit 3dc516aace
1 changed files with 1 additions and 1 deletions

View File

@ -28,7 +28,7 @@ subroutine dgradcorr (dfft, rho, grho, dvxc_rr, dvxc_sr, dvxc_ss, &
!
REAL(DP), INTENT(IN) ::rho (dfft%nnr, nspin), grho (3, dfft%nnr, nspin0), &
g (3, dfft%ngm), xq(3)
REAL(DP), INTENT(OUT) :: &
REAL(DP), INTENT(IN) :: &
dvxc_rr(dfft%nnr, nspin0, nspin0), dvxc_sr (dfft%nnr, nspin0, nspin0), &
dvxc_ss (dfft%nnr,nspin0, nspin0), dvxc_s (dfft%nnr, nspin0, nspin0)
COMPLEX(DP), INTENT(IN) :: drho (dfft%nnr, nspin)