223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

removed division by zero from debug_reset(), uses huge() now

This commit is contained in:
Franz Roters 2011-03-24 07:38:56 +00:00
parent 78d4e7d1dc
commit fa323f3f0b
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
code/debug.f90
View File

@ -177,10 +177,10 @@ subroutine debug_reset()
debug_stressMinLocation = 0_pInt
debug_jacobianMaxLocation = 0_pInt
debug_jacobianMinLocation = 0_pInt
debug_stressMax = - 1.0_pReal / 0.0_pReal
debug_stressMin = + 1.0_pReal / 0.0_pReal
debug_jacobianMax = - 1.0_pReal / 0.0_pReal
debug_jacobianMin = + 1.0_pReal / 0.0_pReal
debug_stressMax = -huge(1.0_pReal)
debug_stressMin = huge(1.0_pReal)
debug_jacobianMax = -huge(1.0_pReal)
debug_jacobianMin = huge(1.0_pReal)
endsubroutine