Searched refs:ivown (Results 1 – 1 of 1) sorted by relevance
/dports/science/berkeleygw/BGW-2.0.0/BSE/ |
H A D | genwf_kernel.f90 | 38 integer :: ivown,icown,ikown,invband,incband,ijk local 68 ivown = peinf%ipev(peinf%inode+1,iv,kg%indr(ik)) 126 vcg(1:vng,1,:) = intwfnv%cg(1:vng,ivown,:) 129 vcg(1:vng,:,:) = intwfnv%cg(1:vng,ivown:ivown+xct%nvb_co-1,:)
|