function?win=biorwin（winsdMdN）;
%?biorbin?:?Find?Biorthogonal?analysis?Window?for?STFT
%?***************************************************************@
%?Inputs:
%????wins?????synthesis?window;
%????dM			sampling?step?in?Time;
%????dN			sampling?step?in?Frequency;
%?Output:
%????win??????analysis?window;
%?Usage:
%????win=biorwin（winsdMdN）;
%?Defaults:
%????noverlap=length（wins）/2;

%?Copyright?（c）?2000.?Dr?Israel?Cohen.
%?All?rights?reserved.?Created??5/12/00.
%?***************************************************************@

wins=wins（:）;
L=length（wins）;
N=L/dN;
win=zeros（L1）;
mu=zeros（2*dN-11）;
mu（1）=1;
%mu（1）=1/N;
for?k=1:dM
????H=zeros（2*dN-1ceil（（L-k+1）/dM））;
????for?q=0:2*dN-2
????????h=shiftcir（winsq*N）;
????????H（q+1:）=h（k:dM:L）‘;
????end
????win（k:dM:L）=pinv（H）*mu;
end

%win=win/max（win）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2019-06-14?16:01??stft\
?????文件????????2260??2005-03-20?15:58??stft\stft.m
?????目錄???????????0??2019-06-18?16:13??__MACOSX\
?????目錄???????????0??2019-06-18?16:13??__MACOSX\stft\
?????文件?????????268??2005-03-20?15:58??__MACOSX\stft\._stft.m
?????文件?????????524??2005-03-20?15:59??stft\lnshift.m
?????文件?????????212??2005-03-20?15:59??__MACOSX\stft\._lnshift.m
?????文件????????1319??2005-03-20?15:58??stft\istft.m
?????文件?????????212??2005-03-20?15:58??__MACOSX\stft\._istft.m
?????文件?????????861??2012-02-22?15:19??stft\biorwin.m
?????文件?????????212??2012-02-22?15:19??__MACOSX\stft\._biorwin.m
?????文件?????????791??2000-07-12?12:42??stft\shiftcir.m
?????文件?????????212??2000-07-12?12:42??__MACOSX\stft\._shiftcir.m
?????文件?????????212??2019-06-14?16:01??__MACOSX\._stft