\hypertarget{interfaceut__mpi__module_1_1interpolate__ut}{}\doxysection{ut\+\_\+mpi\+\_\+module\+::interpolate\+\_\+ut Interface Reference}
\label{interfaceut__mpi__module_1_1interpolate__ut}\index{ut\_mpi\_module::interpolate\_ut@{ut\_mpi\_module::interpolate\_ut}}
\doxysubsection*{Private Member Functions}
\begin{DoxyCompactItemize}
\item 
real(dp) function \mbox{\hyperlink{interfaceut__mpi__module_1_1interpolate__ut_ae50438fae536b783e789d40b5e3f0325}{interpolate\+\_\+array000\+\_\+ut}} (ut\+\_\+data, alon, alat, arad)
\end{DoxyCompactItemize}


\doxysubsection{Detailed Description}


Definition at line 418 of file ut\+\_\+mpi\+\_\+module.\+f90.



\doxysubsection{Member Function/\+Subroutine Documentation}
\mbox{\Hypertarget{interfaceut__mpi__module_1_1interpolate__ut_ae50438fae536b783e789d40b5e3f0325}\label{interfaceut__mpi__module_1_1interpolate__ut_ae50438fae536b783e789d40b5e3f0325}} 
\index{ut\_mpi\_module::interpolate\_ut@{ut\_mpi\_module::interpolate\_ut}!interpolate\_array000\_ut@{interpolate\_array000\_ut}}
\index{interpolate\_array000\_ut@{interpolate\_array000\_ut}!ut\_mpi\_module::interpolate\_ut@{ut\_mpi\_module::interpolate\_ut}}
\doxysubsubsection{\texorpdfstring{interpolate\_array000\_ut()}{interpolate\_array000\_ut()}}
{\footnotesize\ttfamily real(dp) function ut\+\_\+mpi\+\_\+module\+::interpolate\+\_\+ut\+::interpolate\+\_\+array000\+\_\+ut (\begin{DoxyParamCaption}\item[{real(dp), dimension(nmc,0\+:\mbox{\hyperlink{namespaceut__mpi__module_a24756c76cd950e046fe1188ccbf151d4}{lm}}), intent(in)}]{ut\+\_\+data,  }\item[{real(dp), intent(in)}]{alon,  }\item[{real(dp), intent(in)}]{alat,  }\item[{real(dp), intent(in)}]{arad }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Definition at line 2054 of file ut\+\_\+mpi\+\_\+module.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{2054       \textcolor{comment}{!}}
\DoxyCodeLine{2055       \textcolor{comment}{! 緯度 alon, 経度 alat 動径 arad における関数値を}}
\DoxyCodeLine{2056       \textcolor{comment}{! その球面調和変換係数 wa\_data から補間計算する}}
\DoxyCodeLine{2057       \textcolor{comment}{!}}
\DoxyCodeLine{2058 \textcolor{keywordtype}{      real}(DP), \textcolor{keywordtype}{intent(IN)} :: ut\_data(nmc,0:lm)         \textcolor{comment}{! スペクトルデータ}}
\DoxyCodeLine{2059 \textcolor{keywordtype}{      real}(DP), \textcolor{keywordtype}{intent(IN)} :: alon                     \textcolor{comment}{! 補間する位置(経度)}}
\DoxyCodeLine{2060 \textcolor{keywordtype}{      real}(DP), \textcolor{keywordtype}{intent(IN)} :: alat                     \textcolor{comment}{! 補間する位置(緯度)}}
\DoxyCodeLine{2061 \textcolor{keywordtype}{      real}(DP), \textcolor{keywordtype}{intent(IN)} :: arad                     \textcolor{comment}{! 補間する位置(動径)}}
\DoxyCodeLine{2062 \textcolor{keywordtype}{      real}(DP) :: Interpolate\_array000\_ut              \textcolor{comment}{! 補間した値}}
\DoxyCodeLine{2063 }
\DoxyCodeLine{2064 \textcolor{keywordtype}{      real}(DP) :: wa\_data(nc,1)                  \textcolor{comment}{! 補間した値}}
\DoxyCodeLine{2065 }
\DoxyCodeLine{2066       wa\_data = wa\_ua(reshape(a\_interpolate\_at(ut\_data,arad),(/nmc,1/)))}
\DoxyCodeLine{2067       interpolate\_array000\_ut = interpolate\_w(wa\_data(:,1),alon,alat)}
\DoxyCodeLine{2068 }

\end{DoxyCode}


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