From 330906d08ff6e6aa74e0f85e5a8da69c90e48a88 Mon Sep 17 00:00:00 2001
From: Philip Eisenlohr <eisenlohr@egr.msu.edu>
Date: Tue, 19 Sep 2017 08:06:44 -0400
Subject: [PATCH] removed unneccesary detail from general error message, now
 caller gives specifics

---
 src/IO.f90             | 2 +-
 src/homogenization.f90 | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/IO.f90 b/src/IO.f90
index 3d80feefa..ad6dcac23 100644
--- a/src/IO.f90
+++ b/src/IO.f90
@@ -1587,7 +1587,7 @@ subroutine IO_error(error_ID,el,ip,g,instance,ext_msg)
  case (601_pInt)
    msg = 'Ping-Pong needed when using non-local plasticity'
  case (602_pInt)
-   msg = 'invalid element/IP/component (grain) selected for debug'
+   msg = 'invalid selection for debug'
 
 !-------------------------------------------------------------------------------------------------
 ! DAMASK_marc errors
diff --git a/src/homogenization.f90 b/src/homogenization.f90
index c8c5fad01..93fe50631 100644
--- a/src/homogenization.f90
+++ b/src/homogenization.f90
@@ -471,7 +471,7 @@ subroutine homogenization_init
  flush(6)
 
  if (debug_g < 1 .or. debug_g > homogenization_Ngrains(mesh_element(3,debug_e))) &
-   call IO_error(602_pInt,ext_msg='component (grain)')
+   call IO_error(602_pInt,ext_msg='component (grain)', el=debug_e, g=debug_g)
 
 end subroutine homogenization_init