Commit 673fa4f9 authored by Daniel Wortmann's avatar Daniel Wortmann

Removed time IO for each iteration

parent e19b2363
...@@ -185,7 +185,7 @@ CONTAINS ...@@ -185,7 +185,7 @@ CONTAINS
!!$ input%alpha = input%alpha - NINT(input%alpha) !!$ input%alpha = input%alpha - NINT(input%alpha)
!!$ END IF !!$ END IF
CALL resetIterationDependentTimers() !CALL resetIterationDependentTimers()
CALL timestart("Iteration") CALL timestart("Iteration")
IF (mpi%irank.EQ.0) THEN IF (mpi%irank.EQ.0) THEN
WRITE (6,FMT=8100) iter WRITE (6,FMT=8100) iter
...@@ -449,7 +449,7 @@ CONTAINS ...@@ -449,7 +449,7 @@ CONTAINS
CALL check_time_for_next_iteration(iter,l_cont) CALL check_time_for_next_iteration(iter,l_cont)
END IF END IF
CALL writeTimesXML() !CALL writeTimesXML()
IF ((mpi%irank.EQ.0).AND.(isCurrentXMLElement("iteration"))) THEN IF ((mpi%irank.EQ.0).AND.(isCurrentXMLElement("iteration"))) THEN
CALL closeXMLElement('iteration') CALL closeXMLElement('iteration')
......
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