comparison toolboxes/MIRtoolbox1.3.2/MIRToolbox/mirhcdf.m @ 0:e9a9cd732c1e tip

first hg version after svn

+function varargout = mirhcdf(orig,varargin)
+%   df = mirhcdf(x) calculates the Harmonic Change Detection Function
+%       related to x.
+%
+% C. A. Harte and M. B. Sandler, Detecting harmonic change in musical
+%   audio, in Proceedings of Audio and Music Computing for Multimedia
+%   Workshop, Santa Barbara, CA, 2006. 
+
+specif.defaultframelength = .743;
+specif.defaultframehop = .1;
+varargout = mirfunction(@mirhcdf,orig,varargin,nargout,specif,@init,@main);
+
+
+function [df type] = init(orig,option)
+if isamir(orig,'mirscalar')
+    df = orig;
+else
+    if isframed(orig)
+        tc = mirtonalcentroid(orig);
+    else
+        tc = mirtonalcentroid(orig,'Frame');
+    end
+    df = mirflux(tc);
+end
+type = 'mirscalar';
+
+
+function df = main(df,option,postoption)