Merge branch 'clean-isobrittle' into 'development'

dot state is 0 in isibrittle

See merge request damask/DAMASK!612
This commit is contained in:
Martin Diehl 2022-07-03 14:32:21 +00:00
commit 9f4fc15273
1 changed files with 1 additions and 1 deletions

View File

@ -75,7 +75,7 @@ module function isobrittle_init() result(mySources)
if (prm%W_crit <= 0.0_pReal) extmsg = trim(extmsg)//' W_crit'
Nmembers = count(material_phaseID==ph)
call phase_allocateState(damageState(ph),Nmembers,1,1,1)
call phase_allocateState(damageState(ph),Nmembers,1,0,1)
damageState(ph)%atol = src%get_asFloat('atol_phi',defaultVal=1.0e-9_pReal)
if (any(damageState(ph)%atol < 0.0_pReal)) extmsg = trim(extmsg)//' atol_phi'