normalize_mode_shapes Subroutine

public pure subroutine normalize_mode_shapes(x)

Normalizes mode shape vectors such that the largest magnitude value in the vector is one. For each column $\boldsymbol{\phi}_i$, the operation is $$\boldsymbol{\phi}_i\leftarrow \frac{\boldsymbol{\phi}_i}{\phi_{i,k}},\qquad k=\arg\max_j|\phi_{i,j}|.$$

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(inout),		dimension(:,:)	::	x	The matrix of mode shape vectors with one vector per column.

Contents