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

commented out the logical 'nonlocal' from newState structure(might be used later)

This commit is contained in:
Luv Sharma 2014-06-14 11:50:46 +00:00
parent cb1337aaf8
commit e8be3b871b
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
code/constitutive_nonlocal.f90
View File

@ -910,7 +910,7 @@ allocate(nonSchmidProjection(3,3,4,maxTotalNslip,maxNinstances),
#ifdef NEWSTATE #ifdef NEWSTATE
! Determine size of state array ! Determine size of state array
plasticState(phase)%nonlocal = .true. ! plasticState(phase)%nonlocal = .true.
sizeDotState = int(size(BASICSTATES),pInt) * ns sizeDotState = int(size(BASICSTATES),pInt) * ns
sizeDependentState = int(size(DEPENDENTSTATES),pInt) * ns sizeDependentState = int(size(DEPENDENTSTATES),pInt) * ns
sizeState = sizeDotState & sizeState = sizeDotState &

1
code/prec.f90
View File

@ -64,6 +64,7 @@ module prec
!http://stackoverflow.com/questions/3948210/can-i-have-a-pointer-to-an-item-in-an-allocatable-array !http://stackoverflow.com/questions/3948210/can-i-have-a-pointer-to-an-item-in-an-allocatable-array
type, public :: tState type, public :: tState
integer(pInt) :: sizeState,sizeDotState integer(pInt) :: sizeState,sizeDotState
! logical :: nonlocal
real(pReal), pointer, dimension(:) :: atolState real(pReal), pointer, dimension(:) :: atolState
real(pReal), pointer, dimension(:,:) :: state, & ! material points, state size real(pReal), pointer, dimension(:,:) :: state, & ! material points, state size
dotState, & dotState, &