vr_assignP Subroutine

public subroutine vr_assignP(this, n, P)

Assign coordinates to nth corner

Type Bound

vr_class

Arguments

Type	Intent	Optional	Attributes		Name
class(vr_class)				::	this
integer,	intent(in)			::	n
real(kind=dp),			dimension(3)	::	P