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

introduced extended plastic state type (including pointer/aliases)

This commit is contained in:
Luv Sharma 2014-12-19 14:01:03 +00:00
parent 023aa9f756
commit e6d1b21b57
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
code/material.f90
View File

@ -13,6 +13,7 @@ module material
pReal, & pReal, &
pInt, & pInt, &
tState, & tState, &
tPlasticState, &
tFieldData, & tFieldData, &
p_intvec p_intvec
@ -160,8 +161,9 @@ module material
material_phase !< phase (index) of each grain,IP,element material_phase !< phase (index) of each grain,IP,element
integer(pInt), dimension(:,:), allocatable, public :: & integer(pInt), dimension(:,:), allocatable, public :: &
material_homog !< homogenization (index) of each IP,element material_homog !< homogenization (index) of each IP,element
type(tPlasticState), allocatable, dimension(:), public :: &
plasticState
type(tState), allocatable, dimension(:), public :: & type(tState), allocatable, dimension(:), public :: &
plasticState, &
damageState, & damageState, &
thermalState,& thermalState,&
vacancyState,& vacancyState,&