\hypertarget{interfacedc__string_1_1strhead}{}\section{dc\+\_\+string\+:\+:strhead Interface Reference}
\label{interfacedc__string_1_1strhead}\index{dc\+\_\+string\+::strhead@{dc\+\_\+string\+::strhead}}
\subsection*{Private Member Functions}
\begin{DoxyCompactItemize}
\item 
logical function \hyperlink{interfacedc__string_1_1strhead_ace20d99de0b999dccd9c542eb7ed6159}{strhead\+\_\+cc} (whole, head)
\end{DoxyCompactItemize}


\subsection{Detailed Description}


Definition at line 154 of file dc\+\_\+string.\+f90.



\subsection{Member Function/\+Subroutine Documentation}
\mbox{\Hypertarget{interfacedc__string_1_1strhead_ace20d99de0b999dccd9c542eb7ed6159}\label{interfacedc__string_1_1strhead_ace20d99de0b999dccd9c542eb7ed6159}} 
\index{dc\+\_\+string\+::strhead@{dc\+\_\+string\+::strhead}!strhead\+\_\+cc@{strhead\+\_\+cc}}
\index{strhead\+\_\+cc@{strhead\+\_\+cc}!dc\+\_\+string\+::strhead@{dc\+\_\+string\+::strhead}}
\subsubsection{\texorpdfstring{strhead\+\_\+cc()}{strhead\_cc()}}
{\footnotesize\ttfamily logical function dc\+\_\+string\+::strhead\+::strhead\+\_\+cc (\begin{DoxyParamCaption}\item[{character(len = $\ast$), intent(in)}]{whole,  }\item[{character(len = $\ast$), intent(in)}]{head }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Definition at line 402 of file dc\+\_\+string.\+f90.


\begin{DoxyCode}
402     \textcolor{comment}{!}
403     \textcolor{comment}{! 文字列 head と文字列 whole の先頭部分 (head と同じ文字列長)}
404     \textcolor{comment}{! とを比較し、同じものならば .true. を、異なる場合には .false.}
405     \textcolor{comment}{! を返します。 whole の文字列長が head の文字列長よりも短い場合には}
406     \textcolor{comment}{! .false. を返します。}
407     \textcolor{comment}{!}
408     \textcolor{keywordtype}{character(len = *)}, \textcolor{keywordtype}{intent(in)}:: whole
409     \textcolor{keywordtype}{character(len = *)}, \textcolor{keywordtype}{intent(in)}:: head
410 
411     \textcolor{keywordflow}{continue}
412 
413     result = (len(whole) >= len(head))
414     \textcolor{keywordflow}{if} (.not. result) \textcolor{keywordflow}{return}
415     result = (whole(1:len(head)) == head)
416 
\end{DoxyCode}


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