Mercurial > hg > octave-lyh

comparison scripts/signal/arma_rnd.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 38c61cbf086c
children cef48c4b902d
comparison
equal deleted inserted replaced
4029:2cc57b6169cf 4030:22bd65326ec1
47 empty_list_elements_ok = "true"; 47 empty_list_elements_ok = "true";
48 48
49 if (nargin == 4) 49 if (nargin == 4)
50 n = 100; 50 n = 100;
51 elseif (nargin == 5) 51 elseif (nargin == 5)
52 if (!is_scalar (t)) 52 if (!isscalar (t))
53 error ("arma_rnd: n must be a scalar"); 53 error ("arma_rnd: n must be a scalar");
54 endif 54 endif
55 else 55 else
56 usage ("arma_rnd (a, b, v, t, n)"); 56 usage ("arma_rnd (a, b, v, t, n)");
57 endif 57 endif
58 58
59 if ((min (size (a)) > 1) || (min (size (b)) > 1)) 59 if ((min (size (a)) > 1) || (min (size (b)) > 1))
60 error ("arma_rnd: a and b must not be matrices"); 60 error ("arma_rnd: a and b must not be matrices");
61 endif 61 endif
62 62
63 if (!is_scalar (t)) 63 if (!isscalar (t))
64 error ("arma_rnd: t must be a scalar"); 64 error ("arma_rnd: t must be a scalar");
65 endif 65 endif
66 66
67 ar = length (a); 67 ar = length (a);
68 br = length (b); 68 br = length (b);