Commit 457bb725 authored by Daniel Wortmann's avatar Daniel Wortmann
Browse files

Remove unsued loop that prevents compilation

parent ea23cb2f
......@@ -4209,7 +4209,7 @@ module m_jpSetupDynMat
! ---> put stars onto the large fft-grid "tempGrid"
! NOTE: Upper bound stars%kimax does not exist anymore and was replaced.
DO istar=0, (2*stars%mx1+1)* (2*stars%mx2+1)* (2*stars%mx3+1)-1
!DO istar=0, (2*stars%mx1+1)* (2*stars%mx2+1)* (2*stars%mx3+1)-1
! vEff0IR is already warped and only has to be decorated with the phase for non-symorphic systems
! tempGrid(stars%igfft(istar, 2)) = vEff0IR(stars%igfft(istar, 1), 1) * stars%pgfft(istar) ! changed!
! tempGridOvl(stars%igfft(istar, 2)) = stars%ustep(stars%igfft(istar, 1)) * stars%pgfft(istar) ! changed!
......
Supports Markdown
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