Mercurial > hg > octave-nkf
annotate scripts/plot/clf.m @ 14001:5f0bb45e615c
doc: Update documentation for functions returning a graphics handle h (Bug #34761)
* voronoi.m, image.m, imagesc.m, imshow.m, area.m, bar.m, barh.m, clabel.m,
clf.m, compass.m, ezcontour.m, ezcontourf.m, ezmesh.m, ezmeshc.m, ezplot.m,
ezplot3.m, ezpolar.m, ezsurf.m, ezsurfc.m, feather.m, fill.m, findall.m,
findobj.m, loglog.m, mesh.m, pareto.m, patch.m, pie.m, pie3.m, plot.m, polar.m,
quiver.m, quiver3.m, rectangle.m, ribbon.m, rose.m, scatter.m, scatter3.m,
semilogx.m, semilogy.m, slice.m, stem.m, surf.m, surface.m, text.m, title.m,
trimesh.m, triplot.m, trisurf.m, xlabel.m, ylabel.m, zlabel.m:
Update documentation for functions returning a graphics handle h.
author | Rik <octave@nomad.inbox5.com> |
---|---|
date | Tue, 06 Dec 2011 13:09:17 -0800 |
parents | 959944e9d927 |
children | 72c96de7a403 |
rev | line source |
---|---|
11523 | 1 ## Copyright (C) 2005-2011 John W. Eaton |
5597 | 2 ## |
3 ## This file is part of Octave. | |
4 ## | |
5 ## Octave is free software; you can redistribute it and/or modify it | |
6 ## under the terms of the GNU General Public License as published by | |
7016 | 7 ## the Free Software Foundation; either version 3 of the License, or (at |
8 ## your option) any later version. | |
5597 | 9 ## |
10 ## Octave is distributed in the hope that it will be useful, but | |
11 ## WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
13 ## General Public License for more details. | |
14 ## | |
15 ## You should have received a copy of the GNU General Public License | |
7016 | 16 ## along with Octave; see the file COPYING. If not, see |
17 ## <http://www.gnu.org/licenses/>. | |
5597 | 18 |
19 ## -*- texinfo -*- | |
9316
c539ec5726e7
Update some of Advanced Plotting documentation.
Rik <rdrider0-list@yahoo.com>
parents:
8920
diff
changeset
|
20 ## @deftypefn {Function File} {} clf () |
8250
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
21 ## @deftypefnx {Function File} {} clf ("reset") |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
22 ## @deftypefnx {Function File} {} clf (@var{hfig}) |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
23 ## @deftypefnx {Function File} {} clf (@var{hfig}, "reset") |
13316
959944e9d927
fix clf docstring typo from previous change
John W. Eaton <jwe@octave.org>
parents:
13313
diff
changeset
|
24 ## @deftypefnx {Function File} {@var{h} =} clf (@dots{}) |
9316
c539ec5726e7
Update some of Advanced Plotting documentation.
Rik <rdrider0-list@yahoo.com>
parents:
8920
diff
changeset
|
25 ## Clear the current figure window. @code{clf} operates by deleting child |
9752
51c21837686f
Period spellcheck of Octave documentation to check and fix newly added DOCSTRINGS
Rik <rdrider0-list@yahoo.com>
parents:
9316
diff
changeset
|
26 ## graphics objects with visible handles (@code{handlevisibility} = on). |
9316
c539ec5726e7
Update some of Advanced Plotting documentation.
Rik <rdrider0-list@yahoo.com>
parents:
8920
diff
changeset
|
27 ## If @var{hfig} is specified operate on it instead of the current figure. |
c539ec5726e7
Update some of Advanced Plotting documentation.
Rik <rdrider0-list@yahoo.com>
parents:
8920
diff
changeset
|
28 ## If the optional argument @code{"reset"} is specified, all objects including |
14001
5f0bb45e615c
doc: Update documentation for functions returning a graphics handle h (Bug #34761)
Rik <octave@nomad.inbox5.com>
parents:
13316
diff
changeset
|
29 ## those with hidden handles are deleted. |
5f0bb45e615c
doc: Update documentation for functions returning a graphics handle h (Bug #34761)
Rik <octave@nomad.inbox5.com>
parents:
13316
diff
changeset
|
30 ## |
5f0bb45e615c
doc: Update documentation for functions returning a graphics handle h (Bug #34761)
Rik <octave@nomad.inbox5.com>
parents:
13316
diff
changeset
|
31 ## The optional return value @var{h} is the graphics handle of the figure |
5f0bb45e615c
doc: Update documentation for functions returning a graphics handle h (Bug #34761)
Rik <octave@nomad.inbox5.com>
parents:
13316
diff
changeset
|
32 ## window that was cleared. |
8250
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
33 ## @seealso{cla, close, delete} |
5597 | 34 ## @end deftypefn |
35 | |
6257 | 36 ## Author: jwe |
37 | |
13313 | 38 function retval = clf (varargin) |
5597 | 39 |
8250
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
40 if (nargin > 2) |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
41 print_usage (); |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
42 elseif (nargin > 1) |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
43 if (isfigure (varargin{1}) && ischar (varargin{2}) |
10549 | 44 && strcmpi (varargin{2}, "reset")) |
8250
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
45 oldfig = gcf; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
46 hfig = varargin{1}; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
47 do_reset = true; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
48 else |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
49 print_usage (); |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
50 endif |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
51 elseif (nargin == 1) |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
52 if (isfigure (varargin{1})) |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
53 oldfig = gcf; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
54 hfig = varargin{1}; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
55 do_reset = false; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
56 elseif (ischar (varargin{1}) && strcmpi (varargin{1}, "reset")) |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
57 hfig = gcf; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
58 oldfig = hfig; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
59 do_reset = true; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
60 else |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
61 print_usage (); |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
62 endif |
6257 | 63 else |
8250
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
64 hfig = gcf; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
65 oldfig = hfig; |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
66 do_reset = false; |
8610
85c9906abfd1
use endif and endfor instead of end
John W. Eaton <jwe@octave.org>
parents:
8250
diff
changeset
|
67 endif |
8250
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
68 |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
69 if (do_reset) |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
70 ## Select all the children, including the one with hidden handles. |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
71 hc = allchild (hfig); |
11589
b0084095098e
missing semicolons in script files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
72 reset (hfig); |
8250
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
73 else |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
74 ## Select only the chilren with visible handles. |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
75 hc = get (hfig, "children"); |
6257 | 76 endif |
5597 | 77 |
8250
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
78 ## Delete the children. |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
79 delete (hc); |
8a2559a1aefa
clf.m: Improve Matlab compatibility.
Ben Abbott <bpabbott@mac.com>
parents:
7017
diff
changeset
|
80 |
13313 | 81 if (nargout > 0) |
82 retval = hfig; | |
83 endif | |
84 | |
5597 | 85 endfunction |
13096 | 86 |
14001
5f0bb45e615c
doc: Update documentation for functions returning a graphics handle h (Bug #34761)
Rik <octave@nomad.inbox5.com>
parents:
13316
diff
changeset
|
87 |
13096 | 88 %!test |
13124
2ea1658ad049
Don't use explicit figure number for tests to avoid interference with any figures opened by user.
Kai Habel <kai.habel@gmx.de>
parents:
13111
diff
changeset
|
89 %! hf = figure ("visible", "off"); |
13141
e81ddf9cacd5
maint: untabify and remove trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
13124
diff
changeset
|
90 %! unwind_protect |
13096 | 91 %! l = line; |
92 %! assert (!isempty (get (gcf, "children"))); | |
13111
ebb42fb2da04
Various fixes for tests in scripts/plot
Kai Habel <kai.habel@gmx.de>
parents:
13096
diff
changeset
|
93 %! unwind_protect_cleanup |
ebb42fb2da04
Various fixes for tests in scripts/plot
Kai Habel <kai.habel@gmx.de>
parents:
13096
diff
changeset
|
94 %! close (hf); |
ebb42fb2da04
Various fixes for tests in scripts/plot
Kai Habel <kai.habel@gmx.de>
parents:
13096
diff
changeset
|
95 %! end_unwind_protect |
ebb42fb2da04
Various fixes for tests in scripts/plot
Kai Habel <kai.habel@gmx.de>
parents:
13096
diff
changeset
|
96 |
ebb42fb2da04
Various fixes for tests in scripts/plot
Kai Habel <kai.habel@gmx.de>
parents:
13096
diff
changeset
|
97 %!test |
13124
2ea1658ad049
Don't use explicit figure number for tests to avoid interference with any figures opened by user.
Kai Habel <kai.habel@gmx.de>
parents:
13111
diff
changeset
|
98 %! hf = figure ("visible", "off"); |
13141
e81ddf9cacd5
maint: untabify and remove trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
13124
diff
changeset
|
99 %! unwind_protect |
13096 | 100 %! clf; |
101 %! assert (isempty (get (gcf, "children"))); | |
102 %! unwind_protect_cleanup | |
103 %! close (hf); | |
104 %! end_unwind_protect | |
14001
5f0bb45e615c
doc: Update documentation for functions returning a graphics handle h (Bug #34761)
Rik <octave@nomad.inbox5.com>
parents:
13316
diff
changeset
|
105 |