Mercurial > hg > ltpda
view m-toolbox/test/gui/functions/gltpda_times.m @ 19:69e3d49b4b0c database-connection-manager
Update ltpda_uo.fromRepository
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Mon, 05 Dec 2011 16:20:06 +0100 |
parents | f0afece42f48 |
children |
line wrap: on
line source
function gltpda_times(handles) % GLTPDA_TIMES multiply an array of analysis objects. % % M Hewitson 15-02-07 % % $Id: gltpda_times.m,v 1.2 2007/03/14 16:06:10 hewitson Exp $ % %% Get selected AOs % get AO array aos = getappdata(handles.main, 'aos'); % Get selected objects selected = get(handles.aoList, 'Value'); as = aos.objs(selected); %% Add these together using lincom if length(as) < 2 error('### Select at least two analysis objects.'); else b = as(1); for j=2:length(as) b = b*as(j); end end %% Add new ao to list % Add to object array aos.objs = [aos.objs b]; aos.nobjs = aos.nobjs + length(b); % Set array setappdata(handles.main, 'aos', aos); % Update object list gltpda_setAOlist(handles); % END