**fig7_2.txt**

/* 1*/	template <class Etype>
/* 2*/	void
/* 3*/	Insertion_Sort( Etype A[ ], const unsigned int N )
/* 4*/	{
/* 5*/	    Etype Tmp;

/* 6*/	    A[ 0 ] = Min_Val( );
/* 7*/	    for( int P = 2; P <= N; P++ )
/* 8*/	    {
/* 9*/	        Tmp = A[ P ];
/*10*/	        for( int j = P; Tmp < A[ j - 1 ]; j-- )
/*11*/	            A[ j ] = A[ j - 1 ];
/*12*/	        A[ j ] = Tmp;
/*13*/	    }
/*14*/	}