\hypertarget{namespacew__module__integral}{}\doxysection{w\+\_\+module\+\_\+integral Module Reference}
\label{namespacew__module__integral}\index{w\_module\_integral@{w\_module\_integral}}


\doxysubsection{Detailed Description}
\mbox{\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 \mbox{\hyperlink{COPYRIGHT}{C\+O\+P\+Y\+R\+I\+G\+HT}} in detail 
\end{DoxyCopyright}
\begin{DoxyWarning}{Warning}
本モジュールを直接呼ぶ事は想定されていないことに注意されたい． ユーザは \mbox{\hyperlink{namespacew__module}{w\+\_\+module}} を呼ぶこと． 
\end{DoxyWarning}
\doxysubsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
real(dp) function, public \mbox{\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 \mbox{\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 \mbox{\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 \mbox{\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 \mbox{\hyperlink{namespacew__module__integral_a681cc02a96b569a528fd0e9cff0a878b}{intlonlat\+\_\+xy}} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 2 次元緯度経度格子点データの全領域積分(1 層用). \end{DoxyCompactList}\item 
real(dp) function, public \mbox{\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 \mbox{\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 \mbox{\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 \mbox{\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 \mbox{\hyperlink{namespacew__module__integral_ae81714fa06a9b31798ef10f8ab12a414}{avrlonlat\+\_\+xy}} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 2 次元緯度経度格子点データの全領域平均(1 層用). \end{DoxyCompactList}\end{DoxyCompactItemize}


\doxysubsection{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}}
\doxysubsubsection{\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{\texttt{ in}}  & {\em y\+\_\+data} & 1 次元緯度格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
平均値 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{109 }
\DoxyCodeLine{110 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)} :: y\_data(1:jm)}
\DoxyCodeLine{112 \textcolor{keywordtype}{    real}(DP)             :: AvrLat\_y}
\DoxyCodeLine{113 }
\DoxyCodeLine{114     avrlat\_y = intlat\_y(y\_data)/sum(y\_lat\_weight)}
\DoxyCodeLine{115 }

\end{DoxyCode}


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

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}}
\doxysubsubsection{\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{\texttt{ in}}  & {\em x\+\_\+data} & 1 次元経度(\+X)格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
平均値 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{121 }
\DoxyCodeLine{122 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)} :: x\_data(0:im-\/1)}
\DoxyCodeLine{124 \textcolor{keywordtype}{    real}(DP)             :: AvrLon\_x}
\DoxyCodeLine{125 }
\DoxyCodeLine{126     avrlon\_x = intlon\_x(x\_data)/sum(x\_lon\_weight)}
\DoxyCodeLine{127 }

\end{DoxyCode}


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



Referenced by avrlonlat\+\_\+xy().

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}
Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=324pt]{namespacew__module__integral_a6f252f1df33c794abdf86114346bf1c5_icgraph}
\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}}
\doxysubsubsection{\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{\texttt{ in}}  & {\em xy\+\_\+data} & 2 次元経度緯度格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
平均値 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{157 }
\DoxyCodeLine{158 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}   :: xy\_data(0:im-\/1,1:jm)}
\DoxyCodeLine{160 \textcolor{keywordtype}{    real}(DP) :: AvrLonLat\_xy}
\DoxyCodeLine{161 }
\DoxyCodeLine{162     avrlonlat\_xy = avrlon\_x(x\_avrlat\_xy(xy\_data))}
\DoxyCodeLine{163 }

\end{DoxyCode}


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

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}}
\doxysubsubsection{\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{\texttt{ in}}  & {\em y\+\_\+data} & 1 次元緯度(\+Y)格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
積分値 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{39 }
\DoxyCodeLine{40 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)} :: y\_data(1:jm)}
\DoxyCodeLine{42 \textcolor{keywordtype}{    real}(DP)             :: IntLat\_y}
\DoxyCodeLine{43 }
\DoxyCodeLine{44     intlat\_y = sum(y\_data * y\_lat\_weight)}
\DoxyCodeLine{45 }

\end{DoxyCode}


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



Referenced by avrlat\+\_\+y().

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=324pt]{namespacew__module__integral_aee775f5db056a1cbe1e0d12459c9f1ea_icgraph}
\end{center}
\end{figure}
\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}}
\doxysubsubsection{\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{\texttt{ in}}  & {\em x\+\_\+data} & 1 次元経度(\+X)格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
積分値 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{51 }
\DoxyCodeLine{52 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)} :: x\_data(0:im-\/1)}
\DoxyCodeLine{54 \textcolor{keywordtype}{    real}(DP)             :: IntLon\_x}
\DoxyCodeLine{55 }
\DoxyCodeLine{56     intlon\_x = sum(x\_data * x\_lon\_weight)}
\DoxyCodeLine{57 }

\end{DoxyCode}


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



Referenced by avrlon\+\_\+x(), and intlonlat\+\_\+xy().

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__integral_ac7ba110474a4ab162f9b4e7397b2dc91_icgraph}
\end{center}
\end{figure}
\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}}
\doxysubsubsection{\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{\texttt{ 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.


\begin{DoxyCode}{0}
\DoxyCodeLine{97 }
\DoxyCodeLine{98 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}   :: xy\_data(0:im-\/1,1:jm)}
\DoxyCodeLine{100 \textcolor{keywordtype}{    real}(DP) :: IntLonLat\_xy}
\DoxyCodeLine{101 }
\DoxyCodeLine{102     intlonlat\_xy = intlon\_x(x\_intlat\_xy(xy\_data))}
\DoxyCodeLine{103 }

\end{DoxyCode}


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

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}}
\doxysubsubsection{\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{\texttt{ 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.


\begin{DoxyCode}{0}
\DoxyCodeLine{133 }
\DoxyCodeLine{134 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)} :: xy\_data(0:im-\/1,1:jm)}
\DoxyCodeLine{136 \textcolor{keywordtype}{    real}(DP)             :: x\_AvrLat\_xy(im)}
\DoxyCodeLine{137 }
\DoxyCodeLine{138     x\_avrlat\_xy = x\_intlat\_xy(xy\_data)/sum(y\_lat\_weight)}
\DoxyCodeLine{139 }

\end{DoxyCode}


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



Referenced by avrlonlat\+\_\+xy().

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}
Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=324pt]{namespacew__module__integral_aec162c0bf27dd164bc686a38e9c084cb_icgraph}
\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}}
\doxysubsubsection{\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{\texttt{ 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.


\begin{DoxyCode}{0}
\DoxyCodeLine{63 }
\DoxyCodeLine{64 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)} :: xy\_data(0:im-\/1,1:jm)}
\DoxyCodeLine{66 \textcolor{keywordtype}{    real}(DP)             :: x\_IntLat\_xy(0:im-\/1)}
\DoxyCodeLine{67 }
\DoxyCodeLine{68     \textcolor{keywordtype}{integer(8)} :: j}
\DoxyCodeLine{69 }
\DoxyCodeLine{70     x\_intlat\_xy = 0.0d0}
\DoxyCodeLine{71     \textcolor{keywordflow}{do} j=1,jm}
\DoxyCodeLine{72       x\_intlat\_xy = x\_intlat\_xy + xy\_data(:,j) * y\_lat\_weight(j)}
\DoxyCodeLine{73 \textcolor{keywordflow}{    enddo}}
\DoxyCodeLine{74 }

\end{DoxyCode}


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



Referenced by intlonlat\+\_\+xy(), and x\+\_\+avrlat\+\_\+xy().

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__integral_a63f03bca68fcc1d72b665e5a1ef12b68_icgraph}
\end{center}
\end{figure}
\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}}
\doxysubsubsection{\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{\texttt{ 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.


\begin{DoxyCode}{0}
\DoxyCodeLine{145 }
\DoxyCodeLine{146 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)} :: xy\_data(0:im-\/1,1:jm)}
\DoxyCodeLine{148 \textcolor{keywordtype}{    real}(DP)             :: y\_AvrLon\_xy(1:jm)}
\DoxyCodeLine{149 }
\DoxyCodeLine{150     y\_avrlon\_xy = y\_intlon\_xy(xy\_data)/sum(x\_lon\_weight)}
\DoxyCodeLine{151 }

\end{DoxyCode}


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

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}}
\doxysubsubsection{\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{\texttt{ 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.


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

\end{DoxyCode}


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



Referenced by y\+\_\+avrlon\+\_\+xy().

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=324pt]{namespacew__module__integral_a38a305bdc56997297d5d6f2e46ab38b3_icgraph}
\end{center}
\end{figure}
