removed unneccesary detail from general error message, now caller gives specifics
This commit is contained in:
parent
e211fa614a
commit
330906d08f
|
@ -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
|
||||||
|
|
|
@ -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
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue