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

changed pointer attribute to allocatable in tState. since the pointers are only used for allocation, allocatables should do the same job more efficiently

This commit is contained in:
Pratheek Shanthraj 2014-06-25 14:22:08 +00:00
parent 28f3ba6841
commit baaf104238
1 changed files with 15 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
code/prec.f90
View File

@ -65,8 +65,8 @@ module prec
type, public :: tState
integer(pInt) :: sizeState,sizeDotState
logical :: nonlocal
real(pReal), pointer, dimension(:) :: atolState
real(pReal), pointer, dimension(:,:) :: state, & ! material points, state size
real(pReal), allocatable, dimension(:) :: atolState
real(pReal), allocatable, dimension(:,:) :: state, & ! material points, state size
dotState, &
state0, &
partionedState0, &
@ -77,7 +77,7 @@ module prec
previousDotState2, &
dotState_backup, &
RK4dotState
real(pReal), pointer, dimension(:,:,:) :: RKCK45dotState
real(pReal), allocatable, dimension(:,:,:) :: RKCK45dotState
end type
#endif