-------- SIMTEL20 Ada Software Repository Prologue ------------
--                                                           -*
-- Unit name    : generic procedure SORT
-- Version      : 1.0
-- Author       : John A. Anderson
--              : TEXAS INSTRUMENTS MS 8006
--              : P.O. BOX 801
--              : MCKINNEY, TEXAS   75069
--              :
-- DDN Address  : ANDERSON%TI-EG at CSNET-RELAY
-- Copyright    : (c) 1984, 1985 John Anderson
-- Date created :  December 19, 1984
-- Release Date : January 10, 1985
-- Last update  :  ANDERSON Wed Dec 19, 1984
-- Machine/System Compiled/Run on : DG MV 10000, Ada Development 
--                                :   Environment
--                                                           -*
---------------------------------------------------------------
--                                                           -*
-- Abstract     :  This generic procedure uses the QuickSort
----------------:  algorithm to sort an array of any base type
----------------:  with any discrete index type.
----------------:   Associated Files:
----------------:       SORT.ADA      -- generic Quick Sort
----------------:       OTHERTEST.ADA -- test program (for any
----------------:          generic sort with the same visible section
----------------:
------------------ Revision history ---------------------------
--
-- DATE         AUTHOR                  HISTORY
-- 10 Jan 85	  John Anderson		Initial Release
--
-------------------END-PROLOGUE--------------------------------