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

semi-explicit damage evolution

This commit is contained in:
Pratheek Shanthraj 2014-11-26 10:36:14 +00:00
parent 646f1c48dc
commit a91ebafa0e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
code/damage_isoBrittle.f90
View File

@ -453,8 +453,8 @@ function damage_isoBrittle_getDamagedC66(C, ipc, ip, el)
phase = mappingConstitutive(2,ipc,ip,el) phase = mappingConstitutive(2,ipc,ip,el)
constituent = mappingConstitutive(1,ipc,ip,el) constituent = mappingConstitutive(1,ipc,ip,el)
damage_isoBrittle_getDamagedC66 = & damage_isoBrittle_getDamagedC66 = &
damageState(phase)%state(1,constituent)* & damageState(phase)%state0(1,constituent)* &
damageState(phase)%state(1,constituent)* & damageState(phase)%state0(1,constituent)* &
C C
end function damage_isoBrittle_getDamagedC66 end function damage_isoBrittle_getDamagedC66