\hypertarget{interfacew__module__base_1_1nm__l}{}\doxysection{w\+\_\+module\+\_\+base\+::nm\+\_\+l Interface Reference}
\label{interfacew__module__base_1_1nm__l}\index{w\_module\_base::nm\_l@{w\_module\_base::nm\_l}}
\doxysubsection*{Private Member Functions}
\begin{DoxyCompactItemize}
\item 
integer function, dimension(2) \mbox{\hyperlink{interfacew__module__base_1_1nm__l_a22665a6285eab571548322164c99fd53}{nm\+\_\+l\+\_\+int}} (l)
\begin{DoxyCompactList}\small\item\em スペクトルデータの格納位置(l)から全波数(n)と東西波数(m)を返す. \end{DoxyCompactList}\item 
integer function, dimension(2) \mbox{\hyperlink{interfacew__module__base_1_1nm__l_a910d3c9666c218c666ab5aa1a36e976c}{nm\+\_\+l\+\_\+dint}} (l)
\begin{DoxyCompactList}\small\item\em スペクトルデータの格納位置(l)から全波数(n)と東西波数(m)を返す. \end{DoxyCompactList}\item 
integer function, dimension(size(larray), 2) \mbox{\hyperlink{interfacew__module__base_1_1nm__l_aa4f3292666d6c8e1efde04517009c710}{nm\+\_\+l\+\_\+array}} (larray)
\begin{DoxyCompactList}\small\item\em スペクトルデータの格納位置(l)から全波数(n)と東西波数(m)を返す \end{DoxyCompactList}\item 
integer function, dimension(size(larray), 2) \mbox{\hyperlink{interfacew__module__base_1_1nm__l_a48d2b45eb4d0c2399cb13cd13be0f901}{nm\+\_\+l\+\_\+darray}} (larray)
\begin{DoxyCompactList}\small\item\em スペクトルデータの格納位置(l)から全波数(n)と東西波数(m)を返す \end{DoxyCompactList}\end{DoxyCompactItemize}


\doxysubsection{Detailed Description}


Definition at line 115 of file w\+\_\+module\+\_\+base.\+f90.



\doxysubsection{Member Function/\+Subroutine Documentation}
\mbox{\Hypertarget{interfacew__module__base_1_1nm__l_aa4f3292666d6c8e1efde04517009c710}\label{interfacew__module__base_1_1nm__l_aa4f3292666d6c8e1efde04517009c710}} 
\index{w\_module\_base::nm\_l@{w\_module\_base::nm\_l}!nm\_l\_array@{nm\_l\_array}}
\index{nm\_l\_array@{nm\_l\_array}!w\_module\_base::nm\_l@{w\_module\_base::nm\_l}}
\doxysubsubsection{\texorpdfstring{nm\_l\_array()}{nm\_l\_array()}}
{\footnotesize\ttfamily integer function, dimension(size(larray),2) w\+\_\+module\+\_\+base\+::nm\+\_\+l\+::nm\+\_\+l\+\_\+array (\begin{DoxyParamCaption}\item[{integer, dimension(\+:), intent(in)}]{larray }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



スペクトルデータの格納位置(l)から全波数(n)と東西波数(m)を返す 

引数 larray が整数 1 次元配列の場合, larray に対応する n, m を格納した 2 次元整数配列を返す. nm\+\_\+l\+\_\+array(\+:,1) が全波数, nm\+\_\+l\+\_\+array(\+:,2) が帯状波数である. 
\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em larray} & 全波数, 帯状波数 \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
スペクトルデータの格納位置 
\end{DoxyReturn}


Definition at line 793 of file w\+\_\+module\+\_\+base.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{793 }
\DoxyCodeLine{794     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}  :: larray(:)}
\DoxyCodeLine{796     \textcolor{keywordtype}{integer}              :: nm\_l\_array(size(larray),2)}
\DoxyCodeLine{797 }
\DoxyCodeLine{798     \textcolor{keywordtype}{integer}              :: i}
\DoxyCodeLine{799     \textcolor{keywordflow}{do} i=1, \textcolor{keyword}{size}(larray)}
\DoxyCodeLine{800       nm\_l\_array(i,:) = nm\_l\_int(larray(i))}
\DoxyCodeLine{801 \textcolor{keywordflow}{    enddo}}

\end{DoxyCode}
\mbox{\Hypertarget{interfacew__module__base_1_1nm__l_a48d2b45eb4d0c2399cb13cd13be0f901}\label{interfacew__module__base_1_1nm__l_a48d2b45eb4d0c2399cb13cd13be0f901}} 
\index{w\_module\_base::nm\_l@{w\_module\_base::nm\_l}!nm\_l\_darray@{nm\_l\_darray}}
\index{nm\_l\_darray@{nm\_l\_darray}!w\_module\_base::nm\_l@{w\_module\_base::nm\_l}}
\doxysubsubsection{\texorpdfstring{nm\_l\_darray()}{nm\_l\_darray()}}
{\footnotesize\ttfamily integer function, dimension(size(larray),2) w\+\_\+module\+\_\+base\+::nm\+\_\+l\+::nm\+\_\+l\+\_\+darray (\begin{DoxyParamCaption}\item[{integer(8), dimension(\+:), intent(in)}]{larray }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



スペクトルデータの格納位置(l)から全波数(n)と東西波数(m)を返す 

引数 larray が整数 1 次元配列の場合, larray に対応する n, m を格納した 2 次元整数配列を返す. nm\+\_\+l\+\_\+array(\+:,1) が全波数, nm\+\_\+l\+\_\+array(\+:,2) が帯状波数である. 
\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em larray} & 全波数, 帯状波数 \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
スペクトルデータの格納位置 
\end{DoxyReturn}


Definition at line 812 of file w\+\_\+module\+\_\+base.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{812 }
\DoxyCodeLine{813     \textcolor{keywordtype}{integer(8)}, \textcolor{keywordtype}{intent(in)}  :: larray(:)}
\DoxyCodeLine{815     \textcolor{keywordtype}{integer}                 :: nm\_l\_darray(size(larray),2)}
\DoxyCodeLine{816 }
\DoxyCodeLine{817     \textcolor{keywordtype}{integer}              :: i}
\DoxyCodeLine{818     \textcolor{keywordflow}{do} i=1, \textcolor{keyword}{size}(larray)}
\DoxyCodeLine{819       nm\_l\_darray(i,:) = nm\_l\_dint(larray(i))}
\DoxyCodeLine{820 \textcolor{keywordflow}{    enddo}}

\end{DoxyCode}
\mbox{\Hypertarget{interfacew__module__base_1_1nm__l_a910d3c9666c218c666ab5aa1a36e976c}\label{interfacew__module__base_1_1nm__l_a910d3c9666c218c666ab5aa1a36e976c}} 
\index{w\_module\_base::nm\_l@{w\_module\_base::nm\_l}!nm\_l\_dint@{nm\_l\_dint}}
\index{nm\_l\_dint@{nm\_l\_dint}!w\_module\_base::nm\_l@{w\_module\_base::nm\_l}}
\doxysubsubsection{\texorpdfstring{nm\_l\_dint()}{nm\_l\_dint()}}
{\footnotesize\ttfamily integer function, dimension(2) w\+\_\+module\+\_\+base\+::nm\+\_\+l\+::nm\+\_\+l\+\_\+dint (\begin{DoxyParamCaption}\item[{integer(8), intent(in)}]{l }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



スペクトルデータの格納位置(l)から全波数(n)と東西波数(m)を返す. 

引数 l が整数値の場合, 対応する全波数と帯状波数を 長さ 2 の 1 次元整数値を返す. nm\+\_\+l(1) が全波数, nm\+\_\+l(2) が帯状波数である. \begin{DoxyReturn}{Returns}
全波数, 帯状波数 
\end{DoxyReturn}

\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em l} & スペクトルデータの格納位置 \\
\hline
\end{DoxyParams}


Definition at line 770 of file w\+\_\+module\+\_\+base.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{770 }
\DoxyCodeLine{771     \textcolor{keywordtype}{integer}                :: nm\_l\_dint(2)}
\DoxyCodeLine{773     \textcolor{keywordtype}{integer(8)}, \textcolor{keywordtype}{intent(in)} :: l}
\DoxyCodeLine{774 }
\DoxyCodeLine{775     \textcolor{keywordtype}{integer(8)}             :: ld}
\DoxyCodeLine{776     \textcolor{keywordtype}{integer(8)}             :: nd}
\DoxyCodeLine{777     \textcolor{keywordtype}{integer(8)}             :: md}
\DoxyCodeLine{778 }
\DoxyCodeLine{779     ld = l}
\DoxyCodeLine{780     \textcolor{keyword}{call }sxl2nm(nn,ld,nd,md)}
\DoxyCodeLine{781     nm\_l\_dint = int((/nd,md/))}
\DoxyCodeLine{782 }

\end{DoxyCode}
\mbox{\Hypertarget{interfacew__module__base_1_1nm__l_a22665a6285eab571548322164c99fd53}\label{interfacew__module__base_1_1nm__l_a22665a6285eab571548322164c99fd53}} 
\index{w\_module\_base::nm\_l@{w\_module\_base::nm\_l}!nm\_l\_int@{nm\_l\_int}}
\index{nm\_l\_int@{nm\_l\_int}!w\_module\_base::nm\_l@{w\_module\_base::nm\_l}}
\doxysubsubsection{\texorpdfstring{nm\_l\_int()}{nm\_l\_int()}}
{\footnotesize\ttfamily integer function, dimension(2) w\+\_\+module\+\_\+base\+::nm\+\_\+l\+::nm\+\_\+l\+\_\+int (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{l }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



スペクトルデータの格納位置(l)から全波数(n)と東西波数(m)を返す. 

引数 l が整数値の場合, 対応する全波数と帯状波数を 長さ 2 の 1 次元整数値を返す. nm\+\_\+l(1) が全波数, nm\+\_\+l(2) が帯状波数である. \begin{DoxyReturn}{Returns}
全波数, 帯状波数 
\end{DoxyReturn}

\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em l} & スペクトルデータの格納位置 \\
\hline
\end{DoxyParams}


Definition at line 747 of file w\+\_\+module\+\_\+base.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{747 }
\DoxyCodeLine{748     \textcolor{keywordtype}{integer}               :: nm\_l\_int(2)}
\DoxyCodeLine{750     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}   :: l}
\DoxyCodeLine{751 }
\DoxyCodeLine{752     \textcolor{keywordtype}{integer(8)}            :: ld}
\DoxyCodeLine{753     \textcolor{keywordtype}{integer(8)}            :: nd}
\DoxyCodeLine{754     \textcolor{keywordtype}{integer(8)}            :: md}
\DoxyCodeLine{755 }
\DoxyCodeLine{756     ld = l}
\DoxyCodeLine{757     \textcolor{keyword}{call }sxl2nm(nn,ld,nd,md)}
\DoxyCodeLine{758     nm\_l\_int = int((/nd,md/))}
\DoxyCodeLine{759 }

\end{DoxyCode}


The documentation for this interface was generated from the following file\+:\begin{DoxyCompactItemize}
\item 
w\+\_\+module/\mbox{\hyperlink{w__module__base_8f90}{w\+\_\+module\+\_\+base.\+f90}}\end{DoxyCompactItemize}
