Commit ffac5842 authored by ccavazzoni's avatar ccavazzoni

- minor change


git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@13746 c92efa57-630b-4861-b058-cf58834340f0
parent 043daa26
......@@ -196,7 +196,7 @@ CONTAINS
rhor(ir,isup)= DBLE(psi(ir))
rhor(ir,isdw)=AIMAG(psi(ir))
END DO
!$omp end parallel do
!$omp end parallel do
ENDIF
!
ELSE
......
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