--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/m-toolbox/test/gui/functions/gltpda_setAOlist.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,30 @@
+function gltpda_setAOlist(handles)
+
+% GLTPDA_SETAOLIST sets the AO list to display the current array of
+% analysis objects.
+% 
+% 
+% M Hewitson 15-02-07
+% 
+% $Id: gltpda_setAOlist.m,v 1.1 2007/03/12 13:00:31 hewitson Exp $
+% 
+
+% get analysis objects
+aos = getappdata(handles.main, 'aos');
+
+aolist = [];
+for j=1:length(aos.objs)
+  
+  a = aos.objs(j);
+  
+  aolist = [aolist cellstr(char(a))];
+end
+
+set(handles.aoList, 'String', aolist);
+set(handles.aoList, 'Value', aos.nobjs);
+
+% Update plots
+gltpda_setPlots(handles)
+
+
+% END
\ No newline at end of file