sort_sympairprod Subroutine

private pure subroutine sort_sympairprod(arr, nskip, par)

a is the pivot value

Arguments

Type IntentOptional Attributes Name
type(SymPairProd), intent(inout) :: arr(:)
integer, intent(in), optional :: nskip
integer, intent(out), optional :: par

Contents