Lines Matching refs:izp
1076 integer ip,jp,iat,jat,izp,jzp,ish,jsh,icao,jcao,iao,jao,jshmax
1099 izp = at(iat)
1106 do ish = 1,nShell(izp)
1107 ishtyp = angShell(ish,izp)
1153 izp = at(iat)
1154 do ish = 1, nShell(izp)
1155 ishtyp = angShell(ish,izp)
1165 jshtyp = angShell(jsh,izp)
1304 integer ip,jp,iat,jat,izp,jzp,ish,jsh,icao,jcao,iao,jao,jshmax
1341 izp = at(iat)
1343 do ish = 1, nShell(izp)
1344 ishtyp = angShell(ish,izp)
1732 izp = at(iat)
1733 do ish = 1, nShell(izp)
1734 ishtyp = angShell(ish,izp)
1745 jshtyp = angShell(jsh,izp)