moved deltaState to group of contigous memory pointers

This commit is contained in:
Zhuowen Zhao 2017-09-29 18:33:39 -04:00
parent 80bed8b8aa
commit fb4aadbafa
1 changed files with 4 additions and 4 deletions

View File

@ -45,14 +45,14 @@ module prec
sizePostResults = 0_pInt !< size of output data
real(pReal), pointer, dimension(:), contiguous :: &
atolState
real(pReal), pointer, dimension(:,:), contiguous :: & ! a pointer is needed here because we might point to state/doState. However, they will never point to something, but are rather allocated and, hence, contiguous
real(pReal), pointer, dimension(:,:), contiguous :: & ! a pointer is needed here because we might point to state/dot/deltaState. However, they will never point to something, but are rather allocated and, hence, contiguous
state, & !< state
dotState, & !< state rate
state0
state0, & !< state at beginning of increment
dotState, & !< rate of state change
deltaState !< increment of state change
real(pReal), allocatable, dimension(:,:) :: &
partionedState0, &
subState0, &
deltaState, &
previousDotState, & !< state rate of previous xxxx
previousDotState2, & !< state rate two xxxx ago
RK4dotState