exchange( r, i, j )
     /*** interchange entries r[i] and r[j] ***/
     ArrayToSort r;
     int i, j;
     {
     ArrayEntry tempr;
     tempr = r[i];
     r[i] = r[j];
     r[j] = tempr;
     };