dvperm Subroutine

subroutine dvperm(n, x, perm)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	n
real(kind=8)				::	x(n)
integer				::	perm(n)

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=8),	public		::	tmp
real(kind=8),	public		::	tmp1