tfr_clear.m

来自「linear time－frequency toolbox」· M 代码 · 共 27 行

function tfr_clear(self);
%TFR_CLEAR   Clear time-frequency represenation object
%   Usage:  tfr_clear(handle);
%
%   This clears the TFR object represented by handle. This
%   will free some memory.
%
%   SEE ALSO:  TFR_CREATE, TFR_CLEARALL

global TF_STORAGE

% Initialise it for the first time.
if prod(size(TF_STORAGE))==0
  error('Please run tfr_init to obtain a valid handle.');
end;

% Default to DGT
TF_STORAGE.data{self}={};

% If this happends to be the last object on the stack,
% decrease the point. This should prevent TF_STORAGE from
% growing for most common cases.
if self+1==TF_STORAGE.next
  TF_STORAGE.next=self;
end;