home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l455 / 2.ddi / MUTOOLS1.DI$ / CRAND.M < prev    next >
Encoding:
Text File  |  1993-03-11  |  630 b   |  21 lines
  1. % function out = crand(dim1,dim2)
  2. %
  3. %   Complex random matrix generator: generates a complex,
  4. %   random matrix (distribution is 'normal' or 'uniform'
  5. %   depending on the current MATLAB status) of dimension
  6. %   DIM1 x DIM2. If only one dimension argument is given,
  7. %   the output matrix is square.
  8. %
  9. %   See also: RAND and SYSRAND.
  10.  
  11. function [out] = crand(dim1,dim2)
  12.   if nargin == 2
  13.     out = rand(dim1,dim2) + sqrt(-1)*rand(dim1,dim2);
  14.   elseif nargin == 1
  15.     out = rand(dim1) + sqrt(-1)*rand(dim1);
  16.   else
  17.     disp('usage: out = crand(dim1,dim2)')
  18.   end
  19. %
  20. % Copyright MUSYN INC 1991,  All Rights Reserved
  21.