0001 function b = vertcat(varargin)
0002
0003
0004
0005
0006
0007
0008
0009
0010 ALGONAME = mfilename;
0011 VERSION = '$Id: vertcat.html,v 1.7 2008/01/22 20:43:21 hewitson Exp $';
0012
0013 ai = [];
0014 for j=1:nargin
0015 if isa(varargin{j}, 'ao')
0016 ai = [ai varargin{j}];
0017 end
0018 end
0019
0020 ni = length(ai);
0021
0022
0023 b = [];
0024 for j=1:ni
0025 a = ai(j);
0026 h = history('index', VERSION, [], get(a,'hist'));
0027
0028 aout = ao(a.data, h);
0029
0030 aout = set(aout, 'name', get(a, 'name'));
0031 b = [b;aout];
0032
0033 end
0034
0035
0036