[39b069]: gabor / izak.m  Maximize  Restore  History

Download this file

33 lines (26 with data), 646 Bytes

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
function f=izak(c);
%IZAK Inverse Zak transform
% Usage: f=izak(c);
%
% `izak(c)` computes the inverse Zak transform of *c*. The parameter of
% the Zak transform is deduced from the size of *c*.
%
% See also: zak
%
% References: ja94-4 bohl97-1
% AUTHOR : Peter Soendergaard
% TESTING: TEST_ZAK
% REFERENCE: OK
error(nargchk(1,1,nargin));
a=size(c,1);
N=size(c,2);
W=size(c,3);
L=a*N;
% Create output matrix.
f=zeros(L,W);
for ii=1:W
% Iterate through third dimension of c.
% We use a normalized DFT, as this gives the correct normalization
% of the Zak transform.
f(:,ii)=reshape(idft(c(:,:,ii),[],2),L,1);
end;

Get latest updates about Open Source Projects, Conferences and News.

Sign up for the SourceForge newsletter:





No, thanks