Commit 0abd0707 authored by Gregor Michalicek's avatar Gregor Michalicek

Cleanup of main/mix.F90

parent 95ccdce6
......@@ -655,7 +655,7 @@ CONTAINS
!
CALL timestart("mixing")
IF (mpi%irank==0) WRITE(*,"(a)",advance="no") "* Mixing distance: "
CALL mix(stars,atoms,sphhar,vacuum,input,sym,cell,it,noco,oneD,hybrid,inDen,outDen,results)
CALL mix(stars,atoms,sphhar,vacuum,input,sym,cell,noco,oneD,hybrid,inDen,outDen,results)
!
CALL timestop("mixing")
WRITE (6,FMT=8130) it
......
This diff is collapsed.
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