Mercurial > hg > octave-lyh

comparison scripts/plot/__plt2__.m @ 4030:22bd65326ec1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-08-09 18:58:13 by jwe]
author jwe
date Fri, 09 Aug 2002 19:00:16 +0000
parents 858695b3ed62
children 57372235194b
comparison
equal deleted inserted replaced
4029:2cc57b6169cf 4030:22bd65326ec1
41 x1 = real (x1); 41 x1 = real (x1);
42 endif 42 endif
43 if (any (any (imag (x2)))) 43 if (any (any (imag (x2))))
44 x2 = real (x2); 44 x2 = real (x2);
45 endif 45 endif
46 if (is_scalar (x1)) 46 if (isscalar (x1))
47 if (is_scalar (x2)) 47 if (isscalar (x2))
48 __plt2ss__ (x1, x2, fmt); 48 __plt2ss__ (x1, x2, fmt);
49 endif 49 endif
50 elseif (is_vector (x1)) 50 elseif (isvector (x1))
51 if (is_vector (x2)) 51 if (isvector (x2))
52 __plt2vv__ (x1, x2, fmt); 52 __plt2vv__ (x1, x2, fmt);
53 elseif (is_matrix (x2)) 53 elseif (ismatrix (x2))
54 __plt2vm__ (x1, x2, fmt); 54 __plt2vm__ (x1, x2, fmt);
55 endif 55 endif
56 elseif (is_matrix (x1)) 56 elseif (ismatrix (x1))
57 if (is_vector (x2)) 57 if (isvector (x2))
58 __plt2mv__ (x1, x2, fmt); 58 __plt2mv__ (x1, x2, fmt);
59 elseif (is_matrix (x2)) 59 elseif (ismatrix (x2))
60 __plt2mm__ (x1, x2, fmt); 60 __plt2mm__ (x1, x2, fmt);
61 endif 61 endif
62 endif 62 endif
63 63
64 endfunction 64 endfunction