Home
last modified time | relevance | path

Searched refs:intw1 (Results 1 – 8 of 8) sorted by relevance

/dports/science/quantum-espresso/q-e-qe-6.7.0/PWCOND/src/
H A Drotproc.f9012 fundl1, intw1, intw2, n2d, norbf, norb, nrzp) argument
213 vec(n2d+lam, 2*n2d+iorb1)*intw1(iorb, n2d+lam)
222 intw1(iorb, n)=intw1(iorb, n)+ &
223 vec(n2d+lam, n)*intw1(iorb, n2d+lam)
227 intw1(iorb, n2d+n)=x(n)
252 vec(lam, 2*n2d+iorb1)*intw1(iorb, lam)
260 x(n)=x(n)+vec(lam, n)*intw1(iorb, lam)
261 intw1(iorb, n2d+n)=intw1(iorb, n2d+n)+ &
262 vec(lam, n2d+n)*intw1(iorb, lam)
266 intw1(iorb, n)=x(n)
[all …]
H A Dscatter_forw.f90105 intw1=(0.d0,0.d0)
322 f_aux(i,j) = intw1(i,j)
326 xmat(1,n2d+1),2*n2d,one,intw1(1,n2d+1),norbf*npol)
330 2*n2d,zero,intw1,norbf*npol)
378 intw1(iorb,n) = intw1(iorb,n) + xmat(n2d+lam,n)*ci(iorb,lam)
379 intw1(iorb,n2d+n) = intw1(iorb,n2d+n) + &
382 intw1(iorb,n)=intw1(iorb,n)+di(iorb,n)
485 CALL dscal(2*norbf*npol*2*n2d, sarea, intw1, 1)
495 fundl1, intw1, intw2, n2d, norbf, norb, nrzp)
H A Dcompbs.f90156 zps_nc(aorb, iorb1)*intw1(iorb1,n)
158 bmat(2*n2d+iorb,n)-zps_nc(borb,iorb1)*intw1(iorb1,n)
161 zps(aorb,iorb1)*intw1(iorb1,n)
163 bmat(2*n2d+iorb,n)-zps(borb,iorb1)*intw1(iorb1,n)
245 kfun, kfund, vec, kval, intw1, intw2, nchan, npol)
363 intw1(iorb1,ig)*vec(ig,ik)
374 x1 = x1 + intw1(iorb,ig)*vec(ig,ik)
H A Dfree_mem.f9046 deallocate(intw1)
H A Dtransmit.f90168 zps_nc(iorb,iorb1)*intw1(iorb1,n)
171 zps(iorb,iorb1)*intw1(iorb1,n)
384 xi1(ipol) = xi1(ipol)+intw1(iorba, ig)*vec2(ig, n)
H A Dallocate_cond.f9059 allocate( intw1(norbf*npol, 2*n2d) )
H A Dcondcom.f90195 intw1(:,:), &! integrals with beta-fun. of loc. fun. variable
H A Dscat_states_plot.f90229 USE cond, ONLY : ngper, newbg, intw1, intw2, &
328 intw1(iorb,ir)*vec(ir,ichan)