\hypertarget{namespacewa__wave__module__deriv}{}\section{wa\+\_\+wave\+\_\+module\+\_\+deriv Module Reference}
\label{namespacewa__wave__module__deriv}\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
real(8) function, dimension(2 $\ast$(nm-\/m+1), size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__wave__module__deriv_a5fa4ea2644042ef608ac37f8a769d552}{wa\+\_\+lapla\+\_\+wa} (wa\+\_\+data)
\item 
real(8) function, dimension(2 $\ast$(nm-\/m+1), size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__wave__module__deriv_a07a65bc7293c16fc5cc00491a6ae0e9d}{wa\+\_\+laplainv\+\_\+wa} (wa\+\_\+data)
\item 
real(8) function, dimension(2 $\ast$(nm-\/m+1), size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__wave__module__deriv_ab8752ca7b7adc6286e73213f354185d3}{wa\+\_\+dlon\+\_\+wa} (wa\+\_\+data)
\item 
real(8) function, dimension(0\+:im-\/1, 1\+:jm, size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__wave__module__deriv_a22595e8ccbf6ec5448243621f6c822c4}{xya\+\_\+gradlon\+\_\+wa} (wa\+\_\+data)
\item 
real(8) function, dimension(0\+:im-\/1, 1\+:jm, size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__wave__module__deriv_a3265ecae27a6a9fbf4d708590243692d}{xya\+\_\+gradlat\+\_\+wa} (wa\+\_\+data)
\item 
real(8) function, dimension(2 $\ast$(nm-\/m+1), size(xya\+\_\+data, 3)), public \hyperlink{namespacewa__wave__module__deriv_a65810c097b7836967b94720b8e89c5dc}{wa\+\_\+divlon\+\_\+xya} (xya\+\_\+data)
\item 
real(8) function, dimension(2 $\ast$(nm-\/m+1), size(xya\+\_\+data, 3)), public \hyperlink{namespacewa__wave__module__deriv_ac36486eb5b9999a525c571efd50b4402}{wa\+\_\+divlat\+\_\+xya} (xya\+\_\+data)
\item 
real(8) function, dimension((nm+1) $\ast$$\ast$2, size(xya\+\_\+u, 3)), public \hyperlink{namespacewa__wave__module__deriv_a86f22d18b49f50ce3c4ec89451650153}{wa\+\_\+div\+\_\+xya\+\_\+xya} (xya\+\_\+u, xya\+\_\+v)
\item 
real(8) function, dimension(0\+:im-\/1, 1\+:jm, size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__wave__module__deriv_ab0055e7ddfa617326f926a0f4f074767}{xya\+\_\+gradlambda\+\_\+wa} (wa\+\_\+data)
\item 
real(8) function, dimension(0\+:im-\/1, 1\+:jm, size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__wave__module__deriv_a90da452986d7b82e30795621ac031f3c}{xya\+\_\+gradmu\+\_\+wa} (wa\+\_\+data)
\item 
real(8) function, dimension(2 $\ast$(nm-\/m+1), size(xya\+\_\+data, 3)), public \hyperlink{namespacewa__wave__module__deriv_ac9ad6f1c0e5d86bd2d288bcbffc2500f}{wa\+\_\+divlambda\+\_\+xya} (xya\+\_\+data)
\item 
real(8) function, dimension(2 $\ast$(nm-\/m+1), size(xya\+\_\+data, 3)), public \hyperlink{namespacewa__wave__module__deriv_a9ad109acd82d333069bee5ab5294cc8f}{wa\+\_\+divmu\+\_\+xya} (xya\+\_\+data)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_a86f22d18b49f50ce3c4ec89451650153}\label{namespacewa__wave__module__deriv_a86f22d18b49f50ce3c4ec89451650153}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!wa\+\_\+div\+\_\+xya\+\_\+xya@{wa\+\_\+div\+\_\+xya\+\_\+xya}}
\index{wa\+\_\+div\+\_\+xya\+\_\+xya@{wa\+\_\+div\+\_\+xya\+\_\+xya}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+div\+\_\+xya\+\_\+xya()}{wa\_div\_xya\_xya()}}
{\footnotesize\ttfamily real(8) function, dimension((nm+1)$\ast$$\ast$2,size(xya\+\_\+u,3)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::wa\+\_\+div\+\_\+xya\+\_\+xya (\begin{DoxyParamCaption}\item[{real(8), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+u,  }\item[{real(8), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+v }\end{DoxyParamCaption})}



Definition at line 188 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.



References wa\+\_\+divlat\+\_\+xya(), and wa\+\_\+divlon\+\_\+xya().


\begin{DoxyCode}
188     \textcolor{comment}{!}
189     \textcolor{comment}{! 2 つの入力格子点データをベクトル成分とする発散を計算し, }
190     \textcolor{comment}{! スペクトルデータとして返す(多層用).}
191     \textcolor{comment}{!}
192     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: xya\_u(0:,:,:)
193     \textcolor{comment}{!(in) ベクトル経度成分の格子点データ}
194     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: xya\_v(0:,:,:)
195     \textcolor{comment}{!(in) ベクトル緯度成分の格子点データ}
196     \textcolor{keywordtype}{real(8)}              :: wa\_div\_xya\_xya((nm+1)**2,size(xya\_u,3))
197     \textcolor{comment}{!(out) 2 つの入力格子点データをベクトル成分とする発散のスペクトルデータ}
198 
199     wa\_div\_xya\_xya = wa\_divlon\_xya(xya\_u) + wa\_divlat\_xya(xya\_v)
200 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__wave__module__deriv_a86f22d18b49f50ce3c4ec89451650153_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_ac9ad6f1c0e5d86bd2d288bcbffc2500f}\label{namespacewa__wave__module__deriv_ac9ad6f1c0e5d86bd2d288bcbffc2500f}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!wa\+\_\+divlambda\+\_\+xya@{wa\+\_\+divlambda\+\_\+xya}}
\index{wa\+\_\+divlambda\+\_\+xya@{wa\+\_\+divlambda\+\_\+xya}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+divlambda\+\_\+xya()}{wa\_divlambda\_xya()}}
{\footnotesize\ttfamily real(8) function, dimension(2$\ast$(nm-\/m+1),size(xya\+\_\+data,3)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::wa\+\_\+divlambda\+\_\+xya (\begin{DoxyParamCaption}\item[{real(8), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+data }\end{DoxyParamCaption})}



Definition at line 232 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.



References wa\+\_\+wave\+\_\+module\+\_\+base\+::wa\+\_\+xya().


\begin{DoxyCode}
232     \textcolor{comment}{!}
233     \textcolor{comment}{! 格子点データに発散型経度微分 1/(1-μ^2)・∂/∂λ (μ=sinφ) }
234     \textcolor{comment}{! を作用させてスペクトルデータに変換して返す(多層用).}
235     \textcolor{comment}{!}
236     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: xya\_data(0:,:,:)
237     \textcolor{comment}{!(in) 入力格子点データ}
238     \textcolor{keywordtype}{real(8)}              :: wa\_divlambda\_xya(2*(nm-m+1),size(xya\_data,3))
239     \textcolor{comment}{!(out) 格子点データを発散型経度微分したスペクトルデータ}
240 
241     wa\_divlambda\_xya = wa\_xya(xya\_data,ipow=2,iflag=-1)
242 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__wave__module__deriv_ac9ad6f1c0e5d86bd2d288bcbffc2500f_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_ac36486eb5b9999a525c571efd50b4402}\label{namespacewa__wave__module__deriv_ac36486eb5b9999a525c571efd50b4402}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!wa\+\_\+divlat\+\_\+xya@{wa\+\_\+divlat\+\_\+xya}}
\index{wa\+\_\+divlat\+\_\+xya@{wa\+\_\+divlat\+\_\+xya}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+divlat\+\_\+xya()}{wa\_divlat\_xya()}}
{\footnotesize\ttfamily real(8) function, dimension(2$\ast$(nm-\/m+1),size(xya\+\_\+data,3)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::wa\+\_\+divlat\+\_\+xya (\begin{DoxyParamCaption}\item[{real(8), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+data }\end{DoxyParamCaption})}



Definition at line 174 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.



References wa\+\_\+wave\+\_\+module\+\_\+base\+::wa\+\_\+xya().


\begin{DoxyCode}
174     \textcolor{comment}{!}
175     \textcolor{comment}{! 格子点データに発散型緯度微分 1/cosφ・∂(f cosφ)/∂φ を作用させて}
176     \textcolor{comment}{! スペクトルデータに変換して返す(多層用).}
177     \textcolor{comment}{!}
178     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: xya\_data(0:,:,:)
179     \textcolor{comment}{!(in) 入力格子点データ}
180     \textcolor{keywordtype}{real(8)}              :: wa\_divlat\_xya(2*(nm-m+1),size(xya\_data,3))
181     \textcolor{comment}{!(out) 格子点データを発散型緯度微分したスペクトルデータ}
182 
183     wa\_divlat\_xya = wa\_xya(xya\_data,ipow=1,iflag=1)
184 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__wave__module__deriv_ac36486eb5b9999a525c571efd50b4402_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_a65810c097b7836967b94720b8e89c5dc}\label{namespacewa__wave__module__deriv_a65810c097b7836967b94720b8e89c5dc}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!wa\+\_\+divlon\+\_\+xya@{wa\+\_\+divlon\+\_\+xya}}
\index{wa\+\_\+divlon\+\_\+xya@{wa\+\_\+divlon\+\_\+xya}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+divlon\+\_\+xya()}{wa\_divlon\_xya()}}
{\footnotesize\ttfamily real(8) function, dimension(2$\ast$(nm-\/m+1),size(xya\+\_\+data,3)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::wa\+\_\+divlon\+\_\+xya (\begin{DoxyParamCaption}\item[{real(8), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+data }\end{DoxyParamCaption})}



Definition at line 160 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.



References wa\+\_\+wave\+\_\+module\+\_\+base\+::wa\+\_\+xya().


\begin{DoxyCode}
160     \textcolor{comment}{!}
161     \textcolor{comment}{! 格子点データに発散型経度微分 1/cosφ・∂/∂λ を作用させて}
162     \textcolor{comment}{! スペクトルデータに変換して返す(多層用).}
163     \textcolor{comment}{!}
164     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: xya\_data(0:,:,:)
165     \textcolor{comment}{!(in) 入力格子点データ}
166     \textcolor{keywordtype}{real(8)}              :: wa\_divlon\_xya(2*(nm-m+1),size(xya\_data,3))
167     \textcolor{comment}{!(out) 格子点データを発散型経度微分したスペクトルデータ}
168 
169     wa\_divlon\_xya = wa\_xya(xya\_data,ipow=1,iflag=-1)
170 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__wave__module__deriv_a65810c097b7836967b94720b8e89c5dc_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_a9ad109acd82d333069bee5ab5294cc8f}\label{namespacewa__wave__module__deriv_a9ad109acd82d333069bee5ab5294cc8f}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!wa\+\_\+divmu\+\_\+xya@{wa\+\_\+divmu\+\_\+xya}}
\index{wa\+\_\+divmu\+\_\+xya@{wa\+\_\+divmu\+\_\+xya}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+divmu\+\_\+xya()}{wa\_divmu\_xya()}}
{\footnotesize\ttfamily real(8) function, dimension(2$\ast$(nm-\/m+1),size(xya\+\_\+data,3)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::wa\+\_\+divmu\+\_\+xya (\begin{DoxyParamCaption}\item[{real(8), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+data }\end{DoxyParamCaption})}



Definition at line 246 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.



References wa\+\_\+wave\+\_\+module\+\_\+base\+::wa\+\_\+xya().


\begin{DoxyCode}
246     \textcolor{comment}{!}
247     \textcolor{comment}{! 格子点データに発散型緯度微分 ∂/∂μ (μ=sinφ)を作用させて}
248     \textcolor{comment}{! スペクトルデータに変換して返す(多層用).}
249     \textcolor{comment}{!}
250     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: xya\_data(0:,:,:)
251     \textcolor{comment}{!(in) 入力格子点データ}
252     \textcolor{keywordtype}{real(8)}              :: wa\_divmu\_xya(2*(nm-m+1),size(xya\_data,3))
253     \textcolor{comment}{!(out) 格子点データを発散型緯度微分したスペクトルデータ}
254 
255     wa\_divmu\_xya = wa\_xya(xya\_data,ipow=2,iflag=1)
256 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__wave__module__deriv_a9ad109acd82d333069bee5ab5294cc8f_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_ab8752ca7b7adc6286e73213f354185d3}\label{namespacewa__wave__module__deriv_ab8752ca7b7adc6286e73213f354185d3}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!wa\+\_\+dlon\+\_\+wa@{wa\+\_\+dlon\+\_\+wa}}
\index{wa\+\_\+dlon\+\_\+wa@{wa\+\_\+dlon\+\_\+wa}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+dlon\+\_\+wa()}{wa\_dlon\_wa()}}
{\footnotesize\ttfamily real(8) function, dimension(2$\ast$(nm-\/m+1),size(wa\+\_\+data,2)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::wa\+\_\+dlon\+\_\+wa (\begin{DoxyParamCaption}\item[{real(8), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



Definition at line 113 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}
113     \textcolor{comment}{!}
114     \textcolor{comment}{! スペクトルデータに経度微分 ∂/∂λ を作用させる(多層用).}
115     \textcolor{comment}{!}
116     \textcolor{comment}{! スペクトルデータの経度微分とは, 対応する格子点データに}
117     \textcolor{comment}{! 経度微分∂/∂λを作用させたデータのスペクトル変換のことである.}
118     \textcolor{comment}{! }
119     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
120     \textcolor{comment}{!(in) 入力スペクトルデータ}
121     \textcolor{keywordtype}{real(8)}              :: wa\_dlon\_wa(2*(nm-m+1),size(wa\_data,2))
122     \textcolor{comment}{!(out) スペクトルデータの経度微分}
123     \textcolor{keywordtype}{integer} :: k
124 
125     \textcolor{keywordflow}{do} k=1,\textcolor{keyword}{size}(wa\_data,2)
126        wa\_dlon\_wa(:,k) = w\_dlon\_w(wa\_data(:,k))
127 \textcolor{keywordflow}{    enddo}
128 
\end{DoxyCode}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_a5fa4ea2644042ef608ac37f8a769d552}\label{namespacewa__wave__module__deriv_a5fa4ea2644042ef608ac37f8a769d552}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!wa\+\_\+lapla\+\_\+wa@{wa\+\_\+lapla\+\_\+wa}}
\index{wa\+\_\+lapla\+\_\+wa@{wa\+\_\+lapla\+\_\+wa}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+lapla\+\_\+wa()}{wa\_lapla\_wa()}}
{\footnotesize\ttfamily real(8) function, dimension(2$\ast$(nm-\/m+1),size(wa\+\_\+data,2)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::wa\+\_\+lapla\+\_\+wa (\begin{DoxyParamCaption}\item[{real(8), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



Definition at line 66 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}
66     \textcolor{comment}{!}
67     \textcolor{comment}{! 入力スペクトルデータにラプラシアン}
68     \textcolor{comment}{!}
69     \textcolor{comment}{!    ▽^2 = 1/cos^2φ・∂^2/∂λ^2 + 1/cosφ・∂/∂φ(cosφ∂/∂φ)}
70     \textcolor{comment}{!}
71     \textcolor{comment}{! を作用する(多層用).}
72     \textcolor{comment}{!}
73     \textcolor{comment}{! スペクトルデータのラプラシアンとは, 対応する格子点データに}
74     \textcolor{comment}{! ラプラシアンを作用させたデータのスペクトル変換のことである. }
75     \textcolor{comment}{!}
76     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
77     \textcolor{comment}{!(in) 入力スペクトルデータ}
78     \textcolor{keywordtype}{real(8)}              :: wa\_lapla\_wa(2*(nm-m+1),size(wa\_data,2))
79     \textcolor{comment}{!(out) 入力スペクトルデータのラプラシアン}
80     \textcolor{keywordtype}{integer} :: k
81 
82     \textcolor{keywordflow}{do} k=1,\textcolor{keyword}{size}(wa\_data,2)
83        wa\_lapla\_wa(:,k) = w\_lapla\_w(wa\_data(:,k))
84 \textcolor{keywordflow}{    enddo}
85 
\end{DoxyCode}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_a07a65bc7293c16fc5cc00491a6ae0e9d}\label{namespacewa__wave__module__deriv_a07a65bc7293c16fc5cc00491a6ae0e9d}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!wa\+\_\+laplainv\+\_\+wa@{wa\+\_\+laplainv\+\_\+wa}}
\index{wa\+\_\+laplainv\+\_\+wa@{wa\+\_\+laplainv\+\_\+wa}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+laplainv\+\_\+wa()}{wa\_laplainv\_wa()}}
{\footnotesize\ttfamily real(8) function, dimension(2$\ast$(nm-\/m+1),size(wa\+\_\+data,2)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::wa\+\_\+laplainv\+\_\+wa (\begin{DoxyParamCaption}\item[{real(8), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



Definition at line 89 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}
89     \textcolor{comment}{!}
90     \textcolor{comment}{! 入力スペクトルデータに逆ラプラシアン}
91     \textcolor{comment}{!}
92     \textcolor{comment}{!    ▽^\{-2\}}
93     \textcolor{comment}{!      =[1/cos^2φ・∂^2/∂λ^2 + 1/cosφ・∂/∂φ(cosφ∂/∂φ)]^\{-1\}}
94     \textcolor{comment}{!}
95     \textcolor{comment}{! を作用する(多層用).}
96     \textcolor{comment}{!}
97     \textcolor{comment}{! スペクトルデータの逆ラプラシアンとは, 対応する格子点データに}
98     \textcolor{comment}{! 逆ラプラシアンを作用させたデータのスペクトル変換のことである. }
99     \textcolor{comment}{!}
100     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
101     \textcolor{comment}{!(in) 入力スペクトルデータ}
102     \textcolor{keywordtype}{real(8)}              :: wa\_laplainv\_wa(2*(nm-m+1),size(wa\_data,2))
103     \textcolor{comment}{!(out) スペクトルデータの逆ラプラシアン}
104     \textcolor{keywordtype}{integer} :: k
105 
106     \textcolor{keywordflow}{do} k=1,\textcolor{keyword}{size}(wa\_data,2)
107        wa\_laplainv\_wa(:,k) = w\_laplainv\_w(wa\_data(:,k))
108 \textcolor{keywordflow}{    enddo}
109 
\end{DoxyCode}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_ab0055e7ddfa617326f926a0f4f074767}\label{namespacewa__wave__module__deriv_ab0055e7ddfa617326f926a0f4f074767}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!xya\+\_\+gradlambda\+\_\+wa@{xya\+\_\+gradlambda\+\_\+wa}}
\index{xya\+\_\+gradlambda\+\_\+wa@{xya\+\_\+gradlambda\+\_\+wa}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{xya\+\_\+gradlambda\+\_\+wa()}{xya\_gradlambda\_wa()}}
{\footnotesize\ttfamily real(8) function, dimension(0\+:im-\/1,1\+:jm,size(wa\+\_\+data,2)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::xya\+\_\+gradlambda\+\_\+wa (\begin{DoxyParamCaption}\item[{real(8), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



Definition at line 205 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.



References wa\+\_\+wave\+\_\+module\+\_\+base\+::xya\+\_\+wa().


\begin{DoxyCode}
205     \textcolor{comment}{!}
206     \textcolor{comment}{! スペクトルデータに勾配型経度微分 ∂/∂λ を作用する(多層用).}
207     \textcolor{comment}{!}
208     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
209     \textcolor{comment}{!(in) 入力スペクトルデータ}
210     \textcolor{keywordtype}{real(8)}              :: xya\_gradlambda\_wa(0:im-1,1:jm,size(wa\_data,2))
211     \textcolor{comment}{!(out) スペクトルデータを勾配型経度微分した格子点データ}
212 
213     xya\_gradlambda\_wa = xya\_wa(wa\_data,ipow=0,iflag=-1)
214 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__wave__module__deriv_ab0055e7ddfa617326f926a0f4f074767_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_a3265ecae27a6a9fbf4d708590243692d}\label{namespacewa__wave__module__deriv_a3265ecae27a6a9fbf4d708590243692d}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!xya\+\_\+gradlat\+\_\+wa@{xya\+\_\+gradlat\+\_\+wa}}
\index{xya\+\_\+gradlat\+\_\+wa@{xya\+\_\+gradlat\+\_\+wa}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{xya\+\_\+gradlat\+\_\+wa()}{xya\_gradlat\_wa()}}
{\footnotesize\ttfamily real(8) function, dimension(0\+:im-\/1,1\+:jm,size(wa\+\_\+data,2)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::xya\+\_\+gradlat\+\_\+wa (\begin{DoxyParamCaption}\item[{real(8), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



Definition at line 146 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.



References wa\+\_\+wave\+\_\+module\+\_\+base\+::xya\+\_\+wa().


\begin{DoxyCode}
146     \textcolor{comment}{!}
147     \textcolor{comment}{! スペクトルデータに勾配型緯度微分 ∂/∂φ を作用させて}
148     \textcolor{comment}{! 格子点データに変換して返す(多層用).}
149     \textcolor{comment}{!}
150     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
151     \textcolor{comment}{!(in) 入力スペクトルデータ}
152     \textcolor{keywordtype}{real(8)}              :: xya\_gradlat\_wa(0:im-1,1:jm,size(wa\_data,2))
153     \textcolor{comment}{!(out) スペクトルデータを勾配型緯度微分した格子点データ}
154 
155     xya\_gradlat\_wa = xya\_wa(wa\_data,ipow=1,iflag=1)
156 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__wave__module__deriv_a3265ecae27a6a9fbf4d708590243692d_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_a22595e8ccbf6ec5448243621f6c822c4}\label{namespacewa__wave__module__deriv_a22595e8ccbf6ec5448243621f6c822c4}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!xya\+\_\+gradlon\+\_\+wa@{xya\+\_\+gradlon\+\_\+wa}}
\index{xya\+\_\+gradlon\+\_\+wa@{xya\+\_\+gradlon\+\_\+wa}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{xya\+\_\+gradlon\+\_\+wa()}{xya\_gradlon\_wa()}}
{\footnotesize\ttfamily real(8) function, dimension(0\+:im-\/1,1\+:jm,size(wa\+\_\+data,2)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::xya\+\_\+gradlon\+\_\+wa (\begin{DoxyParamCaption}\item[{real(8), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



Definition at line 132 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.



References wa\+\_\+wave\+\_\+module\+\_\+base\+::xya\+\_\+wa().


\begin{DoxyCode}
132     \textcolor{comment}{!}
133     \textcolor{comment}{! スペクトルデータに勾配型経度微分 1/cosφ・∂/∂λ を}
134     \textcolor{comment}{! 作用させた格子点データを返す(多層用).}
135     \textcolor{comment}{!}
136     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
137     \textcolor{comment}{!(in) 入力スペクトルデータ}
138     \textcolor{keywordtype}{real(8)}              :: xya\_gradlon\_wa(0:im-1,1:jm,size(wa\_data,2))
139     \textcolor{comment}{!(out) スペクトルデータを勾配型経度微分した格子点データ}
140 
141     xya\_gradlon\_wa = xya\_wa(wa\_data,ipow=1,iflag=-1)
142 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__wave__module__deriv_a22595e8ccbf6ec5448243621f6c822c4_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__wave__module__deriv_a90da452986d7b82e30795621ac031f3c}\label{namespacewa__wave__module__deriv_a90da452986d7b82e30795621ac031f3c}} 
\index{wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}!xya\+\_\+gradmu\+\_\+wa@{xya\+\_\+gradmu\+\_\+wa}}
\index{xya\+\_\+gradmu\+\_\+wa@{xya\+\_\+gradmu\+\_\+wa}!wa\+\_\+wave\+\_\+module\+\_\+deriv@{wa\+\_\+wave\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{xya\+\_\+gradmu\+\_\+wa()}{xya\_gradmu\_wa()}}
{\footnotesize\ttfamily real(8) function, dimension(0\+:im-\/1,1\+:jm,size(wa\+\_\+data,2)), public wa\+\_\+wave\+\_\+module\+\_\+deriv\+::xya\+\_\+gradmu\+\_\+wa (\begin{DoxyParamCaption}\item[{real(8), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



Definition at line 218 of file wa\+\_\+wave\+\_\+module\+\_\+deriv.\+f90.



References wa\+\_\+wave\+\_\+module\+\_\+base\+::xya\+\_\+wa().


\begin{DoxyCode}
218     \textcolor{comment}{!}
219     \textcolor{comment}{! スペクトルデータに勾配型緯度微分 (1-μ^2)∂/∂μ  (μ=sinφ)}
220     \textcolor{comment}{! を作用させて格子点データに変換して返す(多層用).}
221     \textcolor{comment}{!}
222     \textcolor{keywordtype}{real(8)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
223     \textcolor{comment}{!(in) 入力スペクトルデータ}
224     \textcolor{keywordtype}{real(8)}              :: xya\_gradmu\_wa(0:im-1,1:jm,size(wa\_data,2))
225     \textcolor{comment}{!(out) スペクトルデータを勾配型緯度微分した格子点データ}
226 
227     xya\_gradmu\_wa = xya\_wa(wa\_data,ipow=0,iflag=1)
228 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__wave__module__deriv_a90da452986d7b82e30795621ac031f3c_cgraph}
\end{center}
\end{figure}
