# HG changeset patch # User jwe # Date 1081394869 0 # Node ID 9794d526639ca02c1d42cef248db438beed9feb5 # Parent c89b9abf2ffd7fa7854c8afc630effc295c5dd28 [project @ 2004-04-08 03:27:49 by jwe] diff --git a/scripts/statistics/distributions/beta_rnd.m b/scripts/statistics/distributions/beta_rnd.m --- a/scripts/statistics/distributions/beta_rnd.m +++ b/scripts/statistics/distributions/beta_rnd.m @@ -52,8 +52,8 @@ endif sz = [r, c]; - if (any (size (a) != 1) && ((length (size (a)) != length (sz)) || - any (size (a) != sz))) + if (any (size (a) != 1) + && (length (size (a)) != length (sz) || any (size (a) != sz))) error ("beta_rnd: a and b must be scalar or of size [r,c]"); endif elseif (nargin == 3) @@ -65,8 +65,8 @@ error ("beta_rnd: r must be a postive integer or vector"); endif - if (any (size (a) != 1) && ((length (size (a)) != length (sz)) || - any (size (a) != sz))) + if (any (size (a) != 1) + && (length (size (a)) != length (sz) || any (size (a) != sz))) error ("beta_rnd: a and b must be scalar or of size sz"); endif elseif (nargin == 2) diff --git a/scripts/statistics/distributions/binomial_rnd.m b/scripts/statistics/distributions/binomial_rnd.m --- a/scripts/statistics/distributions/binomial_rnd.m +++ b/scripts/statistics/distributions/binomial_rnd.m @@ -52,8 +52,8 @@ endif sz = [r, c]; - if (any (size (n) != 1) && ((length (size (n)) != length (sz)) || - any (size (n) != sz))) + if (any (size (n) != 1) + && (length (size (n)) != length (sz) || any (size (n) != sz))) error ("binomial_rnd: n and must be scalar or of size [r, c]"); endif elseif (nargin == 3) @@ -65,8 +65,8 @@ error ("binomial_rnd: r must be a postive integer or vector"); endif - if (any (size (n) != 1) && ((length (size (n)) != length (sz)) || - any (size (n) != sz))) + if (any (size (n) != 1) + && (length (size (n)) != length (sz) || any (size (n) != sz))) error ("binomial_rnd: n and must be scalar or of size sz"); endif elseif (nargin == 2) diff --git a/scripts/statistics/distributions/cauchy_rnd.m b/scripts/statistics/distributions/cauchy_rnd.m --- a/scripts/statistics/distributions/cauchy_rnd.m +++ b/scripts/statistics/distributions/cauchy_rnd.m @@ -51,8 +51,8 @@ endif sz = [r, c]; - if (any (size (l) != 1) && ((length (size (l)) != length (sz)) || - any (size (l) != sz))) + if (any (size (l) != 1) + && (length (size (l)) != length (sz) || any (size (l) != sz))) error ("cauchy_rnd: lambda and sigma must be scalar or of size [r, c]"); endif elseif (nargin == 3) @@ -64,8 +64,8 @@ error ("cauchy_rnd: r must be a postive integer or vector"); endif - if (any (size (l) != 1) && ((length (size (l)) != length (sz)) || - any (size (l) != sz))) + if (any (size (l) != 1) + && (length (size (l)) != length (sz) || any (size (l) != sz))) error ("cauchy_rnd: lambda and sigma must be scalar or of size sz"); endif elseif (nargin == 2) diff --git a/scripts/statistics/distributions/chisquare_rnd.m b/scripts/statistics/distributions/chisquare_rnd.m --- a/scripts/statistics/distributions/chisquare_rnd.m +++ b/scripts/statistics/distributions/chisquare_rnd.m @@ -42,8 +42,8 @@ endif sz = [r, c]; - if (any (size (n) != 1) && ((length (size (n)) != length (sz)) || - any (size (n) != sz))) + if (any (size (n) != 1) + && (length (size (n)) != length (sz) || any (size (n) != sz))) error ("chisquare_rnd: n must be scalar or of size [r, c]"); endif elseif (nargin == 2) @@ -55,8 +55,8 @@ error ("chisquare_rnd: r must be a postive integer or vector"); endif - if (any (size (n) != 1) && ((length (size (n)) != length (sz)) || - any (size (n) != sz))) + if (any (size (n) != 1) + && (length (size (n)) != length (sz) || any (size (n) != sz))) error ("chisquare_rnd: n must be scalar or of size sz"); endif elseif (nargin == 1) diff --git a/scripts/statistics/distributions/gamma_rnd.m b/scripts/statistics/distributions/gamma_rnd.m --- a/scripts/statistics/distributions/gamma_rnd.m +++ b/scripts/statistics/distributions/gamma_rnd.m @@ -52,8 +52,8 @@ endif sz = [r, c]; - if (any (size (a) != 1) && ((length (size (a)) != length (sz)) || - any (size (a) != sz))) + if (any (size (a) != 1) + && (length (size (a)) != length (sz) || any (size (a) != sz))) error ("gamma_rnd: a and b must be scalar or of size [r, c]"); endif elseif (nargin == 3) @@ -65,8 +65,8 @@ error ("uniform_rnd: r must be a postive integer or vector"); endif - if (any (size (a) != 1) && ((length (size (a)) != length (sz)) || - any (size (a) != sz))) + if (any (size (a) != 1) + && (length (size (a)) != length (sz) || any (size (a) != sz))) error ("gamma_rnd: a and b must be scalar or of size sz"); endif elseif (nargin == 2) diff --git a/scripts/statistics/distributions/normal_rnd.m b/scripts/statistics/distributions/normal_rnd.m --- a/scripts/statistics/distributions/normal_rnd.m +++ b/scripts/statistics/distributions/normal_rnd.m @@ -52,8 +52,8 @@ endif sz = [r, c]; - if (any (size (m) != 1) && ((length (size (m)) != length (sz)) || - any (size (m) != sz))) + if (any (size (m) != 1) + && (length (size (m)) != length (sz) || any (size (m) != sz))) error ("normal_rnd: m and v must be scalar or of size [r, c]"); endif elseif (nargin == 3) @@ -65,8 +65,8 @@ error ("normal_rnd: r must be a postive integer or vector"); endif - if (any (size (m) != 1) && ((length (size (m)) != length (sz)) || - any (size (m) != sz))) + if (any (size (m) != 1) + && (length (size (m)) != length (sz) || any (size (m) != sz))) error ("normal_rnd: m and v must be scalar or of size sz"); endif elseif (nargin == 2) diff --git a/scripts/statistics/distributions/uniform_rnd.m b/scripts/statistics/distributions/uniform_rnd.m --- a/scripts/statistics/distributions/uniform_rnd.m +++ b/scripts/statistics/distributions/uniform_rnd.m @@ -51,8 +51,8 @@ endif sz = [r, c]; - if (any (size (a) != 1) && ((length (size (a)) != length (sz)) || - any (size (a) != sz))) + if (any (size (a) != 1) + && (length (size (a)) != length (sz) || any (size (a) != sz))) error ("uniform_rnd: a and b must be scalar or of size [r, c]"); endif elseif (nargin == 3) @@ -64,8 +64,8 @@ error ("uniform_rnd: r must be a postive integer or vector"); endif - if (any (size (a) != 1) && ((length (size (a)) != length (sz)) || - any (size (a) != sz))) + if (any (size (a) != 1) + && (length (size (a)) != length (sz) || any (size (a) != sz))) error ("uniform_rnd: a and b must be scalar or of size sz"); endif elseif (nargin == 2)