Mercurial > hg > octave-lyh
comparison scripts/plot/plot_border.m @ 3979:e0b7a493e5a8
[project @ 2002-07-10 17:45:34 by jwe]
author | jwe |
---|---|
date | Wed, 10 Jul 2002 17:45:34 +0000 |
parents | f8dde1807dee |
children | 92be67bc9301 |
comparison
equal
deleted
inserted
replaced
3978:10bc4c350d61 | 3979:e0b7a493e5a8 |
---|---|
49 | 49 |
50 ## Author: Vinayak Dutt <Dutt.Vinayak@mayo.EDU> | 50 ## Author: Vinayak Dutt <Dutt.Vinayak@mayo.EDU> |
51 ## Created: 3 July 95 | 51 ## Created: 3 July 95 |
52 ## Adapted-By: jwe | 52 ## Adapted-By: jwe |
53 | 53 |
54 function plot_border (...) | 54 function plot_border (varargin) |
55 | 55 |
56 if (! gnuplot_has_multiplot) | 56 if (! gnuplot_has_multiplot) |
57 error ("plot_border: gnuplot does not appear to support this feature"); | 57 error ("plot_border: gnuplot does not appear to support this feature"); |
58 endif | 58 endif |
59 | 59 |
62 north = 0; | 62 north = 0; |
63 east = 0; | 63 east = 0; |
64 all = 0; | 64 all = 0; |
65 none = 1; | 65 none = 1; |
66 | 66 |
67 va_start (); | 67 k = 1; |
68 | 68 |
69 while (nargin--) | 69 while (nargin--) |
70 | 70 |
71 arg = va_arg (); | 71 arg = varargin{k++}; |
72 | 72 |
73 if (! isstr (arg)) | 73 if (! isstr (arg)) |
74 error ("plot_border: input not a string"); | 74 error ("plot_border: input not a string"); |
75 endif | 75 endif |
76 | 76 |