Attachment 'octave_read_complex_binary.m'

Download

   1 %
   2 % Copyright 2001 Free Software Foundation, Inc.
   3 % 
   4 % This file is part of GNU Radio
   5 % 
   6 % GNU Radio is free software; you can redistribute it and/or modify
   7 % it under the terms of the GNU General Public License as published by
   8 % the Free Software Foundation; either version 3, or (at your option)
   9 % any later version.
  10 % 
  11 % GNU Radio is distributed in the hope that it will be useful,
  12 % but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 % GNU General Public License for more details.
  15 % 
  16 % You should have received a copy of the GNU General Public License
  17 % along with GNU Radio; see the file COPYING.  If not, write to
  18 % the Free Software Foundation, Inc., 51 Franklin Street,
  19 % Boston, MA 02110-1301, USA.
  20 % 
  21 
  22 function v = read_complex_binary (filename, count)
  23 
  24   %% usage: read_complex_binary (filename, [count])
  25   %%
  26   %%  open filename and return the contents as a column vector, 
  27   %%  treating them as 32 bit complex numbers
  28   %%
  29 
  30   m = nargchk (1,2,nargin);
  31   if (m)
  32     usage (m);
  33   end
  34 
  35   if (nargin < 2)
  36     count = Inf;
  37   end
  38 
  39   f = fopen (filename, 'rb');
  40   if (f < 0)
  41     v = 0;
  42   else
  43     t = fread (f, [2, count], 'float');
  44     fclose (f);
  45     v = t(1,:) + t(2,:)*i;
  46     [r, c] = size (v);
  47     v = reshape (v, c, r);
  48   end

Attached Files

To refer to attachments on a page, use attachment:filename, as shown below in the list of files. Do NOT use the URL of the [get] link, since this is subject to change and can break easily.
  • [get | view | diff] (2010-02-22 19:36:54, 1.3 KB) [[attachment:octave_read_complex_binary.m]]
  • [get | view | diff] (2010-02-22 19:36:54, 0.5 KB) [[attachment:read_complex_binary.m]]
  • [get | view | diff] (2010-02-22 19:36:55, 16.0 KB) [[attachment:toolkit.png]]
  • [get | view | diff] (2010-02-22 19:36:55, 0.4 KB) [[attachment:write_complex_binary.m]]
 All files | Selected Files: delete move to page
Normal Sort Sort + uniq Sort + uniq + count

You are not allowed to attach a file to this page.