sort( r, lo, up )
     ArrayToSort r;
     int lo, up;

     {int i, j;
     ArrayEntry tempr;

     r[up+1].k = MaximumKey;
     for ( i=up-1; i>=lo; i-- ) {
          tempr = r[i];
          for ( j=i+1; tempr.k>r[j].k; j++ )
               r[j-1] = r[j];
          r[j-1] = tempr;
          }
     }