heapsortReal32 Subroutine

public subroutine heapsortReal32(n, array, val)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	n
real(kind=real32),	intent(inout)			::	array(1:n)
real(kind=real32),	intent(inout),	optional		::	val(1:n)