\begin{type-func-vars}
  \forkey{SUBROUTINE} \func{PASTIX\_FORTRAN\_SETSCHURARRAY} ( & \var{PASTIX\_DATA},\\
                                                              & \var{SCHURARRAY}, \var{IERR})\\
\end{type-func-vars}\\
\begin{type-var}
\hskip 0.8cm \type{pastix\_data\_ptr\_t}, INTENT(INOUT)& :: \var{PASTIX\_DATA}\\
\hskip 0.8cm \type{FLOAT}, INTENT(OUT), DIMENSION(0) & :: \var{SCHURARRAY}\\
\hskip 0.8cm \type{pastix\_int\_t}, INTENT(OUT) & :: \var{IERR}\\
\end{type-var}\\
\begin{type-func-vars}
  \forkey{END SUBROUTINE} \func{PASTIX\_FORTRAN\_SETSCHURARRAY} &\\
\index{Fonctions@Fonctions!\texttt{PASTIX\_FORTRAN\_SETSCHURARRAY}}
\end{type-func-vars}
