Mercurial > octave-nkf

comparison scripts/plot/daspect.m @ 11113:a8ac114ec9ab

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Stylefixes, replace end by endif.
author Thorsten Meyer <thorsten.meyier@gmx.de>
date Mon, 18 Oct 2010 20:40:12 +0200
parents 2c356a35d7f5
children a44f979a35ce
comparison
equal deleted inserted replaced
11112:8ea4cf59c41b 11113:a8ac114ec9ab
55 if (nargout < 2) 55 if (nargout < 2)
56 varargout{1} = get (hax, "dataaspectratiomode"); 56 varargout{1} = get (hax, "dataaspectratiomode");
57 return 57 return
58 else 58 else
59 error ("daspect: only one output is allowed.") 59 error ("daspect: only one output is allowed.")
60 end 60 endif
61 case {"manual"} 61 case {"manual"}
62 set (hax, "dataaspectratiomode", "manual"); 62 set (hax, "dataaspectratiomode", "manual");
63 case {"auto"} 63 case {"auto"}
64 set (hax, "dataaspectratiomode", "auto"); 64 set (hax, "dataaspectratiomode", "auto");
65 endswitch 65 endswitch
72 elseif (numel (varargin) > 1) 72 elseif (numel (varargin) > 1)
73 error ("daspect: too many inputs.") 73 error ("daspect: too many inputs.")
74 endif 74 endif
75 elseif (nargout == 0) 75 elseif (nargout == 0)
76 print_usage (); 76 print_usage ();
77 end 77 endif
78 78
79 if (nargout == 1) 79 if (nargout == 1)
80 varargout{1} = get (hax, "dataaspectratio"); 80 varargout{1} = get (hax, "dataaspectratio");
81 elseif (nargout > 1) 81 elseif (nargout > 1)
82 error ("daspect: only one output is allowed.") 82 error ("daspect: only one output is allowed.")
83 end 83 endif
84 84
85 endfunction 85 endfunction
86 86
87 %!demo 87 %!demo
88 %! x = 0:0.01:4; 88 %! x = 0:0.01:4;