SetState Subroutine

public subroutine SetState(prt, organ_id, element_id, state_val, position_id)

Arguments

Type	Intent	Optional	Attributes		Name
class(prt_vartypes)				::	prt
integer,	intent(in)			::	organ_id
integer,	intent(in)			::	element_id
real(kind=r8),	intent(in)			::	state_val
integer,	intent(in),	optional		::	position_id