From 04c2b2276641fe9a28cfa2279804cdad2be64eb8 Mon Sep 17 00:00:00 2001
From: Martin	Diehl <m.diehl@mpie.de>
Date: Tue, 26 Feb 2013 12:49:07 +0000
Subject: [PATCH] removed time information from interface routines, should work
 now

---
 code/DAMASK_abaqus_exp.f | 4 +---
 code/DAMASK_abaqus_std.f | 3 ---
 code/DAMASK_marc.f90     | 5 +----
 3 files changed, 2 insertions(+), 10 deletions(-)

diff --git a/code/DAMASK_abaqus_exp.f b/code/DAMASK_abaqus_exp.f
index b92c74fcb..95bb1caa8 100644
--- a/code/DAMASK_abaqus_exp.f
+++ b/code/DAMASK_abaqus_exp.f
@@ -60,12 +60,10 @@ contains
 !--------------------
 subroutine DAMASK_interface_init()
 !--------------------
-  use IO, only: IO_timeStamp
-  
+
   write(6,*)
   write(6,*) '<<<+-  DAMASK_abaqus init  -+>>>'
   write(6,*) '$Id$'
-  write(6,'(a16,a)')   ' Current time : ',IO_timeStamp()
 #include "compilation_info.f90"  
   write(6,*)
 
diff --git a/code/DAMASK_abaqus_std.f b/code/DAMASK_abaqus_std.f
index aded27206..f4cd8b0b7 100644
--- a/code/DAMASK_abaqus_std.f
+++ b/code/DAMASK_abaqus_std.f
@@ -60,12 +60,9 @@ contains
 !--------------------
 subroutine DAMASK_interface_init()
 !--------------------
-  use IO, only: IO_timeStamp
-  
   write(6,*)
   write(6,*) '<<<+-  DAMASK_abaqus init  -+>>>'
   write(6,*) '$Id$'
-  write(6,'(a16,a)')   ' Current time : ',IO_timeStamp()
 #include "compilation_info.f90"  
   write(6,*)
 
diff --git a/code/DAMASK_marc.f90 b/code/DAMASK_marc.f90
index 078a922f8..d8c58989f 100644
--- a/code/DAMASK_marc.f90
+++ b/code/DAMASK_marc.f90
@@ -66,7 +66,6 @@
 #define Marc
 
 #include "prec.f90"
-#include "IO.f90"
 
 module DAMASK_interface
  use prec, only: pInt
@@ -79,15 +78,12 @@ contains
 
 subroutine DAMASK_interface_init
 
-use IO, only: IO_timeStamp
-
 implicit none
 
 !$OMP CRITICAL (write2out)
  write(6,*)
  write(6,*) '<<<+-  DAMASK_marc init  -+>>>'
  write(6,*) '$Id$'
- write(6,'(a16,a)')   ' Current time : ',IO_timeStamp()
 #include "compilation_info.f90"
 !$OMP END CRITICAL (write2out)
 
@@ -128,6 +124,7 @@ end function getSolverJobName
 
 end module DAMASK_interface
 
+#include "IO.f90"
 #include "numerics.f90"
 #include "debug.f90"
 #include "math.f90"