\hypertarget{interfacedc__url_1_1urlsearchiorange}{}\section{dc\+\_\+url\+:\+:urlsearchiorange Interface Reference}
\label{interfacedc__url_1_1urlsearchiorange}\index{dc\+\_\+url\+::urlsearchiorange@{dc\+\_\+url\+::urlsearchiorange}}
\subsection*{Private Member Functions}
\begin{DoxyCompactItemize}
\item 
character(len=string) function \hyperlink{interfacedc__url_1_1urlsearchiorange_a8fbfb91066ae0e9a83dfacd8907464b8}{url\+\_\+search\+\_\+iorange} (fullname, dimvar)
\end{DoxyCompactItemize}


\subsection{Detailed Description}


Definition at line 71 of file dc\+\_\+url.\+f90.



\subsection{Member Function/\+Subroutine Documentation}
\mbox{\Hypertarget{interfacedc__url_1_1urlsearchiorange_a8fbfb91066ae0e9a83dfacd8907464b8}\label{interfacedc__url_1_1urlsearchiorange_a8fbfb91066ae0e9a83dfacd8907464b8}} 
\index{dc\+\_\+url\+::urlsearchiorange@{dc\+\_\+url\+::urlsearchiorange}!url\+\_\+search\+\_\+iorange@{url\+\_\+search\+\_\+iorange}}
\index{url\+\_\+search\+\_\+iorange@{url\+\_\+search\+\_\+iorange}!dc\+\_\+url\+::urlsearchiorange@{dc\+\_\+url\+::urlsearchiorange}}
\subsubsection{\texorpdfstring{url\+\_\+search\+\_\+iorange()}{url\_search\_iorange()}}
{\footnotesize\ttfamily character(len = string) function dc\+\_\+url\+::urlsearchiorange\+::url\+\_\+search\+\_\+iorange (\begin{DoxyParamCaption}\item[{character(len = $\ast$), intent(in)}]{fullname,  }\item[{character(len = $\ast$), intent(in)}]{dimvar }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Definition at line 215 of file dc\+\_\+url.\+f90.


\begin{DoxyCode}
215     \textcolor{comment}{!}
216     \textcolor{comment}{! 変数 URL *fullname* 内の, 次元 *dimvar* に関する}
217     \textcolor{comment}{! 入出力範囲指定の値を取得します。}
218     \textcolor{comment}{!}
219     \textcolor{comment}{! fullname には gtool4 変数全体または入出力範囲指定部分の値を与えます。}
220     \textcolor{comment}{! dimvar には入出力範囲指定部分に含まれる次元変数名を与えます。}
221     \textcolor{comment}{! dimvar に対応する次元変数が存在する場合、その値を返します。}
222     \textcolor{comment}{! dimvar に対応する次元変数が存在しない場合、空文字を返します。}
223     \textcolor{comment}{!}
224     \textcolor{keywordtype}{use }\hyperlink{namespacedc__types}{dc\_types}\textcolor{keywordtype}{, only}: \hyperlink{namespacedc__types_adb76910ff05e3b9fe3436567f8f8dac6}{string}
225     \textcolor{keywordtype}{use }\hyperlink{namespacedc__string}{dc\_string}\textcolor{keywordtype}{, only}: \hyperlink{interfacedc__string_1_1split}{split}
226     \textcolor{keywordtype}{character(len = *)}, \textcolor{keywordtype}{intent(in)}:: fullname
227     \textcolor{keywordtype}{character(len = *)}, \textcolor{keywordtype}{intent(in)}:: dimvar
228     \textcolor{keywordtype}{character(len = STRING)}:: result
229     \textcolor{keywordtype}{character(STRING)}:: file, var, attr, iorange
230     \textcolor{keywordtype}{character(STRING)}, \textcolor{keywordtype}{pointer} :: ioranges\_slice(:) => null()
231     \textcolor{keywordtype}{integer} :: \hyperlink{namespacedcunits__com_a5742752149f55f07bd09fc85d59f7319}{i}, eqpos, atmark
232   \textcolor{keywordflow}{continue}
233     result = \textcolor{stringliteral}{""}
234     \textcolor{comment}{! @ または ? が含まれているなら urlsplit で分離}
235     atmark = index(fullname, gt\_question)
236     \textcolor{keywordflow}{if} (atmark == 0) atmark = index(fullname, gt\_atmark)
237     \textcolor{keywordflow}{if} (atmark /= 0) \textcolor{keywordflow}{then}
238       \textcolor{keyword}{call }\hyperlink{interfacedc__url_1_1urlsplit}{urlsplit}(fullname, file=file, var=var, attr=attr, iorange=iorange)
239     \textcolor{keywordflow}{else}
240       iorange = fullname
241 \textcolor{keywordflow}{    end if}
242     \textcolor{keyword}{call }\hyperlink{interfacedc__string_1_1split}{split}(iorange, ioranges\_slice, gt\_comma)
243     \textcolor{keywordflow}{do} \hyperlink{namespacedcunits__com_a5742752149f55f07bd09fc85d59f7319}{i} = 1, \textcolor{keyword}{size}(ioranges\_slice)
244       eqpos = index(ioranges\_slice(\hyperlink{namespacedcunits__com_a5742752149f55f07bd09fc85d59f7319}{i}), gt\_equal)
245       \textcolor{keywordflow}{if} (ioranges\_slice(\hyperlink{namespacedcunits__com_a5742752149f55f07bd09fc85d59f7319}{i})(1:eqpos-1) == trim(dimvar)) \textcolor{keywordflow}{then}
246         result = trim(ioranges\_slice(\hyperlink{namespacedcunits__com_a5742752149f55f07bd09fc85d59f7319}{i})(eqpos+1:))
247         \textcolor{keywordflow}{exit}
248 \textcolor{keywordflow}{      end if}
249 \textcolor{keywordflow}{    end do}
250     \textcolor{keyword}{deallocate}(ioranges\_slice)
\end{DoxyCode}


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