index_linked_sort Subroutine

private subroutine index_linked_sort(ind_ref, ind_dep)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout),		DIMENSION(:)	::	ind_ref
integer,	intent(inout),		DIMENSION(:)	::	ind_dep