diff dsp/specgrm.m @ 42:ae596261e75f

Various fixes and development to audio handling

--- a/dsp/specgrm.m	Tue Jan 29 17:22:52 2013 +0000
+++ b/dsp/specgrm.m	Tue Dec 02 14:51:13 2014 +0000
@@ -5,7 +5,8 @@
 %     N:natural | H:[[N]] ~'window length or window', 
 %     M:natural ~'hop size',
 %     options {
-%		   fs :: nonneg/1	~'sampling rate'
+%		   fs :: nonneg/1	~'sampling rate';
+%      range:: [[2]] ~'range for tfdimage'
 %     }
 %  -> [[1+N/2,floor(T/M)]] ~'sequence of short term spectra'.  
 %
@@ -26,7 +27,9 @@
 
 	% Make Spectrogram Display if no arg out
 	if nargout==0
-		tfdimage(y,n,m,getparam(options(varargin{:}),'fs',1));
+		opts=options('fs',1,'range',13.5,varargin{:});
+
+		tfdimage(y,n,m,opts.fs,opts.range);
 		clear y;
 	end