insertion_sort Subroutine

public pure subroutine insertion_sort(array, index)

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	array(0:)
integer(kind=int_size),	intent(inout)			::	index(0:)