Merge branch 'fix-hubbard-stress' into 'develop'

GPU Hubbard stress crash after recent changes

See merge request QEF/q-e!2170
This commit is contained in:
giannozz 2023-10-29 07:19:49 +00:00
commit 8a94e38e0f
1 changed files with 4 additions and 0 deletions

View File

@ -176,11 +176,15 @@ SUBROUTINE stres_hub ( sigmah )
!
! proj=<wfcU|S|evc>
IF (gamma_only) THEN
!$acc data create(projrd)
CALL calbec( offload_type, npw, wfcU, spsi, projrd )
!$acc update self(projrd)
!$acc end data
ELSE
!$acc data create(projkd)
CALL calbec( offload_type, npw, wfcU, spsi, projkd )
!$acc update self(projkd)
!$acc end data
ENDIF
!
! Compute derivatives of spherical harmonics and spherical Bessel functions