dfer/matlab_stuff/rdmnc_multi.m

function Field = rdmnc_multi(varargin);

npath = varargin{1};

if npath < 2
   disp('There cannot be less than 2 paths')
   return
end

if length(varargin) < npath+1
   disp('There should be at least ',num2str(npath),' paths')
   return
end

Field = [];

disp(['Reading path: ',varargin{2}])
  Ftmp1  = rdmnc(varargin{2},varargin{npath+2:end});
disp(['Reading path: ',varargin{3}])
  Ftmp2  = rdmnc(varargin{3},varargin{npath+2:end});
Field  = concatstruct(Ftmp1,Ftmp2);

if npath >= 3
   for i=3:npath
     disp(['Reading path: ',varargin{i+1}])
     Ftmp  = rdmnc(varargin{i+1},varargin{npath+2:end});
     Field = concatstruct(Field,Ftmp);
   end
end

return
1	function Field = rdmnc_multi(varargin);
2
3	npath = varargin{1};
4
5	if npath < 2
6	disp('There cannot be less than 2 paths')
7	return
8	end
9
10	if length(varargin) < npath+1
11	disp('There should be at least ',num2str(npath),' paths')
12	return
13	end
14
15	Field = [];
16
17	disp(['Reading path: ',varargin{2}])
18	Ftmp1 = rdmnc(varargin{2},varargin{npath+2:end});
19	disp(['Reading path: ',varargin{3}])
20	Ftmp2 = rdmnc(varargin{3},varargin{npath+2:end});
21	Field = concatstruct(Ftmp1,Ftmp2);
22
23	if npath >= 3
24	for i=3:npath
25	disp(['Reading path: ',varargin{i+1}])
26	Ftmp = rdmnc(varargin{i+1},varargin{npath+2:end});
27	Field = concatstruct(Field,Ftmp);
28	end
29	end
30
31	return