diff util/SMALL_swipe.m @ 24:fc395272d53e

(none)
author idamnjanovic
date Tue, 27 Apr 2010 13:33:00 +0000
parents 33850553b702
children 8e660fd14774
line wrap: on
line diff
--- a/util/SMALL_swipe.m	Tue Apr 27 13:32:46 2010 +0000
+++ b/util/SMALL_swipe.m	Tue Apr 27 13:33:00 2010 +0000
@@ -1,13 +1,22 @@
 function [p,s] = SMALL_swipe(X,fs, f, plim,dlog2p,dERBs,woverlap,sTHR)
 % 
-% Ivan Damnjanovic 2010
 %
-% This is modified swipep MATLAB code that is working directly in spectral
-% domain and uses only one window size. The results are suboptimal
-% comparing to original code. It is also converted to SWIPE which uses all
-% the harmonics of the signal. 
+%   Centre for Digital Music, Queen Mary, University of London.
+%   This file copyright 2009 Ivan Damnjanovic.
 %
-%SWIPEP Pitch estimation using SWIPE'.
+%   This program 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 2 of the
+%   License, or (at your option) any later version.  See the file
+%   COPYING included with this distribution for more information.
+%   
+%
+%   This is modified swipep MATLAB code that is working directly in spectral
+%   domain and uses only one window size. The results are suboptimal
+%   comparing to original code. It is also converted to SWIPE which uses all
+%   the harmonics of the signal. 
+%
+%   SWIPEP Pitch estimation using SWIPE'.
 %    P = SWIPEP(X,Fs,[PMIN PMAX],DT,DLOG2P,DERBS,STHR) estimates the pitch 
 %    of the vector signal X every DT seconds. The sampling frequency of
 %    the signal is Fs (in Hertz). The spectrum is computed using a Hann
@@ -60,6 +69,7 @@
 %    REFERENCES: Camacho, A., Harris, J.G, (2008) "A sawtooth waveform 
 %    inspired pitch estimator for speech and music," J. Acoust. Soc. Am.
 %    124, 1638-1652.
+
 if ~ exist( 'plim', 'var' ) || isempty(plim), plim = [30 5000]; end
 %if ~ exist( 'dt', 'var' ) || isempty(dt), dt = 0.001; end
 if ~ exist( 'dlog2p', 'var' ) || isempty(dlog2p), dlog2p = 1/48; end