function a = r8vec_permute_uniform ( n, a )

%*****************************************************************************80
%
%% r8vec_permute_uniform() randomly permutes an R8VEC.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    24 May 2015
%
%  Author:
%
%    John Burkardt
%
%  Input
%
%    integer N, the number of objects.
%
%    real A(N), the array to be permuted.
%
%  Output:
%
%    real A(N), the permuted array.
%
  p = perm1_uniform ( n );

  a = r8vec_permute ( n, a, p );

  return
end
