returns wave object for vol, if available (empty if not) $Id: pr_getwave.m,v 1.3 2005/06/05 04:42:22 matthewbrett Exp $
0001 function wave = pr_getwave(vol) 0002 % returns wave object for vol, if available (empty if not) 0003 % 0004 % $Id: pr_getwave.m,v 1.3 2005/06/05 04:42:22 matthewbrett Exp $ 0005 0006 if nargin < 1 0007 error('Need vol as arg'); 0008 end 0009 wave = []; 0010 if ~isstruct(vol), return, end 0011 tmp = pr_matfilerw(vol); 0012 if isfield(tmp{1}, 'wave') 0013 wave = tmp{1}.wave; 0014 end