function fresp = evalfr_(sys,s)
% Computes frequency response at complex frequency

% Copyright 1986-2014 The MathWorks, Inc.
fresp = zeros(size(sys));
Data = sys.Data_;
for ct=1:numel(Data)
   fresp(:,:,ct) = evalfr(Data(ct),s);
end