From caf0ac7e8da8ae7dcc550e4a3f0807cead37beb1 Mon Sep 17 00:00:00 2001
From: Martin	Diehl <m.diehl@mpie.de>
Date: Tue, 1 Sep 2015 16:53:48 +0000
Subject: [PATCH] more verbose

---
 code/DAMASK_spectral_driver.f90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/code/DAMASK_spectral_driver.f90 b/code/DAMASK_spectral_driver.f90
index 111c56e3c..b450eebf6 100644
--- a/code/DAMASK_spectral_driver.f90
+++ b/code/DAMASK_spectral_driver.f90
@@ -437,6 +437,8 @@ program DAMASK_spectral_Driver
                          (outputIndex(2)-outputIndex(1)+1)*materialpoint_sizeResults,&
                          MPI_DOUBLE, MPI_STATUS_IGNORE, ierr)
    enddo
+   if (worldrank == 0) &
+     write(6,'(1/,a)') ' ... writing initial configuration to file ........................'
  endif
 !--------------------------------------------------------------------------------------------------
 ! loopping over loadcases