readouto.m

里面囊括了基于matlab滤波器设计的各种.m文件

 
 
% h = readouto(filename,char)
% First read data from file(the coefficients of low
% pass filter), then plot the frequency response of
% the filter.
% The data file is come from the Fortran 90
% application or Matlab data file. Data format
% is double precision
% This program is used in orthogonal case of filter
% bank design

function h = readouto(filename)

 fid = fopen(filename,'r');
 x=fread(fid,'real*8');
 x=x(:);
 fclose(fid);

 N = max(size(x));
 h=[x;antieye(N)*x];

% if nargin == 2
%   freqplot(h,1,char)
% end

% END