Daniel@0: function type = mirtype(x)
Daniel@0: 
Daniel@0: if iscell(x)
Daniel@0:     for i = 1:length(x)
Daniel@0:         type{i} = mirtype(x{i});
Daniel@0:     end
Daniel@0:     return
Daniel@0: end
Daniel@0:     
Daniel@0: if isa(x,'mirdesign')
Daniel@0:     type = get(x,'Type');
Daniel@0: else
Daniel@0:     type = class(x);
Daniel@0: end