sort_a_i64_a_d_custom Subroutine

private pure subroutine sort_a_i64_a_d_custom(arr, arr2, custom_lt, custom_gt, nskip, par)

a is the pivot value

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(inout)			::	arr(:,:)
real(kind=dp),	intent(inout)			::	arr2(:,:)
real				::	custom_lt
real				::	custom_gt
integer,	intent(in),	optional		::	nskip
integer,	intent(out),	optional		::	par

Contents