\hypertarget{namespacew__module__integral}{}\section{w\+\_\+module\+\_\+integral Module Reference}
\label{namespacew__module__integral}\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}


\hyperlink{namespacew__module}{w\+\_\+module} の下部モジュール\+: 積分・平均  


\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
real(dp) function, public \hyperlink{namespacew__module__integral_aee775f5db056a1cbe1e0d12459c9f1ea}{intlat\+\_\+y} (y\+\_\+data)
\begin{DoxyCompactList}\small\item\em 1 次元緯度(\+Y)格子点データの Y 方向積分(1 層用). \end{DoxyCompactList}\item 
real(dp) function, public \hyperlink{namespacew__module__integral_ac7ba110474a4ab162f9b4e7397b2dc91}{intlon\+\_\+x} (x\+\_\+data)
\begin{DoxyCompactList}\small\item\em 1 次元経度(\+X)格子点データの X 方向積分(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension(0\+:im-\/1), public \hyperlink{namespacew__module__integral_a63f03bca68fcc1d72b665e5a1ef12b68}{x\+\_\+intlat\+\_\+xy} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 2 次元緯度経度格子点データの緯度(\+Y)方向積分(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension(1\+:jm), public \hyperlink{namespacew__module__integral_a38a305bdc56997297d5d6f2e46ab38b3}{y\+\_\+intlon\+\_\+xy} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 2 次元緯度経度格子点データの経度(\+X)方向積分(1 層用). \end{DoxyCompactList}\item 
real(dp) function, public \hyperlink{namespacew__module__integral_a681cc02a96b569a528fd0e9cff0a878b}{intlonlat\+\_\+xy} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 2 次元緯度経度格子点データの全領域積分(1 層用). \end{DoxyCompactList}\item 
real(dp) function, public \hyperlink{namespacew__module__integral_a6d7a3294fdda72a4cc589a6630414d74}{avrlat\+\_\+y} (y\+\_\+data)
\begin{DoxyCompactList}\small\item\em 1 次元(\+Y)格子点データの緯度(\+Y)方向平均(1 層用). \end{DoxyCompactList}\item 
real(dp) function, public \hyperlink{namespacew__module__integral_a6f252f1df33c794abdf86114346bf1c5}{avrlon\+\_\+x} (x\+\_\+data)
\begin{DoxyCompactList}\small\item\em 1 次元(\+X)格子点データの経度(\+X)方向平均(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension(im), public \hyperlink{namespacew__module__integral_aec162c0bf27dd164bc686a38e9c084cb}{x\+\_\+avrlat\+\_\+xy} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 2 次元緯度経度格子点データの緯度(\+Y)方向平均(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension(1\+:jm), public \hyperlink{namespacew__module__integral_ada18b7030e3bf35699bd0af8611a183d}{y\+\_\+avrlon\+\_\+xy} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 2 次元緯度経度格子点データの経度(\+X)方向平均(1 層用). \end{DoxyCompactList}\item 
real(dp) function, public \hyperlink{namespacew__module__integral_ae81714fa06a9b31798ef10f8ab12a414}{avrlonlat\+\_\+xy} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 2 次元緯度経度格子点データの全領域平均(1 層用). \end{DoxyCompactList}\end{DoxyCompactItemize}


\subsection{Detailed Description}
\hyperlink{namespacew__module}{w\+\_\+module} の下部モジュール\+: 積分・平均 

\begin{DoxyAuthor}{Author}
Shin-\/ichi Takehiro, Youhei S\+A\+S\+A\+KI 
\end{DoxyAuthor}
\begin{DoxyCopyright}{Copyright}
Copyright (C) S\+P\+M\+O\+D\+EL Development Group, 2019. License is M\+I\+T/\+X11. see \hyperlink{COPYRIGHT}{C\+O\+P\+Y\+R\+I\+G\+HT} in detail 
\end{DoxyCopyright}
\begin{DoxyWarning}{Warning}
本モジュールを直接呼ぶ事は想定されていないことに注意されたい． ユーザは \hyperlink{namespacew__module}{w\+\_\+module} を呼ぶこと． 
\end{DoxyWarning}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{namespacew__module__integral_a6d7a3294fdda72a4cc589a6630414d74}\label{namespacew__module__integral_a6d7a3294fdda72a4cc589a6630414d74}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!avrlat\+\_\+y@{avrlat\+\_\+y}}
\index{avrlat\+\_\+y@{avrlat\+\_\+y}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{avrlat\+\_\+y()}{avrlat\_y()}}
{\footnotesize\ttfamily real(dp) function, public w\+\_\+module\+\_\+integral\+::avrlat\+\_\+y (\begin{DoxyParamCaption}\item[{real(dp), dimension(1\+:jm), intent(in)}]{y\+\_\+data }\end{DoxyParamCaption})}



1 次元(\+Y)格子点データの緯度(\+Y)方向平均(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em y\+\_\+data} & 1 次元緯度格子点データ\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
平均値 
\end{DoxyReturn}


Definition at line 109 of file w\+\_\+module\+\_\+integral.\+f90.



References intlat\+\_\+y(), and w\+\_\+module\+\_\+base\+::y\+\_\+lat\+\_\+weight.


\begin{DoxyCode}
109 
110     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: y\_data(1:jm)
112     \textcolor{keywordtype}{real(DP)}             :: avrlat\_y
113 
114     avrlat\_y = intlat\_y(y\_data)/sum(y\_lat\_weight)
115 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=324pt]{namespacew__module__integral_a6d7a3294fdda72a4cc589a6630414d74_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__integral_a6f252f1df33c794abdf86114346bf1c5}\label{namespacew__module__integral_a6f252f1df33c794abdf86114346bf1c5}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!avrlon\+\_\+x@{avrlon\+\_\+x}}
\index{avrlon\+\_\+x@{avrlon\+\_\+x}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{avrlon\+\_\+x()}{avrlon\_x()}}
{\footnotesize\ttfamily real(dp) function, public w\+\_\+module\+\_\+integral\+::avrlon\+\_\+x (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1), intent(in)}]{x\+\_\+data }\end{DoxyParamCaption})}



1 次元(\+X)格子点データの経度(\+X)方向平均(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em x\+\_\+data} & 1 次元経度(\+X)格子点データ\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
平均値 
\end{DoxyReturn}


Definition at line 121 of file w\+\_\+module\+\_\+integral.\+f90.



References intlon\+\_\+x(), and w\+\_\+module\+\_\+base\+::x\+\_\+lon\+\_\+weight.


\begin{DoxyCode}
121 
122     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: x\_data(0:im-1)
124     \textcolor{keywordtype}{real(DP)}             :: avrlon\_x
125 
126     avrlon\_x = intlon\_x(x\_data)/sum(x\_lon\_weight)
127 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=324pt]{namespacew__module__integral_a6f252f1df33c794abdf86114346bf1c5_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__integral_ae81714fa06a9b31798ef10f8ab12a414}\label{namespacew__module__integral_ae81714fa06a9b31798ef10f8ab12a414}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!avrlonlat\+\_\+xy@{avrlonlat\+\_\+xy}}
\index{avrlonlat\+\_\+xy@{avrlonlat\+\_\+xy}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{avrlonlat\+\_\+xy()}{avrlonlat\_xy()}}
{\footnotesize\ttfamily real(dp) function, public w\+\_\+module\+\_\+integral\+::avrlonlat\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



2 次元緯度経度格子点データの全領域平均(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em xy\+\_\+data} & 2 次元経度緯度格子点データ\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
平均値 
\end{DoxyReturn}


Definition at line 157 of file w\+\_\+module\+\_\+integral.\+f90.



References avrlon\+\_\+x(), and x\+\_\+avrlat\+\_\+xy().


\begin{DoxyCode}
157 
158     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}   :: xy\_data(0:im-1,1:jm)
160     \textcolor{keywordtype}{real(DP)} :: avrlonlat\_xy
161 
162     avrlonlat\_xy = avrlon\_x(x\_avrlat\_xy(xy\_data))
163 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__integral_ae81714fa06a9b31798ef10f8ab12a414_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__integral_aee775f5db056a1cbe1e0d12459c9f1ea}\label{namespacew__module__integral_aee775f5db056a1cbe1e0d12459c9f1ea}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!intlat\+\_\+y@{intlat\+\_\+y}}
\index{intlat\+\_\+y@{intlat\+\_\+y}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{intlat\+\_\+y()}{intlat\_y()}}
{\footnotesize\ttfamily real(dp) function, public w\+\_\+module\+\_\+integral\+::intlat\+\_\+y (\begin{DoxyParamCaption}\item[{real(dp), dimension(1\+:jm), intent(in)}]{y\+\_\+data }\end{DoxyParamCaption})}



1 次元緯度(\+Y)格子点データの Y 方向積分(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em y\+\_\+data} & 1 次元緯度(\+Y)格子点データ\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
積分値 
\end{DoxyReturn}


Definition at line 39 of file w\+\_\+module\+\_\+integral.\+f90.



References w\+\_\+module\+\_\+base\+::y\+\_\+lat\+\_\+weight.


\begin{DoxyCode}
39 
40     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: y\_data(1:jm)
42     \textcolor{keywordtype}{real(DP)}             :: intlat\_y
43 
44     intlat\_y = sum(y\_data * y\_lat\_weight)
45 
\end{DoxyCode}
\mbox{\Hypertarget{namespacew__module__integral_ac7ba110474a4ab162f9b4e7397b2dc91}\label{namespacew__module__integral_ac7ba110474a4ab162f9b4e7397b2dc91}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!intlon\+\_\+x@{intlon\+\_\+x}}
\index{intlon\+\_\+x@{intlon\+\_\+x}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{intlon\+\_\+x()}{intlon\_x()}}
{\footnotesize\ttfamily real(dp) function, public w\+\_\+module\+\_\+integral\+::intlon\+\_\+x (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1), intent(in)}]{x\+\_\+data }\end{DoxyParamCaption})}



1 次元経度(\+X)格子点データの X 方向積分(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em x\+\_\+data} & 1 次元経度(\+X)格子点データ\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
積分値 
\end{DoxyReturn}


Definition at line 51 of file w\+\_\+module\+\_\+integral.\+f90.



References w\+\_\+module\+\_\+base\+::x\+\_\+lon\+\_\+weight.


\begin{DoxyCode}
51 
52     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: x\_data(0:im-1)
54     \textcolor{keywordtype}{real(DP)}             :: intlon\_x
55 
56     intlon\_x = sum(x\_data * x\_lon\_weight)
57 
\end{DoxyCode}
\mbox{\Hypertarget{namespacew__module__integral_a681cc02a96b569a528fd0e9cff0a878b}\label{namespacew__module__integral_a681cc02a96b569a528fd0e9cff0a878b}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!intlonlat\+\_\+xy@{intlonlat\+\_\+xy}}
\index{intlonlat\+\_\+xy@{intlonlat\+\_\+xy}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{intlonlat\+\_\+xy()}{intlonlat\_xy()}}
{\footnotesize\ttfamily real(dp) function, public w\+\_\+module\+\_\+integral\+::intlonlat\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



2 次元緯度経度格子点データの全領域積分(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em xy\+\_\+data} & 2 次元経度緯度格子点データ(0\+:im-\/1,1\+:jm)\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
積分値 
\end{DoxyReturn}


Definition at line 97 of file w\+\_\+module\+\_\+integral.\+f90.



References intlon\+\_\+x(), and x\+\_\+intlat\+\_\+xy().


\begin{DoxyCode}
97 
98     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}   :: xy\_data(0:im-1,1:jm)
100     \textcolor{keywordtype}{real(DP)} :: intlonlat\_xy
101 
102     intlonlat\_xy = intlon\_x(x\_intlat\_xy(xy\_data))
103 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=324pt]{namespacew__module__integral_a681cc02a96b569a528fd0e9cff0a878b_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__integral_aec162c0bf27dd164bc686a38e9c084cb}\label{namespacew__module__integral_aec162c0bf27dd164bc686a38e9c084cb}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!x\+\_\+avrlat\+\_\+xy@{x\+\_\+avrlat\+\_\+xy}}
\index{x\+\_\+avrlat\+\_\+xy@{x\+\_\+avrlat\+\_\+xy}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{x\+\_\+avrlat\+\_\+xy()}{x\_avrlat\_xy()}}
{\footnotesize\ttfamily real(dp) function, dimension(im), public w\+\_\+module\+\_\+integral\+::x\+\_\+avrlat\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



2 次元緯度経度格子点データの緯度(\+Y)方向平均(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em xy\+\_\+data} & 2 次元経度緯度格子点データ(0\+:im-\/1,1\+:jm)\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
平均された 1 次元経度(\+X)格子点データ 
\end{DoxyReturn}


Definition at line 133 of file w\+\_\+module\+\_\+integral.\+f90.



References x\+\_\+intlat\+\_\+xy(), and w\+\_\+module\+\_\+base\+::y\+\_\+lat\+\_\+weight.


\begin{DoxyCode}
133 
134     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: xy\_data(0:im-1,1:jm)
136     \textcolor{keywordtype}{real(DP)}             :: x\_avrlat\_xy(im)
137 
138     x\_avrlat\_xy = x\_intlat\_xy(xy\_data)/sum(y\_lat\_weight)
139 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=324pt]{namespacew__module__integral_aec162c0bf27dd164bc686a38e9c084cb_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__integral_a63f03bca68fcc1d72b665e5a1ef12b68}\label{namespacew__module__integral_a63f03bca68fcc1d72b665e5a1ef12b68}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!x\+\_\+intlat\+\_\+xy@{x\+\_\+intlat\+\_\+xy}}
\index{x\+\_\+intlat\+\_\+xy@{x\+\_\+intlat\+\_\+xy}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{x\+\_\+intlat\+\_\+xy()}{x\_intlat\_xy()}}
{\footnotesize\ttfamily real(dp) function, dimension(0\+:im-\/1), public w\+\_\+module\+\_\+integral\+::x\+\_\+intlat\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



2 次元緯度経度格子点データの緯度(\+Y)方向積分(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em xy\+\_\+data} & 2 次元経度緯度格子点データ(0\+:im-\/1,1\+:jm)\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
積分された 1 次元経度(\+X)格子点データ 
\end{DoxyReturn}


Definition at line 63 of file w\+\_\+module\+\_\+integral.\+f90.



References w\+\_\+module\+\_\+base\+::jm, and w\+\_\+module\+\_\+base\+::y\+\_\+lat\+\_\+weight.


\begin{DoxyCode}
63 
64     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: xy\_data(0:im-1,1:jm)
66     \textcolor{keywordtype}{real(DP)}             :: x\_intlat\_xy(0:im-1)
67 
68     \textcolor{keywordtype}{integer(8)} :: j
69 
70     x\_intlat\_xy = 0.0d0
71     \textcolor{keywordflow}{do} j=1,jm
72       x\_intlat\_xy = x\_intlat\_xy + xy\_data(:,j) * y\_lat\_weight(j)
73 \textcolor{keywordflow}{    enddo}
74 
\end{DoxyCode}
\mbox{\Hypertarget{namespacew__module__integral_ada18b7030e3bf35699bd0af8611a183d}\label{namespacew__module__integral_ada18b7030e3bf35699bd0af8611a183d}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!y\+\_\+avrlon\+\_\+xy@{y\+\_\+avrlon\+\_\+xy}}
\index{y\+\_\+avrlon\+\_\+xy@{y\+\_\+avrlon\+\_\+xy}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{y\+\_\+avrlon\+\_\+xy()}{y\_avrlon\_xy()}}
{\footnotesize\ttfamily real(dp) function, dimension(1\+:jm), public w\+\_\+module\+\_\+integral\+::y\+\_\+avrlon\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



2 次元緯度経度格子点データの経度(\+X)方向平均(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em xy\+\_\+data} & 2 次元経度緯度格子点データ(0\+:im-\/1,1\+:jm)\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
平均された 1 次元緯度(\+Y)格子点 
\end{DoxyReturn}


Definition at line 145 of file w\+\_\+module\+\_\+integral.\+f90.



References w\+\_\+module\+\_\+base\+::x\+\_\+lon\+\_\+weight, and y\+\_\+intlon\+\_\+xy().


\begin{DoxyCode}
145 
146     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: xy\_data(0:im-1,1:jm)
148     \textcolor{keywordtype}{real(DP)}             :: y\_avrlon\_xy(1:jm)
149 
150     y\_avrlon\_xy = y\_intlon\_xy(xy\_data)/sum(x\_lon\_weight)
151 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=324pt]{namespacew__module__integral_ada18b7030e3bf35699bd0af8611a183d_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__integral_a38a305bdc56997297d5d6f2e46ab38b3}\label{namespacew__module__integral_a38a305bdc56997297d5d6f2e46ab38b3}} 
\index{w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}!y\+\_\+intlon\+\_\+xy@{y\+\_\+intlon\+\_\+xy}}
\index{y\+\_\+intlon\+\_\+xy@{y\+\_\+intlon\+\_\+xy}!w\+\_\+module\+\_\+integral@{w\+\_\+module\+\_\+integral}}
\subsubsection{\texorpdfstring{y\+\_\+intlon\+\_\+xy()}{y\_intlon\_xy()}}
{\footnotesize\ttfamily real(dp) function, dimension(1\+:jm), public w\+\_\+module\+\_\+integral\+::y\+\_\+intlon\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



2 次元緯度経度格子点データの経度(\+X)方向積分(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em xy\+\_\+data} & 2 次元経度緯度格子点データ(0\+:im-\/1,1\+:jm)\\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
積分された 1 次元緯度(\+Y)格子点データ 
\end{DoxyReturn}


Definition at line 80 of file w\+\_\+module\+\_\+integral.\+f90.



References w\+\_\+module\+\_\+base\+::im, and w\+\_\+module\+\_\+base\+::x\+\_\+lon\+\_\+weight.


\begin{DoxyCode}
80 
81     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: xy\_data(0:im-1,1:jm)
83     \textcolor{keywordtype}{real(DP)}             :: y\_intlon\_xy(1:jm)
84 
85     \textcolor{keywordtype}{integer(8)} :: i
86 
87     y\_intlon\_xy = 0.0d0
88     \textcolor{keywordflow}{do} i=0,im-1
89       y\_intlon\_xy = y\_intlon\_xy + xy\_data(i,:) * x\_lon\_weight(i)
90 \textcolor{keywordflow}{    enddo}
91 
\end{DoxyCode}
