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

introduction of logical "wantsConstitutiveResults"

This commit is contained in:
Philip Eisenlohr 2009-01-19 19:10:02 +00:00
parent 82e65648a2
commit abb2e3ef30
2 changed files with 2067 additions and 2065 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
trunk/constitutive_dislo.f90
View File

@ -121,6 +121,7 @@ real(pReal), dimension(:) , allocatable :: constitutive_recovery
!************************************
!* State variables *
!************************************
logical :: wantsConstitutiveResults = .false.
integer(pInt) constitutive_maxNstatevars
integer(pInt), dimension(:,:,:), allocatable :: constitutive_Nstatevars
real(pReal), dimension(:,:,:,:), allocatable :: constitutive_state_old

1
trunk/constitutive_pheno.f90
View File

@ -80,6 +80,7 @@ real(pReal), dimension(:,:,:) , allocatable :: constitutive_texVolFrac
!************************************
!* State variables *
!************************************
logical :: wantsConstitutiveResults = .false.
integer(pInt) constitutive_maxNstatevars
integer(pInt), dimension(:,:,:) , allocatable :: constitutive_Nstatevars
real(pReal), dimension(:,:,:,:) , allocatable :: constitutive_state_old