Skip to content
Snippets Groups Projects
Commit 01174c61 authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann
Browse files

avoid spamming ad the end of sim if exit normal

parent 6640dd9f
No related branches found
No related tags found
No related merge requests found
...@@ -9,7 +9,7 @@ SUBROUTINE endrun ...@@ -9,7 +9,7 @@ SUBROUTINE endrun
IF( nlend ) THEN IF( nlend ) THEN
!---------------------------------------------------------------------- !----------------------------------------------------------------------
! 1. Normal end of run ! 1. Normal end of run
WRITE(*,'(/a)') ' Normal exit' IF(my_id .EQ. 0) WRITE(*,'(/a)') ' Normal exit'
!---------------------------------------------------------------------- !----------------------------------------------------------------------
! 2. Abnormal exit ! 2. Abnormal exit
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment