Merge branch 'clean-isobrittle' into 'development'
dot state is 0 in isibrittle See merge request damask/DAMASK!612
This commit is contained in:
commit
9f4fc15273
|
@ -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'
|
||||
|
||||
|
|
Loading…
Reference in New Issue