function D = scaleUncertainty(D,fact)
% Scales uncertain blocks in LFT model.

%   Copyright 2020 The MathWorks, Inc.
[Blocks,bscale] = uscale(D.Blocks,fact);
if ~isempty(bscale)
   % Get channels associated with uncertain blocks
   [~,nu] = getSignalSize(D);
   wU = getRowColSelection(Blocks,bscale);
   indwU = nu+wU;
   % Scale
   D.IC.Response(:,indwU,:) = fact * D.IC.Response(:,indwU,:);
   D.Blocks = Blocks;
end
