PDAF_get_state Subroutine

subroutine PDAF_get_state(steps, time, doexit, U_next_observation, U_distribute_state, U_prepoststep, outflag)

!! Set CENTRAL_STATE = .TRUE. for evolution of only the central !! state for computation of free evolution. !! In this case also set FREE_EVOLUTION=.TRUE. in PDAF-D_SEEK_UPDATE

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	steps
real,	intent(out)			::	time
integer,	intent(inout)			::	doexit
real				::	U_next_observation
real				::	U_distribute_state
real				::	U_prepoststep
integer,	intent(inout)			::	outflag