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

corrcected definition of forceLocalStiffnessCalculation

This commit is contained in:
Franz Roters 2010-02-18 14:43:40 +00:00
parent e1a25e0f73
commit 7e632e8132
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
code/crystallite.f90
View File

@ -342,7 +342,8 @@ subroutine crystallite_stressAndItsTangent(updateJaco)
logical, dimension(homogenization_maxNgrains,mesh_maxNips,mesh_NcpElems) :: & logical, dimension(homogenization_maxNgrains,mesh_maxNips,mesh_NcpElems) :: &
storedConvergenceFlag storedConvergenceFlag
logical, dimension(3,3) :: mask logical, dimension(3,3) :: mask
logical forceLocalStiffnessCalculation = .true. ! flag indicating that stiffness calculation is always done locally logical forceLocalStiffnessCalculation
forceLocalStiffnessCalculation = .true. ! flag indicating that stiffness calculation is always done locally
! ------ initialize to starting condition ------ ! ------ initialize to starting condition ------