Commit ed4b8751 authored by Miriam Hinzen's avatar Miriam Hinzen

merge

parents e11f4835 8ee9d1e1
...@@ -175,7 +175,6 @@ contains ...@@ -175,7 +175,6 @@ contains
! MUFFIN-TIN POTENTIAL ! MUFFIN-TIN POTENTIAL
call timestart( "MT-spheres" ) call timestart( "MT-spheres" )
#ifdef CPP_MPI
call MPI_BCAST( den%mt, atoms%jmtd * ( 1 + sphhar%nlhd ) * atoms%ntype * dimension%jspd, MPI_DOUBLE_PRECISION, 0, mpi%mpi_comm, ierr ) call MPI_BCAST( den%mt, atoms%jmtd * ( 1 + sphhar%nlhd ) * atoms%ntype * dimension%jspd, MPI_DOUBLE_PRECISION, 0, mpi%mpi_comm, ierr )
#endif #endif
call vmts( input, mpi, stars, sphhar, atoms, sym, cell, oneD, vCoul%pw(:,ispin), & call vmts( input, mpi, stars, sphhar, atoms, sym, cell, oneD, vCoul%pw(:,ispin), &
......
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