not needed
This commit is contained in:
parent
4669c289c7
commit
77a0d5999b
|
@ -193,13 +193,8 @@ module subroutine mechanical_init(materials,phases)
|
||||||
phases
|
phases
|
||||||
|
|
||||||
integer :: &
|
integer :: &
|
||||||
el, &
|
|
||||||
ip, &
|
|
||||||
co, &
|
|
||||||
ce, &
|
|
||||||
ph, &
|
ph, &
|
||||||
en, &
|
en, &
|
||||||
stiffDegradationCtr, &
|
|
||||||
Nmembers
|
Nmembers
|
||||||
class(tNode), pointer :: &
|
class(tNode), pointer :: &
|
||||||
num_crystallite, &
|
num_crystallite, &
|
||||||
|
|
|
@ -595,7 +595,7 @@ subroutine results_mapping_homogenization(ID,entry,label)
|
||||||
dt_id
|
dt_id
|
||||||
|
|
||||||
integer(SIZE_T) :: type_size_string, type_size_int
|
integer(SIZE_T) :: type_size_string, type_size_int
|
||||||
integer :: hdferr, ierr, i, ce
|
integer :: hdferr, ierr, ce
|
||||||
|
|
||||||
|
|
||||||
writeSize = 0
|
writeSize = 0
|
||||||
|
|
Loading…
Reference in New Issue