scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Merge branch 'zdotc_again' into 'develop' 

Yet another dot_product mismatch in dimensions

See merge request QEF/q-e!1030
This commit is contained in:
giannozz 2020-07-18 13:50:55 +00:00
parent 56ed305893 197de6b86e
commit ed346c1f08
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PHonon/PH/drho.f90
View File

@ -156,7 +156,7 @@ subroutine drho
do is = 1, nspin_lsda
! FIXME: use zgemm instead of dot_product
wdyn (nu_j, nu_i) = wdyn (nu_j, nu_i) + &
dot_product (drhous(:,is,nu_j), dvlocin) * &
dot_product (drhous(1:dffts%nnr,is,nu_j), dvlocin) * &
omega / DBLE (nrstot)
enddo
enddo