next up previous contents index
Next: Interface diag_spinor Up: Module matrix_module Previous: Interface partial_TraceMult_spinor   Contents   Index

Interface Re_diag


\begin{boxedminipage}{\textwidth}
\begin{verbatim}m1 = Re_diag(a)\end{verbatim}
\end{boxedminipage}

Make real the diagonal elements of a given matrix a .

a -- intent(in), type(MatrixZ) or type(MatrixD)

Return value -- real(dp), dimension(a%N)
diag_spinor interface

gabor 2009-06-30