\begin{type-func-vars}
  \forkey{SUBROUTINE} \func{MURGE\_ASSEMBLYSETSEQUENCE} ( & \var{ID}, \var{coefnbr}, \var{ROWs}, \var{COLs},\\
                                                          & \var{op}, \var{op2}, \var{mode}, \var{nodes},\\
                                                          & \var{id\_seq}, \var{IERROR})\\
\end{type-func-vars}\\
\begin{type-var}
\hskip 0.8cm \type{INTS}, INTENT(IN)  & :: \var{ID}\\
\hskip 0.8cm \type{INTL}, INTENT(IN)  & :: \var{coefnbr}\\
\hskip 0.8cm \type{INTS}, INTENT(IN), DIMENSION(0) & :: \var{ROWs}, \var{COLs}\\
\hskip 0.8cm \type{INTS}, INTENT(IN)  & :: \var{op}, \var{op2}, \var{mode}, \var{nodes}\\
\hskip 0.8cm \type{INTS}, INTENT(OUT) & :: \var{id\_seq} \\
\hskip 0.8cm \type{INTS}, INTENT(OUT) & :: \var{IERROR} \\
\end{type-var}\\
\begin{type-func-vars}
  \forkey{END SUBROUTINE} \func{MURGE\_ASSEMBLYSETSEQUENCE} &\\
  \index{Fonctions@Fonctions!\texttt{MURGE\_ASSEMBLYSETSEQUENCE}}
\end{type-func-vars}
