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

Some memory savings

This commit is contained in:
Ivan Carnimeo 2021-09-30 13:54:22 +02:00
parent b8473a049c
commit 1216181f07
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PW/src/force_us_gpu.f90
View File

@ -103,7 +103,7 @@ SUBROUTINE force_us_gpu( forcenl )
CALL using_evc_d(0)
DO ipol = 1, 3
!
!$acc data present(vkb(:,:), vkb1(npwx,nkb)) copyin(igk_k(:,:))
!$acc data present(vkb(:,:), vkb1(npwx,nkb), igk_k(:,:))
!$acc parallel loop collapse(2)
DO jkb = 1, nkb
DO ig = 1, npw