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

avoid allocate based on random value in sum_N_sl

This commit is contained in:
Martin Diehl 2021-06-24 23:35:14 +02:00
parent 106fec92d7
commit a9f5dcfbf1
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PRIVATE

@ -1 +1 @@
Subproject commit 3b46d17f2194ecbf7248f2aaa75330ef727e8140 Subproject commit b017527e18a44fc6aeff61b92deedb5d79c47617

2
src/phase_mechanical_plastic_nonlocal.f90
View File

@ -112,7 +112,7 @@ submodule(phase:plastic) nonlocal
nonSchmid_pos, & nonSchmid_pos, &
nonSchmid_neg !< combined projection of Schmid and non-Schmid contributions to the resolved shear stress (only for screws) nonSchmid_neg !< combined projection of Schmid and non-Schmid contributions to the resolved shear stress (only for screws)
integer :: & integer :: &
sum_N_sl sum_N_sl = 0
integer, dimension(:), allocatable :: & integer, dimension(:), allocatable :: &
colinearSystem !< colinear system to the active slip system (only valid for fcc!) colinearSystem !< colinear system to the active slip system (only valid for fcc!)
character(len=pStringLen), dimension(:), allocatable :: & character(len=pStringLen), dimension(:), allocatable :: &