Mercurial > hg > octave-lyh

comparison scripts/sparse/etreeplot.m @ 11469:c776f063fefe

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Overhaul m-script files to use common variable name between code and documentation.
author Rik <octave@nomad.inbox5.com>
date Sun, 09 Jan 2011 12:41:21 -0800
parents be55736a0783
children fd0a3ac60b0e
comparison
equal deleted inserted replaced
11468:e1edf0ba3bcb 11469:c776f063fefe
15 ## You should have received a copy of the GNU General Public License 15 ## You should have received a copy of the GNU General Public License
16 ## along with Octave; see the file COPYING. If not, see 16 ## along with Octave; see the file COPYING. If not, see
17 ## <http://www.gnu.org/licenses/>. 17 ## <http://www.gnu.org/licenses/>.
18 18
19 ## -*- texinfo -*- 19 ## -*- texinfo -*-
20 ## @deftypefn {Function File} {} etreeplot (@var{tree}) 20 ## @deftypefn {Function File} {} etreeplot (@var{A})
21 ## @deftypefnx {Function File} {} etreeplot (@var{tree}, @var{node_style}, @var{edge_style}) 21 ## @deftypefnx {Function File} {} etreeplot (@var{A}, @var{node_style}, @var{edge_style})
22 ## Plot the elimination tree of the matrix @var{s} or 22 ## Plot the elimination tree of the matrix @var{A} or
23 ## @code{@var{s}+@var{s}'} if @var{s} in non-symmetric. The optional 23 ## @code{@var{A}+@var{A}'} if @var{A} in not symmetric. The optional
24 ## parameters @var{line_style} and @var{edge_style} define the output 24 ## parameters @var{node_style} and @var{edge_style} define the output
25 ## style. 25 ## style.
26 ## @seealso{treeplot, gplot} 26 ## @seealso{treeplot, gplot}
27 ## @end deftypefn 27 ## @end deftypefn
28 28
29 function etreeplot (s, varargin) 29 function etreeplot (A, varargin)
30 30
31 if (nargin < 1) 31 if (nargin < 1)
32 print_usage (); 32 print_usage ();
33 endif 33 endif
34 34
35 treeplot (etree (s+s'), varargin{:}); 35 treeplot (etree (A+A'), varargin{:});
36 endfunction 36 endfunction