Home
last modified time | relevance | path

Searched defs:mkPAWmatelX1 (Results 1 – 2 of 2) sorted by relevance

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/gw/Transfer/
H A Dmkpol.f901435 subroutine mkPAWmatelX1(pi,iocc,iunocc,ikk,jkk,qq,igg, & subroutine
1442 integer :: iocc,iunocc,ikk(3),jkk(3),igg(3),nbcore,ncband
1443 double precision :: qq(3),pi
1444 double complex :: pwmatel(ntypat,nlmnmax,nlmnmax),tpwmatel(ntypat,nlmnmax,nlmnmax)
1445 double complex :: amatel,phase
1446 integer :: iorb,jorb,iat,itpaw,ikv,jkv
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/gw/Transfer/
H A Dmkpol.f901435 subroutine mkPAWmatelX1(pi,iocc,iunocc,ikk,jkk,qq,igg, & subroutine
1442 integer :: iocc,iunocc,ikk(3),jkk(3),igg(3),nbcore,ncband
1443 double precision :: qq(3),pi
1444 double complex :: pwmatel(ntypat,nlmnmax,nlmnmax),tpwmatel(ntypat,nlmnmax,nlmnmax)
1445 double complex :: amatel,phase
1446 integer :: iorb,jorb,iat,itpaw,ikv,jkv