r8vec_print Subroutine

subroutine r8vec_print(n, a, title)

************80

R8VEC_PRINT prints an R8VEC.

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=4)				::	n
real(kind=8)				::	a(n)
character(len=*)				::	title

Variables

Type	Visibility	Attributes		Name		Initial
integer(kind=4),	public		::	i