Commit 48113773 authored by Uliana Alekseeva's avatar Uliana Alekseeva

Output was corrected to prevent the debug-version from crushing.

parent 0d664403
......@@ -115,7 +115,7 @@
#ifdef CPP_MPI
CALL MPI_COMM_RANK(MPI_COMM_WORLD,irank,ierr)
#endif
WRITE(*,"(i3,3a,i10)") irank," started: ",current_timer%name," at:",cputime()
WRITE(*,"(i3,3a,i10)") irank," started: ",current_timer%name
#endif
RETURN
ENDIF
......
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