get_statePtr Subroutine

private recursive subroutine get_statePtr(varPos, varSys, found, fPtr)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	varPos
type(tem_varSys_type),	intent(in)			::	varSys	The variable system to obtain the variable from.
logical,	intent(out)			::	found
type(atl_varSys_data_type),	intent(out),		pointer	::	fPtr