function objs = ltpdv_getWorkspaceObjs()% LTPDV_GETWORKSPACEOBJS gets a list of LTPDA user objects currently in the% MATLAB workspace.%% M Hewitson 22-04-08%% $Id: ltpdv_getWorkspaceObjs.m,v 1.2 2008/06/18 15:07:35 hewitson Exp $%% get base workspace variablesws_vars = evalin('base','whos');objs = [];for j=1:length(ws_vars) cmd = sprintf('obj = evalin(''base'', ''%s'');', ws_vars(j).name); eval(cmd) if isa(obj, 'ltpda_uo') objs = [objs ws_vars(j)]; endend