function ImpRespObj = deletesys(ImpRespObj,indDelete);
%DELETESYS Remove systems from the Impulse Response Objects

%   Karen D. Gondoly: 4-7-98
%   Copyright 1986-2000 The MathWorks, Inc. 
% $Revision: 1.3 $

%---Remove all the Systems' data
ImpRespObj.PeakResponseValue(indDelete)=[];
ImpRespObj.SettlingTimeValue(indDelete)=[];

%---Delete Parent Properties
ImpRespObj.response = deletesys(ImpRespObj.response,indDelete);
UImenu = get(ImpRespObj.response,'UIContextMenu');
set(UImenu.Main,'UserData',ImpRespObj);