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

View File

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