Commit 725f11d1 authored by Matthias Redies's avatar Matthias Redies

add ifdefs for barrier

parent 80fc019a
......@@ -279,7 +279,9 @@ END IF
CALL calc_hybrid(eig_id,fi,mpdata,hybdat,fmpi,nococonv, stars,enpara,&
results,xcpot,vTot,iterHF)
END SELECT
#ifdef CPP_MPI
call MPI_Barrier(fmpi%mpi_comm, ierr)
#endif
IF(hybdat%l_calhf) THEN
call mixing_history_reset(fmpi)
iter = 0
......
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