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

Mismatched dimensions in one of the calls to dot_product

This commit is contained in:
Paolo Giannozzi 2020-07-18 09:39:32 +00:00
parent 07fb9366d8
commit 6e0fbdf221
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/drhodvloc.f90
View File

@ -54,7 +54,7 @@ subroutine drhodvloc (nu_i0, npe, drhoscf, wdyn)
do is = 1, nspin_lsda
! FIXME : use zgemm instead of dot_product
dynwrk (nu_i, nu_j) = dynwrk (nu_i, nu_j) + &
dot_product(drhoscf (:, is, ipert), dvloc) * &
dot_product(drhoscf (1:dffts%nnr, is, ipert), dvloc) * &
omega / (dffts%nr1 * dffts%nr2 * dffts%nr3)
enddo
enddo