sort_d_a_i Subroutine

private pure subroutine sort_d_a_i(arr, arr2, nskip, par)

a is the pivot value

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout) :: arr(:)
integer(kind=int32), intent(inout) :: arr2(:,:)
integer, intent(in), optional :: nskip
integer, intent(out), optional :: par

Contents