set_direction Interface

interface
private module subroutine set_direction(this, direction)

Arguments

Type	Intent	Optional	Attributes		Name
class(array_type),	intent(inout)			::	this
real(kind=real32),	intent(in),		dimension(:)	::	direction