\hypertarget{interfacedc__args_1_1strict}{}\section{dc\+\_\+args\+:\+:strict Interface Reference}
\label{interfacedc__args_1_1strict}\index{dc\+\_\+args\+::strict@{dc\+\_\+args\+::strict}}
\subsection*{Private Member Functions}
\begin{DoxyCompactItemize}
\item 
subroutine \hyperlink{interfacedc__args_1_1strict_a93fb8afdeaabd364819afb29f3b22ad6}{dcargsstrict0} (arg, severe)
\end{DoxyCompactItemize}


\subsection{Detailed Description}


Definition at line 298 of file dc\+\_\+args.\+f90.



\subsection{Member Function/\+Subroutine Documentation}
\mbox{\Hypertarget{interfacedc__args_1_1strict_a93fb8afdeaabd364819afb29f3b22ad6}\label{interfacedc__args_1_1strict_a93fb8afdeaabd364819afb29f3b22ad6}} 
\index{dc\+\_\+args\+::strict@{dc\+\_\+args\+::strict}!dcargsstrict0@{dcargsstrict0}}
\index{dcargsstrict0@{dcargsstrict0}!dc\+\_\+args\+::strict@{dc\+\_\+args\+::strict}}
\subsubsection{\texorpdfstring{dcargsstrict0()}{dcargsstrict0()}}
{\footnotesize\ttfamily subroutine dc\+\_\+args\+::strict\+::dcargsstrict0 (\begin{DoxyParamCaption}\item[{type(\hyperlink{structdc__args_1_1args}{args}), intent(inout)}]{arg,  }\item[{logical, intent(in), optional}]{severe }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Definition at line 746 of file dc\+\_\+args.\+f90.


\begin{DoxyCode}
746     \textcolor{comment}{!}
747     \textcolor{comment}{! オプションチェックを行います. }
748     \textcolor{comment}{!}
749     \textcolor{comment}{! コマンドライン引数のオプションとして指定されたものの内,}
750     \textcolor{comment}{! DCArgsOption サブルーチンで設定されていないものが存在する}
751     \textcolor{comment}{! 場合には警告を返します. *severe* に .true. を指定すると}
752     \textcolor{comment}{! エラーを返して終了します.}
753     \textcolor{comment}{! このサブルーチンを呼ぶ前に, DCArgsOption, DCArgsDebug, }
754     \textcolor{comment}{! DCArgsHelp サブルーチンを呼んでください.}
755     \textcolor{comment}{!}
756     \textcolor{comment}{! 構造体 ARGS の変数に対してこのサブルーチンを適用しておく}
757     \textcolor{comment}{! ことで, コマンドライン引数として与えたオプションが正しく}
758     \textcolor{comment}{! プログラムが認識しているかどうかをチェックすることができます.}
759     \textcolor{comment}{!}
760     \textcolor{comment}{!}
761     \textcolor{keywordtype}{use }\hyperlink{namespacedc__types}{dc\_types}\textcolor{keywordtype}{, only}: \hyperlink{namespacedc__types_adb76910ff05e3b9fe3436567f8f8dac6}{string}
762     \textcolor{keywordtype}{use }\hyperlink{namespacedc__present}{dc\_present}\textcolor{keywordtype}{, only}: \hyperlink{namespacedc__present_ab280582985ee69fda00e2a0bf09194af}{present\_and\_true}
763     \textcolor{keywordtype}{use }\hyperlink{namespacedc__message}{dc\_message}\textcolor{keywordtype}{, only}: \hyperlink{interfacedc__message_1_1messagenotify}{messagenotify}
764     \textcolor{keywordtype}{implicit none}
765     \textcolor{keywordtype}{type}(args), \textcolor{keywordtype}{intent(inout)} :: arg
766     \textcolor{keywordtype}{logical}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{optional} :: severe
767     \textcolor{keywordtype}{character(STRING)} :: err\_mess
768     \textcolor{keywordtype}{integer} :: i
769     \textcolor{keywordtype}{character(len = *)}, \textcolor{keywordtype}{parameter}  :: subname = \textcolor{stringliteral}{'DCArgsStrict'}
770   \textcolor{keywordflow}{continue}
771     \textcolor{keywordflow}{if} (.not. arg % initialized) \textcolor{keywordflow}{then}
772       \textcolor{keyword}{call }\hyperlink{interfacedc__message_1_1messagenotify}{messagenotify}(\textcolor{stringliteral}{'W'}, subname, \textcolor{stringliteral}{'Call Open before Help in dc\_args.'})
773       \textcolor{keyword}{call }dcargsopen(arg)
774 \textcolor{keywordflow}{    end if}
775     \textcolor{keywordflow}{do} i = 1, \textcolor{keyword}{size}(arg % cmd\_opts\_list)
776       err\_mess = trim(arg % cmd\_opts\_list(i) % name) // \textcolor{stringliteral}{' is invalid option.'}
777       \textcolor{keywordflow}{if} (.not. arg % cmd\_opts\_list(i) % flag\_called) \textcolor{keywordflow}{then}
778         \textcolor{keywordflow}{if} (\hyperlink{namespacedc__present_ab280582985ee69fda00e2a0bf09194af}{present\_and\_true}(severe)) \textcolor{keywordflow}{then}
779           \textcolor{keyword}{call }\hyperlink{interfacedc__message_1_1messagenotify}{messagenotify}(\textcolor{stringliteral}{'E'}, subname, err\_mess)
780         \textcolor{keywordflow}{else}
781           \textcolor{keyword}{call }\hyperlink{interfacedc__message_1_1messagenotify}{messagenotify}(\textcolor{stringliteral}{'W'}, subname, err\_mess)
782 \textcolor{keywordflow}{        end if}
783 \textcolor{keywordflow}{      end if}
784 \textcolor{keywordflow}{    end do}
\end{DoxyCode}


The documentation for this interface was generated from the following file\+:\begin{DoxyCompactItemize}
\item 
dc\+\_\+utils/\hyperlink{dc__args_8f90}{dc\+\_\+args.\+f90}\end{DoxyCompactItemize}
