Home
last modified time | relevance | path

Searched refs:becsum_nc (Results 1 – 9 of 9) sorted by relevance

/dports/science/quantum-espresso/q-e-qe-6.7.0/PW/src/
H A Dtransform_becsum_nc.f9040 becsum_nc(ijh,na,1,1)+becsum_nc(ijh,na,2,2)
43 becsum_nc(ijh,na,1,2)+becsum_nc(ijh,na,2,1)
45 (becsum_nc(ijh,na,1,2)-becsum_nc(ijh,na,2,1))
47 becsum_nc(ijh,na,1,1)-becsum_nc(ijh,na,2,2)
52 (becsum_nc(ijh,na,1,1)+becsum_nc(ijh,na,2,2)) &
53 + CONJG(becsum_nc(ijh,na,1,1)+becsum_nc(ijh,na,2,2))
56 becsum_nc(ijh,na,1,2)+becsum_nc(ijh,na,2,1) &
57 + CONJG(becsum_nc(ijh,na,2,1)+becsum_nc(ijh,na,1,2))
59 (becsum_nc(ijh,na,1,2)-becsum_nc(ijh,na,2,1) &
62 (becsum_nc(ijh,na,1,1)-becsum_nc(ijh,na,2,2)) &
[all …]
H A Dtransform_becsum_so.f9053 fac=becsum_nc(ijh_l,na,is1,is2)
55 fac=CONJG(becsum_nc(ijh_l,na,is2,is1))
H A Dsum_band.f901140 COMPLEX(DP), INTENT(IN) :: becsum_nc(nh(np),npol,nh(np),npol) local
1158 DBLE( becsum_nc(ih,1,jh,1) + becsum_nc(ih,2,jh,2) )
1161 DBLE( becsum_nc(ih,1,jh,2) + becsum_nc(ih,2,jh,1) )
1163 (becsum_nc(ih,1,jh,2) - becsum_nc(ih,2,jh,1)) )
1165 DBLE( becsum_nc(ih,1,jh,1) - becsum_nc(ih,2,jh,2) )
1192 COMPLEX(DP), INTENT(IN) :: becsum_nc(nh(np),npol,nh(np),npol) local
1211 fac=becsum_nc(kh,is1,lh,is2)
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/PH/
H A Dcompute_becsum_ph.f9030 USE phus, ONLY : alphasum, alphasum_nc, becsum_nc
46 IF (noncolin) becsum_nc = (0.d0,0.d0)
66 becsum_nc(ijh,na,is1,is2) = &
67 becsum_nc(ijh,na,is1,is2) + wgg1* &
87 becsum_nc(ijh,na,is1,is2) = &
88 becsum_nc(ijh,na,is1,is2)+ wgg1 * &
119 CALL transform_becsum_so(becsum_nc,becsum,na)
121 CALL transform_becsum_nc(becsum_nc,becsum,na)
H A Daddusdynmat.f9029 int5, int5_so, alphasum, alphasum_nc, becsum_nc
79 becsum_nc(ijh,na,is1,is2)
83 CONJG(becsum_nc(ijh,na,is2,is1))
167 becsum_nc(ijh,na,is1,is2)
173 CONJG(becsum_nc(ijh,na,is2,is1))
H A Ddeallocate_phq.f9023 int4, int4_nc, int5, int5_so, becsum_nc, &
100 if(allocated(becsum_nc)) deallocate(becsum_nc)
H A Dallocate_phq.f9034 alphasum, alphasum_nc, becsum_nc, alphap
129 ALLOCATE(becsum_nc( nhm*(nhm+1)/2, nat, npol, npol))
H A Dphcom.f90150 becsum_nc(:,:,:,:), &! nhm*(nhm+1)/2,nat,npol,npol) variable
/dports/science/quantum-espresso/q-e-qe-6.7.0/PWCOND/src/
H A Dscat_states_plot.f90254 becsum_nc(:,:,:,:), vec1(:), kfunz(:,:,:) local
275 IF (noncolin) ALLOCATE(becsum_nc(nhm*(nhm+1)/2,nat,npol,npol))
404 becsum_nc(ijh,iat,is,js) = &
417 becsum_nc(ijh,iat,is,js) = &
430 CALL transform_becsum_so(becsum_nc,becsum,iat)
432 CALL transform_becsum_nc(becsum_nc,becsum,iat)
606 IF (noncolin) DEALLOCATE(becsum_nc)