39 lines
1.2 KiB
Matlab
39 lines
1.2 KiB
Matlab
|
%
|
||
|
|
% Copyright 2001 Free Software Foundation, Inc.
|
||
|
|
%
|
||
|
|
% This file is part of GNU Radio
|
||
|
|
%
|
||
|
|
% GNU Radio is free software; you can redistribute it and/or modify
|
||
|
|
% it under the terms of the GNU General Public License as published by
|
||
|
|
% the Free Software Foundation; either version 3, or (at your option)
|
||
|
|
% any later version.
|
||
|
|
%
|
||
|
|
% GNU Radio is distributed in the hope that it will be useful,
|
||
|
|
% but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
|
% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
|
% GNU General Public License for more details.
|
||
|
|
%
|
||
|
|
% You should have received a copy of the GNU General Public License
|
||
|
|
% along with GNU Radio; see the file COPYING. If not, write to
|
||
|
|
% the Free Software Foundation, Inc., 51 Franklin Street,
|
||
|
|
% Boston, MA 02110-1301, USA.
|
||
|
|
%
|
||
|
|
|
||
|
|
function v = read_complex_binary (filename, count)
|
||
|
|
narginchk (1,2);
|
||
|
|
|
||
|
|
if (nargin < 2)
|
||
|
|
count = Inf;
|
||
|
|
end
|
||
|
|
|
||
|
|
f = fopen (filename, 'rb');
|
||
|
|
if (f < 0)
|
||
|
|
v = 0;
|
||
|
|
else
|
||
|
|
t = fread (f, [2, count], 'float');
|
||
|
|
fclose (f);
|
||
|
|
v = t(1,:) + t(2,:)*1i;
|
||
|
|
[r, c] = size (v);
|
||
|
|
v = reshape (v, c, r);
|
||
|
|
end
|
||
|
|
end
|