Searched refs:imycolinv (Results 1 – 3 of 3) sorted by relevance
/dports/science/berkeleygw/BGW-2.0.0/Epsilon/ |
H A D | epsinv.f90 | 718 epsdiagt(1,jj,1)=dble(eps(scal%imyrowinv(jj),scal%imycolinv(jj))) 720 epsdiagt(2,jj,1)=IMAG(eps(scal%imyrowinv(jj),scal%imycolinv(jj))) 723 epsdiagt(1,jj,1)=dble(epsRDyn(scal%imyrowinv(jj),scal%imycolinv(jj),1)) 724 epsdiagt(2,jj,1)=IMAG(epsRDyn(scal%imyrowinv(jj),scal%imycolinv(jj),1))
|
H A D | epsilon_main.f90 | 490 SAFE_ALLOCATE(scal%imycolinv, (pol%nmtx)) 517 scal%imycolinv(ig_g) = ig_l 1314 SAFE_DEALLOCATE_P(scal%imycolinv)
|
/dports/science/berkeleygw/BGW-2.0.0/Common/ |
H A D | scalapack.f90 | 63 integer, pointer :: imycolinv(:) !< inverse of imycol component
|