Daniel@0: function h = haspeaks(d)
Daniel@0: 
Daniel@0: if isa(d,'mirdesign')
Daniel@0:     h = strcmp(func2str(get(d,'Method')),'mirpeaks');
Daniel@0: else
Daniel@0:     if iscell(d)
Daniel@0:         d = d{1};
Daniel@0:     end
Daniel@0:     p = get(d,'PeakVal');
Daniel@0:     h = not(isempty(p) || isempty(p{1}) || isempty(p{1}{1}));
Daniel@0: end