function p = symrcm(S)
%SYMRCM Symmetric reverse Cuthill-McKee permutation.
%   p = SYMRCM(S) returns a permutation vector p such that S(p,p)
%   tends to have its diagonal elements closer to the diagonal than S.
%   This is a good preordering for LU or Cholesky factorization of
%   matrices that come from "long, skinny" problems.  It works for
%   both symmetric and asymmetric S.
%
%   See also SYMMMD, COLMMD, COLPERM.

%   Copyright 1984-2000 The MathWorks, Inc. 
%   $Revision: 5.6 $  $Date: 2000/06/02 17:59:33 $

p = sparsfun('symrcm',S|(S'));
