lpvhinf.m

来自「线性时变系统控制器设计的工具包」· M 代码 · 共 30 行

function [vhinf,vfreq] = lpvhinf(vlpv);

% [vhinf,vfreq] = lpvhinf(vlpv);
%
% Calculates H_inf norms for 1 or more LTI systems 
% (or evaluations of an LPV system).  
%
% Input:   vlpv 	 A varying array of systems matrices
% Outputs: vhinf         H_inf norms in a varying matrix
%          vfreq	 Frequencies where the peaks occur

if nargin == 0
 disp(['usage: [vhinf,vfreq] = lpvhinf(vlpv)']);
 return
end

[typ,dum1,dum2,npts] = minfo(vlpv);
vhinf = zeros(npts,1);
vfreq = zeros(npts,1);

for k=1:npts
 out = hinfnorm(xtracti(vlpv,k,1));
 vhinf(k) = out(2);
 vfreq(k) = out(3);
end

viv = getiv(vlpv);
vhinf = vpck(vhinf,viv);
vfreq = vpck(vfreq,viv);