function value=subsref(obj,subscript)
%SUBSREF subsref for a AVIFILE object

%   Copyright 1984-2000 The MathWorks, Inc.
%   $Revision: 1.1 $  $Date: 2000/01/30 16:14:28 $

if length(subscript) > 1
  error('AVIFILE objects only support one level of subscripting.');
end

switch subscript.type
 case '.'
  param = subscript.subs;    
  value = get(obj,param);
 otherwise
  error('AVIFILE objects only support structure subscripting.')
end
