diff util/SMALL_swipe.m @ 128:8e660fd14774 ivand_dev

Feature 186
author Ivan Damnjanovic lnx <ivan.damnjanovic@eecs.qmul.ac.uk>
date Mon, 13 Jun 2011 14:55:45 +0100
parents fc395272d53e
children
line wrap: on
line diff
--- a/util/SMALL_swipe.m	Wed May 25 15:30:34 2011 +0100
+++ b/util/SMALL_swipe.m	Mon Jun 13 14:55:45 2011 +0100
@@ -1,20 +1,12 @@
 function [p,s] = SMALL_swipe(X,fs, f, plim,dlog2p,dERBs,woverlap,sTHR)
-% 
-%
-%   Centre for Digital Music, Queen Mary, University of London.
-%   This file copyright 2009 Ivan Damnjanovic.
-%
-%   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.
-%   
-%
+%%  Modified SWIPEP Pitch estimation using SWIPE'.
 %   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. 
+%   the harmonics of the signal.
+
+%   
+% 
 %
 %   SWIPEP Pitch estimation using SWIPE'.
 %    P = SWIPEP(X,Fs,[PMIN PMAX],DT,DLOG2P,DERBS,STHR) estimates the pitch 
@@ -70,6 +62,17 @@
 %    inspired pitch estimator for speech and music," J. Acoust. Soc. Am.
 %    124, 1638-1652.
 
+%
+%   Centre for Digital Music, Queen Mary, University of London.
+%   This file copyright 2009 Ivan Damnjanovic.
+%
+%   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.
+%%
+
 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