removed unneccesary detail from general error message, now caller gives specifics

This commit is contained in:
Philip Eisenlohr 2017-09-19 08:06:44 -04:00
parent e211fa614a
commit 330906d08f
2 changed files with 2 additions and 2 deletions

View File

@ -1587,7 +1587,7 @@ subroutine IO_error(error_ID,el,ip,g,instance,ext_msg)
case (601_pInt) case (601_pInt)
msg = 'Ping-Pong needed when using non-local plasticity' msg = 'Ping-Pong needed when using non-local plasticity'
case (602_pInt) case (602_pInt)
msg = 'invalid element/IP/component (grain) selected for debug' msg = 'invalid selection for debug'
!------------------------------------------------------------------------------------------------- !-------------------------------------------------------------------------------------------------
! DAMASK_marc errors ! DAMASK_marc errors

View File

@ -471,7 +471,7 @@ subroutine homogenization_init
flush(6) flush(6)
if (debug_g < 1 .or. debug_g > homogenization_Ngrains(mesh_element(3,debug_e))) & 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 end subroutine homogenization_init