/dports/science/quantum-espresso/q-e-qe-6.7.0/PW/src/ |
H A D | exx_base.f90 | 186 REAL(DP), ALLOCATABLE :: temp_xkq(:,:), xk_collect(:,:) local 226 ALLOCATE( xk_collect(3,nkstot) ) 228 CALL poolcollect( 3, nks, xk, nkstot, xk_collect ) 245 xk_cryst(:) = xk_collect(:,ik) 388 CALL exx_grid_check( xk_collect(:,:) ) 389 DEALLOCATE( xk_collect ) 447 xk_cryst(:) = xk_collect(:,ik) 557 SUBROUTINE exx_grid_check( xk_collect ) argument 566 REAL(DP), INTENT(IN) :: xk_collect(:,:) local 580 xk_cryst(:) = xk_collect(:,ik) [all …]
|
H A D | us_exx.f90 | 818 REAL(dp), ALLOCATABLE :: xk_collect(:,:) local 855 ALLOCATE( xk_collect(3,nkstot) ) 856 CALL poolcollect( 3, nks, xk, nkstot, xk_collect ) 895 xk_collect(:,index_xk(ikq)), xkq_collect(:,ikq) ) 919 DEALLOCATE( xk_collect )
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PP/src/ |
H A D | bands.f90 | 442 REAL(DP), ALLOCATABLE :: xk_collect(:,:), et_collect(:,:) local 444 ALLOCATE(xk_collect(3,nkstot)) 446 CALL poolcollect( 3, nks, xk, nkstot, xk_collect) 465 xk0(:)=xk_collect(:,start_k) 469 dky(:)=xk_collect(:,start_k+1)-xk0(:) 476 IF (ABS(xk_collect(1,j)-xkdum(1))>eps8.OR. & 477 ABS(xk_collect(2,j)-xkdum(2))>eps8.OR. & 478 ABS(xk_collect(3,j)-xkdum(3))>eps8) THEN 480 dkx(:)=xk_collect(:,j)-xk0(:) 510 DEALLOCATE(xk_collect)
|
H A D | projwfc.f90 | 51 REAL (DP), allocatable :: xk_collect(:,:) variable 183 ALLOCATE(xk_collect(3,nkstot)) 184 CALL poolcollect(3, nks, xk, nkstot, xk_collect) 187 & nk1, nk2, nk3, nks2, xk_collect, 1) 189 DEALLOCATE(xk_collect)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/PH/ |
H A D | elphon.f90 | 744 REAL(DP), ALLOCATABLE :: xk_collect(:,:) local 769 ALLOCATE(xk_collect(3,nkstot)) 780 xk_collect(:,1:nks) = xk(:,1:nks) 792 CALL poolcollect(3, nks, xk, nkstot, xk_collect) 1127 DEALLOCATE( xk_collect ) 1457 ALLOCATE(xk_collect(3, nkstot)) 1466 CALL poolcollect(3, nks, xk, nkstot, xk_collect) 1475 xk_collect(1:3, 1:nks) = xk(1:3, 1:nks) 1485 CALL cryst_to_cart(nkstot, xk_collect, at, -1) 1531 CALL cryst_to_cart(nkstot, xk_collect, bg, 1) [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/test-suite/not_epw_comp/ |
H A D | elphon.f90 | 692 REAL(DP), ALLOCATABLE :: xk_collect(:,:) local 714 ALLOCATE(xk_collect(3,nkstot)) 725 xk_collect(:,1:nks) = xk(:,1:nks) 737 CALL poolcollect(3, nks, xk, nkstot, xk_collect) 1064 DEALLOCATE( xk_collect ) 1617 ALLOCATE(xk_collect(3, nkstot)) 1626 CALL poolcollect(3, nks, xk, nkstot, xk_collect) 1635 xk_collect(1:3, 1:nks) = xk(1:3, 1:nks) 1645 CALL cryst_to_cart(nkstot, xk_collect, at, -1) 1691 CALL cryst_to_cart(nkstot, xk_collect, bg, 1) [all …]
|