correct initialization
This commit is contained in:
parent
af707c671c
commit
2621689843
|
@ -90,7 +90,7 @@ subroutine damage_nonlocal_init
|
|||
associate(prm => param(damage_typeInstance(h)), &
|
||||
config => config_homogenization(h))
|
||||
|
||||
|
||||
instance = damage_typeInstance(h)
|
||||
outputs = config%getStrings('(output)',defaultVal=emptyStringArray)
|
||||
allocate(prm%outputID(0))
|
||||
|
||||
|
@ -107,7 +107,6 @@ subroutine damage_nonlocal_init
|
|||
|
||||
enddo
|
||||
|
||||
|
||||
homog = h
|
||||
|
||||
NofMyHomog = count(material_homog == homog)
|
||||
|
|
Loading…
Reference in New Issue