Commit 48113773 authored by Uliana Alekseeva's avatar Uliana Alekseeva
Browse files

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
......
Supports Markdown
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