Commit 47851ac7 authored by Matthias Redies's avatar Matthias Redies

recomment IS part

parent 77291aae
This diff is collapsed.
......@@ -45,10 +45,10 @@ CONTAINS
nkqpt = kpts%get_nk(kqpt)
IF (.not. kpts%is_kpt(kqpt)) call juDFT_error('wavefproducts: k-point not found')
!call wavefproducts_noinv5_IS(bandi, bandf, bandoi, bandof, nk, iq, g_t,&
! dimension, input, jsp, cell, atoms, mpbasis, hybrid,&
! hybdat, kpts, lapw, sym, nbasm_mt, noco,&
! nkqpt, cprod)
call wavefproducts_noinv5_IS(bandi, bandf, bandoi, bandof, nk, iq, g_t,&
dimension, input, jsp, cell, atoms, mpbasis, hybrid,&
hybdat, kpts, lapw, sym, nbasm_mt, noco,&
nkqpt, cprod)
call wavefproducts_noinv_MT(bandi, bandf, bandoi, bandof, nk, iq, &
dimension, atoms, mpbasis, hybrid, hybdat, kpts, &
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment