\hypertarget{namespacesysdep}{}\section{sysdep Module Reference}
\label{namespacesysdep}\index{sysdep@{sysdep}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine, public \hyperlink{namespacesysdep_a37f751db0e3ceaa806d8bb2060028d16}{abortprogram} (message)
\item 
integer function, public \hyperlink{namespacesysdep_afbcb9db97a8d166160156e7563c2dfb3}{sysdepargcount} ()
\item 
subroutine, public \hyperlink{namespacesysdep_ad4d71ce353b735ed566a40077ebf5e28}{sysdepargget} (index, val)
\item 
subroutine, public \hyperlink{namespacesysdep_a90af360d3b692c6578c230a12f619548}{sysdepenvget} (env, str)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{namespacesysdep_a37f751db0e3ceaa806d8bb2060028d16}\label{namespacesysdep_a37f751db0e3ceaa806d8bb2060028d16}} 
\index{sysdep@{sysdep}!abortprogram@{abortprogram}}
\index{abortprogram@{abortprogram}!sysdep@{sysdep}}
\subsubsection{\texorpdfstring{abortprogram()}{abortprogram()}}
{\footnotesize\ttfamily subroutine, public sysdep\+::abortprogram (\begin{DoxyParamCaption}\item[{character(len=$\ast$), intent(in), optional}]{message }\end{DoxyParamCaption})}



Definition at line 57 of file sysdep.\+f90.



References dc\+\_\+types\+::stderr.


\begin{DoxyCode}
57     \textcolor{keywordtype}{use }\hyperlink{namespacedc__types}{dc\_types}\textcolor{keywordtype}{, only}: \hyperlink{namespacedc__types_af17f91282e30c86cfe4e45300c17edab}{stderr}
58     \textcolor{keywordtype}{implicit none}
59     \textcolor{keywordtype}{character(len=*)}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{optional} :: message
60     \textcolor{keywordflow}{continue}
61     \textcolor{keywordflow}{if} (\textcolor{keyword}{present}(message)) \textcolor{keyword}{write}(\hyperlink{namespacedc__types_af17f91282e30c86cfe4e45300c17edab}{stderr}, *) trim(message)
62     \textcolor{keyword}{call }dc\_f\_abort()
\end{DoxyCode}
\mbox{\Hypertarget{namespacesysdep_afbcb9db97a8d166160156e7563c2dfb3}\label{namespacesysdep_afbcb9db97a8d166160156e7563c2dfb3}} 
\index{sysdep@{sysdep}!sysdepargcount@{sysdepargcount}}
\index{sysdepargcount@{sysdepargcount}!sysdep@{sysdep}}
\subsubsection{\texorpdfstring{sysdepargcount()}{sysdepargcount()}}
{\footnotesize\ttfamily integer function, public sysdep\+::sysdepargcount (\begin{DoxyParamCaption}{ }\end{DoxyParamCaption})}



Definition at line 66 of file sysdep.\+f90.


\begin{DoxyCode}
66     \textcolor{keywordtype}{implicit none}
67     \hyperlink{namespacesysdep_afbcb9db97a8d166160156e7563c2dfb3}{sysdepargcount} = command\_argument\_count()
\end{DoxyCode}
\mbox{\Hypertarget{namespacesysdep_ad4d71ce353b735ed566a40077ebf5e28}\label{namespacesysdep_ad4d71ce353b735ed566a40077ebf5e28}} 
\index{sysdep@{sysdep}!sysdepargget@{sysdepargget}}
\index{sysdepargget@{sysdepargget}!sysdep@{sysdep}}
\subsubsection{\texorpdfstring{sysdepargget()}{sysdepargget()}}
{\footnotesize\ttfamily subroutine, public sysdep\+::sysdepargget (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{index,  }\item[{character(len = $\ast$), intent(out)}]{val }\end{DoxyParamCaption})}



Definition at line 71 of file sysdep.\+f90.



References sysdepargcount().


\begin{DoxyCode}
71     \textcolor{keywordtype}{implicit none}
72     \textcolor{keywordtype}{integer},            \textcolor{keywordtype}{intent(in)}  :: index
73     \textcolor{keywordtype}{character(len = *)}, \textcolor{keywordtype}{intent(out)} :: val
74     \textcolor{comment}{!}
75     \textcolor{keywordtype}{integer}:: idx
76     \textcolor{keywordtype}{integer}:: argc
77     \textcolor{keywordflow}{continue}
78     argc = \hyperlink{namespacesysdep_afbcb9db97a8d166160156e7563c2dfb3}{sysdepargcount}()
79     \textcolor{keywordflow}{if} (index < 0) \textcolor{keywordflow}{then}
80       idx = argc + 1 + index
81     \textcolor{keywordflow}{else}
82       idx = index
83 \textcolor{keywordflow}{    endif}
84     \textcolor{keywordflow}{if} (idx > argc) \textcolor{keywordflow}{then}
85       val = \textcolor{stringliteral}{''}
86     \textcolor{keywordflow}{else}
87       \textcolor{keyword}{call }get\_command\_argument(index, val)
88 \textcolor{keywordflow}{    end if}
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacesysdep_ad4d71ce353b735ed566a40077ebf5e28_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacesysdep_a90af360d3b692c6578c230a12f619548}\label{namespacesysdep_a90af360d3b692c6578c230a12f619548}} 
\index{sysdep@{sysdep}!sysdepenvget@{sysdepenvget}}
\index{sysdepenvget@{sysdepenvget}!sysdep@{sysdep}}
\subsubsection{\texorpdfstring{sysdepenvget()}{sysdepenvget()}}
{\footnotesize\ttfamily subroutine, public sysdep\+::sysdepenvget (\begin{DoxyParamCaption}\item[{character(len = $\ast$), intent(in)}]{env,  }\item[{character(len = $\ast$), intent(out)}]{str }\end{DoxyParamCaption})}



Definition at line 92 of file sysdep.\+f90.


\begin{DoxyCode}
92     \textcolor{keywordtype}{character(len = *)}, \textcolor{keywordtype}{intent(in)}  :: env
93     \textcolor{keywordtype}{character(len = *)}, \textcolor{keywordtype}{intent(out)} :: str
94     \textcolor{keyword}{call }get\_environment\_variable(trim(adjustl(env)), str)
\end{DoxyCode}
