Example 3 (from Program LA_HESV_EXAMPLE)

$$\hspace{-0.50 cm} A = \left( \begin{array}{ccccc} 1 & 4 +... ... \\ 17 + 43i \\ 47 + 23i \\ 39 + 31i \\ 56 \end{array} \right)$$

Arrays ${\bf A}$ and ${\bf B}$ on entry:

$$\begin{array}{c} {\bf A} \\ \begin{array}{\vert ccccc\ver... ...(47,23) \\ (39,31) \\ (56,0) \\ \hline \end{array} \end{array}$$

Elements marked $\ast$ are not used by the routine.

The call:
CALL LA_HESV( A, B, IPIV=IPIV )

${\bf A}$, ${\bf B}$ and ${\bf IPIV}$ on exit:

$$\begin{array}{c} {\bf A} \\ \begin{array}{\vert ccc} \hli... ...ast \\ \ast & \ast & \ast \\ \hline \end{array} \end{array}$$

$$\begin{array}{c} {\bf A (continued)} \\ \begin{array}{cc\... ... \\ \ast & ( 3.00000, 0 ) \\ \hline \end{array} \end{array}$$

$$\begin{array}{cc} {\bf B} \\ \begin{array}{\vert r\vert} ... ...ne 1 \\ -2 \\ -2 \\ -2 \\ -2 \\ \hline \end{array} \end{array}$$

The solution of the system $A\,x = b$ is:

$$x = \left( \begin{array}{rrr} 1.00000 + 1.00000i \\ 1.0000... ...00000 + 1.00000i \\ 1.00000 + 1.00000i \end{array} \right).$$