Home
last modified time | relevance | path

Searched refs:nsupcell (Results 1 – 3 of 3) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dwannier90.F110 INTEGER, PARAMETER :: nsupcell = 5 variable
111 INTEGER :: lmn(3, (2*nsupcell + 1)**3)
369 DO loop = 1, (2*nsupcell + 1)**3
480 DO loop = 1, (2*nsupcell + 1)**3
666 DO l = -nsupcell, nsupcell
667 DO m = -nsupcell, nsupcell
668 DO n = -nsupcell, nsupcell
678 DO loop = (2*nsupcell + 1)**3, 1, -1
702 REAL(kind=dp), INTENT(in) :: dist((2*nsupcell + 1)**3)
714 DO loop = 1, (2*nsupcell + 1)**3
[all …]
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dwannier90.F110 INTEGER, PARAMETER :: nsupcell = 5 variable
111 INTEGER :: lmn(3, (2*nsupcell + 1)**3)
369 DO loop = 1, (2*nsupcell + 1)**3
480 DO loop = 1, (2*nsupcell + 1)**3
666 DO l = -nsupcell, nsupcell
667 DO m = -nsupcell, nsupcell
668 DO n = -nsupcell, nsupcell
678 DO loop = (2*nsupcell + 1)**3, 1, -1
702 REAL(kind=dp), INTENT(in) :: dist((2*nsupcell + 1)**3)
714 DO loop = 1, (2*nsupcell + 1)**3
[all …]
/dports/science/wannier90/wannier90-3.1.0/src/
H A Dkmesh.F9048 integer, parameter :: nsupcell = 5 variable
51 integer :: lmn(3, (2*nsupcell + 1)**3)
106 do loop = 1, (2*nsupcell + 1)**3
292 do loop = 1, (2*nsupcell + 1)**3
324 ok2: do loop = 1, (2*nsupcell + 1)**3
829 do l = -nsupcell, nsupcell
830 do m = -nsupcell, nsupcell
831 do n = -nsupcell, nsupcell
841 do loop = (2*nsupcell + 1)**3, 1, -1
879 ok: do loop = 1, (2*nsupcell + 1)**3
[all …]