Searched defs:w90_kmesh_get (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | wannier90.F | 341 SUBROUTINE w90_kmesh_get() subroutine
345 REAL(kind=dp), PARAMETER :: eta = 99999999.0_dp
347 INTEGER :: counter, i, ifound, j, l, loop, loop_b, loop_s, m, multi(search_shells), n, na, &
348 nap, ndnn, ndnntot, ndnnx, nkp, nkp2, nlist, nn, nnsh, nnshell(num_kpts, search_shells), &
349 nnx, shell
350 LOGICAL :: isneg, ispos
351 REAL(kind=dp) :: bb1, bbn, bk_local(3, num_nnmax, num_kpts), bweight(max_shells), ddelta, &
352 dist, dnn(search_shells), dnn0, dnn1, vkpp(3), vkpp2(3), wb_local(num_nnmax)
353 REAL(kind=dp), ALLOCATABLE :: bvec_tmp(:, :)
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | wannier90.F | 341 SUBROUTINE w90_kmesh_get() subroutine
345 REAL(kind=dp), PARAMETER :: eta = 99999999.0_dp
347 INTEGER :: counter, i, ifound, j, l, loop, loop_b, loop_s, m, multi(search_shells), n, na, &
348 nap, ndnn, ndnntot, ndnnx, nkp, nkp2, nlist, nn, nnsh, nnshell(num_kpts, search_shells), &
349 nnx, shell
350 LOGICAL :: isneg, ispos
351 REAL(kind=dp) :: bb1, bbn, bk_local(3, num_nnmax, num_kpts), bweight(max_shells), ddelta, &
352 dist, dnn(search_shells), dnn0, dnn1, vkpp(3), vkpp2(3), wb_local(num_nnmax)
353 REAL(kind=dp), ALLOCATABLE :: bvec_tmp(:, :)
|