fixed bug in type definition for ‘drivingForce’
This commit is contained in:
parent
54de033c45
commit
f8b29bdaf0
|
@ -433,7 +433,8 @@ subroutine damage_anisoBrittle_microstructure(ipc, ip, el)
|
||||||
instance, &
|
instance, &
|
||||||
f, i, index_d, index_o, index_myFamily
|
f, i, index_d, index_o, index_myFamily
|
||||||
real(pReal) :: &
|
real(pReal) :: &
|
||||||
localDamage
|
localDamage, &
|
||||||
|
drivingForce
|
||||||
|
|
||||||
phase = mappingConstitutive(2,ipc,ip,el)
|
phase = mappingConstitutive(2,ipc,ip,el)
|
||||||
constituent = mappingConstitutive(1,ipc,ip,el)
|
constituent = mappingConstitutive(1,ipc,ip,el)
|
||||||
|
|
Loading…
Reference in New Issue