.Modelica_LinearSystems2.Math.Matrices.Internal.householderSimilarityTransformation2

Information

u = (u1, u2, ..., ur,0, ..., 0)

S = I - 2*u*u'/u'*u = [P, 0; 0, I]

dim(P) = r x r,   dim(I) = n-r x n-r

S*A*S = [P*A11*P, P*A12; A21*P, A22]

Interface

function householderSimilarityTransformation2
  import Modelica.Math.Vectors.length;
  input Real A[:, size(A, 1)];
  input Real u[size(A, 1)] "householder vector";
  input Integer r;
  output Real SAS[size(A, 1), size(A, 1)];
end householderSimilarityTransformation2;