non-converging simulation is an error
This commit is contained in:
parent
26e6328664
commit
7072ab0984
12
src/IO.f90
12
src/IO.f90
|
@ -524,16 +524,8 @@ subroutine IO_error(error_ID,el,ip,g,instance,ext_msg)
|
|||
msg = 'mixed boundary conditions allow rotation'
|
||||
case (839)
|
||||
msg = 'non-positive restart frequency in grid load case'
|
||||
case (841)
|
||||
msg = 'missing header length info in grid mesh'
|
||||
case (842)
|
||||
msg = 'incomplete information in grid mesh header'
|
||||
case (843)
|
||||
msg = 'material count mismatch'
|
||||
case (844)
|
||||
msg = 'invalid VTR file'
|
||||
case (846)
|
||||
msg = 'rotation for load case rotation ill-defined (R:RT != I)'
|
||||
case (891)
|
||||
msg = 'unknown solver type selected'
|
||||
case (892)
|
||||
|
@ -541,6 +533,8 @@ subroutine IO_error(error_ID,el,ip,g,instance,ext_msg)
|
|||
case (894)
|
||||
msg = 'MPI error'
|
||||
|
||||
case (950)
|
||||
msg = 'max number of cut back exceeded, terminating'
|
||||
|
||||
!-------------------------------------------------------------------------------------------------
|
||||
! general error messages
|
||||
|
@ -606,8 +600,6 @@ subroutine IO_warning(warning_ID,el,ip,g,ext_msg)
|
|||
msg = 'unknown crystal symmetry'
|
||||
case (709)
|
||||
msg = 'read only the first document'
|
||||
case (850)
|
||||
msg = 'max number of cut back exceeded, terminating'
|
||||
case default
|
||||
msg = 'unknown warning number'
|
||||
end select
|
||||
|
|
|
@ -441,9 +441,8 @@ program DAMASK_grid
|
|||
timeinc = timeinc/real(subStepFactor,pReal) ! cut timestep
|
||||
print'(/,a)', ' cutting back '
|
||||
else ! no more options to continue
|
||||
call IO_warning(850)
|
||||
if (worldrank == 0) close(statUnit)
|
||||
call quit(0)
|
||||
call IO_error(950)
|
||||
endif
|
||||
|
||||
enddo subStepLooping
|
||||
|
|
Loading…
Reference in New Issue