<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">\hypertarget{namespacewa__module__deriv}{}\section{wa\+\_\+module\+\_\+deriv Module Reference}
\label{namespacewa__module__deriv}\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
real(dp) function, dimension((nm+1) $\ast$(nm+1), size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__module__deriv_a1d06e3097dab6ac428d9681139719fea}{wa\+\_\+lapla\+\_\+wa} (wa\+\_\+data)
\item 
real(dp) function, dimension((nm+1) $\ast$(nm+1), size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__module__deriv_a922ff3a5cfb927d00afec3dd9df827e0}{wa\+\_\+laplainv\+\_\+wa} (wa\+\_\+data)
\item 
real(dp) function, dimension((nm+1) $\ast$(nm+1), size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__module__deriv_ae143b688a5bb10daf8904281cb297012}{wa\+\_\+dlon\+\_\+wa} (wa\+\_\+data)
\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jm, size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__module__deriv_aa45cb2f4714ad006c8a6963820821521}{xya\+\_\+gradlon\+\_\+wa} (wa\+\_\+data)
\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jm, size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__module__deriv_ae38c93df54e72fe8898d3d6a9549f794}{xya\+\_\+gradlat\+\_\+wa} (wa\+\_\+data)
\item 
real(dp) function, dimension((nm+1) $\ast$$\ast$2, size(xya\+\_\+data, 3)), public \hyperlink{namespacewa__module__deriv_ad30d3f1be6a8ec92cd1bac490bd80815}{wa\+\_\+divlon\+\_\+xya} (xya\+\_\+data)
\item 
real(dp) function, dimension((nm+1) $\ast$$\ast$2, size(xya\+\_\+data, 3)), public \hyperlink{namespacewa__module__deriv_a9ed2015385b3e42ec7df6ce7cae7ae6c}{wa\+\_\+divlat\+\_\+xya} (xya\+\_\+data)
\item 
real(dp) function, dimension((nm+1) $\ast$$\ast$2, size(xya\+\_\+u, 3)), public \hyperlink{namespacewa__module__deriv_a59732ffcb7d360b05c1b2ca26e8c3569}{wa\+\_\+div\+\_\+xya\+\_\+xya} (xya\+\_\+u, xya\+\_\+v)
\item 
real(dp) function, dimension((nm+1) $\ast$$\ast$2, size(wa\+\_\+a, 2)), public \hyperlink{namespacewa__module__deriv_af0d9000fe52f4ef67432a734e992eb8d}{wa\+\_\+jacobian\+\_\+wa\+\_\+wa} (wa\+\_\+a, wa\+\_\+b)
\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jm, size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__module__deriv_af3257cedf615b2bbd2205c3d6952a91b}{xya\+\_\+gradlambda\+\_\+wa} (wa\+\_\+data)
\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jm, size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__module__deriv_a7d747e78d1d2ddba0f3dbe272ec41482}{xya\+\_\+gradmu\+\_\+wa} (wa\+\_\+data)
\item 
real(dp) function, dimension((nm+1) $\ast$$\ast$2, size(xya\+\_\+data, 3)), public \hyperlink{namespacewa__module__deriv_a4ce86b92c965c7e230cb2e920c05a2b5}{wa\+\_\+divlambda\+\_\+xya} (xya\+\_\+data)
\item 
real(dp) function, dimension((nm+1) $\ast$$\ast$2, size(xya\+\_\+data, 3)), public \hyperlink{namespacewa__module__deriv_a49076a5135f3752a834808958c16db27}{wa\+\_\+divmu\+\_\+xya} (xya\+\_\+data)
\end{DoxyCompactItemize}


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



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



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


\begin{DoxyCode}
195     \textcolor{comment}{!}
196     \textcolor{comment}{! 2 縺､縺ｮ蜈･蜉帶�ｼ蟄千せ繝��繧ｿ繧偵�繧ｯ繝医Ν謌仙�縺ｨ縺吶ｋ逋ｺ謨｣繧定ｨ育ｮ励＠,}
197     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｨ縺励※霑斐☆(螟壼ｱ､逕ｨ).}
198     \textcolor{comment}{!}
199     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: xya\_u(0:,:,:)
200     \textcolor{comment}{!(in) 繝吶け繝医Ν邨悟ｺｦ謌仙�縺ｮ譬ｼ蟄千せ繝��繧ｿ}
201     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: xya\_v(0:,:,:)
202     \textcolor{comment}{!(in) 繝吶け繝医Ν邱ｯ蠎ｦ謌仙�縺ｮ譬ｼ蟄千せ繝��繧ｿ}
203     \textcolor{keywordtype}{real(DP)}              :: wa\_div\_xya\_xya((nm+1)**2,size(xya\_u,3))
204     \textcolor{comment}{!(out) 2 縺､縺ｮ蜈･蜉帶�ｼ蟄千せ繝��繧ｿ繧偵�繧ｯ繝医Ν謌仙�縺ｨ縺吶ｋ逋ｺ謨｣縺ｮ繧ｹ繝壹け繝医Ν繝��繧ｿ}
205 
206     wa\_div\_xya\_xya = wa\_divlon\_xya(xya\_u) + wa\_divlat\_xya(xya\_v)
207 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__module__deriv_a59732ffcb7d360b05c1b2ca26e8c3569_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__module__deriv_a4ce86b92c965c7e230cb2e920c05a2b5}\label{namespacewa__module__deriv_a4ce86b92c965c7e230cb2e920c05a2b5}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!wa\+\_\+divlambda\+\_\+xya@{wa\+\_\+divlambda\+\_\+xya}}
\index{wa\+\_\+divlambda\+\_\+xya@{wa\+\_\+divlambda\+\_\+xya}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+divlambda\+\_\+xya()}{wa\_divlambda\_xya()}}
{\footnotesize\ttfamily real(dp) function, dimension((nm+1)$\ast$$\ast$2,size(xya\+\_\+data,3)), public wa\+\_\+module\+\_\+deriv\+::wa\+\_\+divlambda\+\_\+xya (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+data }\end{DoxyParamCaption})}



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



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


\begin{DoxyCode}
262     \textcolor{comment}{!}
263     \textcolor{comment}{! 譬ｼ蟄千せ繝��繧ｿ縺ｫ逋ｺ謨｣蝙狗ｵ悟ｺｦ蠕ｮ蛻� 1/(1-ﾎｼ^2)繝ｻ竏�/竏ばｻ (ﾎｼ=sinﾏ�)}
264     \textcolor{comment}{! 繧剃ｽ懃畑縺輔○縺ｦ繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ螟画鋤縺励※霑斐☆(螟壼ｱ､逕ｨ).}
265     \textcolor{comment}{!}
266     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: xya\_data(0:,:,:)
267     \textcolor{comment}{!(in) 蜈･蜉帶�ｼ蟄千せ繝��繧ｿ}
268     \textcolor{keywordtype}{real(DP)}              :: wa\_divlambda\_xya((nm+1)**2,size(xya\_data,3))
269     \textcolor{comment}{!(out) 譬ｼ蟄千せ繝��繧ｿ繧堤匱謨｣蝙狗ｵ悟ｺｦ蠕ｮ蛻�＠縺溘せ繝壹け繝医Ν繝��繧ｿ}
270 
271     wa\_divlambda\_xya = wa\_xya(xya\_data,ipow=2,iflag=-1)
272 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__module__deriv_a4ce86b92c965c7e230cb2e920c05a2b5_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__module__deriv_a9ed2015385b3e42ec7df6ce7cae7ae6c}\label{namespacewa__module__deriv_a9ed2015385b3e42ec7df6ce7cae7ae6c}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!wa\+\_\+divlat\+\_\+xya@{wa\+\_\+divlat\+\_\+xya}}
\index{wa\+\_\+divlat\+\_\+xya@{wa\+\_\+divlat\+\_\+xya}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+divlat\+\_\+xya()}{wa\_divlat\_xya()}}
{\footnotesize\ttfamily real(dp) function, dimension((nm+1)$\ast$$\ast$2,size(xya\+\_\+data,3)), public wa\+\_\+module\+\_\+deriv\+::wa\+\_\+divlat\+\_\+xya (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+data }\end{DoxyParamCaption})}



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



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


\begin{DoxyCode}
181     \textcolor{comment}{!}
182     \textcolor{comment}{! 譬ｼ蟄千せ繝��繧ｿ縺ｫ逋ｺ謨｣蝙狗ｷｯ蠎ｦ蠕ｮ蛻� 1/cosﾏ��竏�(f cosﾏ�)/竏ぱ� 繧剃ｽ懃畑縺輔○縺ｦ}
183     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ螟画鋤縺励※霑斐☆(螟壼ｱ､逕ｨ).}
184     \textcolor{comment}{!}
185     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: xya\_data(0:,:,:)
186     \textcolor{comment}{!(in) 蜈･蜉帶�ｼ蟄千せ繝��繧ｿ}
187     \textcolor{keywordtype}{real(DP)}              :: wa\_divlat\_xya((nm+1)**2,size(xya\_data,3))
188     \textcolor{comment}{!(out) 譬ｼ蟄千せ繝��繧ｿ繧堤匱謨｣蝙狗ｷｯ蠎ｦ蠕ｮ蛻�＠縺溘せ繝壹け繝医Ν繝��繧ｿ}
189 
190     wa\_divlat\_xya = wa\_xya(xya\_data,ipow=1,iflag=1)
191 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__module__deriv_a9ed2015385b3e42ec7df6ce7cae7ae6c_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__module__deriv_ad30d3f1be6a8ec92cd1bac490bd80815}\label{namespacewa__module__deriv_ad30d3f1be6a8ec92cd1bac490bd80815}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!wa\+\_\+divlon\+\_\+xya@{wa\+\_\+divlon\+\_\+xya}}
\index{wa\+\_\+divlon\+\_\+xya@{wa\+\_\+divlon\+\_\+xya}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+divlon\+\_\+xya()}{wa\_divlon\_xya()}}
{\footnotesize\ttfamily real(dp) function, dimension((nm+1)$\ast$$\ast$2,size(xya\+\_\+data,3)), public wa\+\_\+module\+\_\+deriv\+::wa\+\_\+divlon\+\_\+xya (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+data }\end{DoxyParamCaption})}



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



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


\begin{DoxyCode}
167     \textcolor{comment}{!}
168     \textcolor{comment}{! 譬ｼ蟄千せ繝��繧ｿ縺ｫ逋ｺ謨｣蝙狗ｵ悟ｺｦ蠕ｮ蛻� 1/cosﾏ��竏�/竏ばｻ 繧剃ｽ懃畑縺輔○縺ｦ}
169     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ螟画鋤縺励※霑斐☆(螟壼ｱ､逕ｨ).}
170     \textcolor{comment}{!}
171     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: xya\_data(0:,:,:)
172     \textcolor{comment}{!(in) 蜈･蜉帶�ｼ蟄千せ繝��繧ｿ}
173     \textcolor{keywordtype}{real(DP)}              :: wa\_divlon\_xya((nm+1)**2,size(xya\_data,3))
174     \textcolor{comment}{!(out) 譬ｼ蟄千せ繝��繧ｿ繧堤匱謨｣蝙狗ｵ悟ｺｦ蠕ｮ蛻�＠縺溘せ繝壹け繝医Ν繝��繧ｿ}
175 
176     wa\_divlon\_xya = wa\_xya(xya\_data,ipow=1,iflag=-1)
177 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__module__deriv_ad30d3f1be6a8ec92cd1bac490bd80815_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__module__deriv_a49076a5135f3752a834808958c16db27}\label{namespacewa__module__deriv_a49076a5135f3752a834808958c16db27}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!wa\+\_\+divmu\+\_\+xya@{wa\+\_\+divmu\+\_\+xya}}
\index{wa\+\_\+divmu\+\_\+xya@{wa\+\_\+divmu\+\_\+xya}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+divmu\+\_\+xya()}{wa\_divmu\_xya()}}
{\footnotesize\ttfamily real(dp) function, dimension((nm+1)$\ast$$\ast$2,size(xya\+\_\+data,3)), public wa\+\_\+module\+\_\+deriv\+::wa\+\_\+divmu\+\_\+xya (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:,\+:,\+:), intent(in)}]{xya\+\_\+data }\end{DoxyParamCaption})}



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



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


\begin{DoxyCode}
276     \textcolor{comment}{!}
277     \textcolor{comment}{! 譬ｼ蟄千せ繝��繧ｿ縺ｫ逋ｺ謨｣蝙狗ｷｯ蠎ｦ蠕ｮ蛻� 竏�/竏ばｼ (ﾎｼ=sinﾏ�)繧剃ｽ懃畑縺輔○縺ｦ}
278     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ螟画鋤縺励※霑斐☆(螟壼ｱ､逕ｨ).}
279     \textcolor{comment}{!}
280     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: xya\_data(0:,:,:)
281     \textcolor{comment}{!(in) 蜈･蜉帶�ｼ蟄千せ繝��繧ｿ}
282     \textcolor{keywordtype}{real(DP)}              :: wa\_divmu\_xya((nm+1)**2,size(xya\_data,3))
283     \textcolor{comment}{!(out) 譬ｼ蟄千せ繝��繧ｿ繧堤匱謨｣蝙狗ｷｯ蠎ｦ蠕ｮ蛻�＠縺溘せ繝壹け繝医Ν繝��繧ｿ}
284 
285     wa\_divmu\_xya = wa\_xya(xya\_data,ipow=2,iflag=1)
286 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__module__deriv_a49076a5135f3752a834808958c16db27_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__module__deriv_ae143b688a5bb10daf8904281cb297012}\label{namespacewa__module__deriv_ae143b688a5bb10daf8904281cb297012}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!wa\+\_\+dlon\+\_\+wa@{wa\+\_\+dlon\+\_\+wa}}
\index{wa\+\_\+dlon\+\_\+wa@{wa\+\_\+dlon\+\_\+wa}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+dlon\+\_\+wa()}{wa\_dlon\_wa()}}
{\footnotesize\ttfamily real(dp) function, dimension((nm+1)$\ast$(nm+1),size(wa\+\_\+data,2)), public wa\+\_\+module\+\_\+deriv\+::wa\+\_\+dlon\+\_\+wa (\begin{DoxyParamCaption}\item[{real(dp), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



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


\begin{DoxyCode}
120     \textcolor{comment}{!}
121     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ邨悟ｺｦ蠕ｮ蛻� 竏�/竏ばｻ 繧剃ｽ懃畑縺輔○繧�(螟壼ｱ､逕ｨ).}
122     \textcolor{comment}{!}
123     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｮ邨悟ｺｦ蠕ｮ蛻�→縺ｯ, 蟇ｾ蠢懊☆繧区�ｼ蟄千せ繝��繧ｿ縺ｫ}
124     \textcolor{comment}{! 邨悟ｺｦ蠕ｮ蛻��/竏ばｻ繧剃ｽ懃畑縺輔○縺溘ョ繝ｼ繧ｿ縺ｮ繧ｹ繝壹け繝医Ν螟画鋤縺ｮ縺薙→縺ｧ縺ゅｋ.}
125     \textcolor{comment}{!}
126     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
127     \textcolor{comment}{!(in) 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ}
128     \textcolor{keywordtype}{real(DP)}              :: wa\_dlon\_wa((nm+1)*(nm+1),size(wa\_data,2))
129     \textcolor{comment}{!(out) 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｮ邨悟ｺｦ蠕ｮ蛻�}
130     \textcolor{keywordtype}{integer} :: k
131 
132     \textcolor{keywordflow}{do} k=1,\textcolor{keyword}{size}(wa\_data,2)
133       wa\_dlon\_wa(:,k) = w\_dlon\_w(wa\_data(:,k))
134 \textcolor{keywordflow}{    enddo}
135 
\end{DoxyCode}
\mbox{\Hypertarget{namespacewa__module__deriv_af0d9000fe52f4ef67432a734e992eb8d}\label{namespacewa__module__deriv_af0d9000fe52f4ef67432a734e992eb8d}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!wa\+\_\+jacobian\+\_\+wa\+\_\+wa@{wa\+\_\+jacobian\+\_\+wa\+\_\+wa}}
\index{wa\+\_\+jacobian\+\_\+wa\+\_\+wa@{wa\+\_\+jacobian\+\_\+wa\+\_\+wa}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+jacobian\+\_\+wa\+\_\+wa()}{wa\_jacobian\_wa\_wa()}}
{\footnotesize\ttfamily real(dp) function, dimension((nm+1)$\ast$$\ast$2,size(wa\+\_\+a,2)), public wa\+\_\+module\+\_\+deriv\+::wa\+\_\+jacobian\+\_\+wa\+\_\+wa (\begin{DoxyParamCaption}\item[{real(dp), dimension(\+:,\+:), intent(in)}]{wa\+\_\+a,  }\item[{real(dp), dimension(\+:,\+:), intent(in)}]{wa\+\_\+b }\end{DoxyParamCaption})}



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


\begin{DoxyCode}
211     \textcolor{comment}{! 2 縺､縺ｮ繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ繝､繧ｳ繝薙い繝ｳ}
212     \textcolor{comment}{!}
213     \textcolor{comment}{!   J(f,g) = 竏Ｇ/竏ばｻ繝ｻ竏Ｈ/竏ばｼ - 竏Ｈ/竏ばｻ繝ｻ竏Ｇ/竏ばｼ}
214     \textcolor{comment}{!          = 竏Ｇ/竏ばｻ繝ｻ1/cosﾏ��竏Ｈ/竏ぱ�}
215     \textcolor{comment}{!             - 竏Ｈ/竏ばｻ繝ｻ1/cosﾏ��竏Ｇ/竏ぱ�}
216     \textcolor{comment}{!}
217     \textcolor{comment}{! 繧剃ｽ懃畑縺輔○繧�(螟壼ｱ､逕ｨ).}
218     \textcolor{comment}{!}
219     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: wa\_a(:,:)
220     \textcolor{comment}{!(in) 1縺､逶ｮ縺ｮ蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ}
221     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)} :: wa\_b(:,:)
222     \textcolor{comment}{!(in) 2縺､逶ｮ縺ｮ蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ}
223     \textcolor{keywordtype}{real(DP)}             :: wa\_jacobian\_wa\_wa((nm+1)**2,size(wa\_a,2))
224     \textcolor{comment}{!(out) 2 縺､縺ｮ繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｮ繝､繧ｳ繝薙い繝ｳ}
225     \textcolor{keywordtype}{integer} :: k
226 
227     \textcolor{keywordflow}{do} k=1,\textcolor{keyword}{size}(wa\_a,2)
228       wa\_jacobian\_wa\_wa(:,k) = w\_jacobian\_w\_w(wa\_a(:,k),wa\_b(:,k))
229 \textcolor{keywordflow}{    end do}
\end{DoxyCode}
\mbox{\Hypertarget{namespacewa__module__deriv_a1d06e3097dab6ac428d9681139719fea}\label{namespacewa__module__deriv_a1d06e3097dab6ac428d9681139719fea}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!wa\+\_\+lapla\+\_\+wa@{wa\+\_\+lapla\+\_\+wa}}
\index{wa\+\_\+lapla\+\_\+wa@{wa\+\_\+lapla\+\_\+wa}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+lapla\+\_\+wa()}{wa\_lapla\_wa()}}
{\footnotesize\ttfamily real(dp) function, dimension((nm+1)$\ast$(nm+1),size(wa\+\_\+data,2)), public wa\+\_\+module\+\_\+deriv\+::wa\+\_\+lapla\+\_\+wa (\begin{DoxyParamCaption}\item[{real(dp), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



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


\begin{DoxyCode}
73     \textcolor{comment}{!}
74     \textcolor{comment}{! 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ縺ｫ繝ｩ繝励Λ繧ｷ繧｢繝ｳ}
75     \textcolor{comment}{!}
76     \textcolor{comment}{!    笆ｽ^2 = 1/cos^2ﾏ��竏�^2/竏ばｻ^2 + 1/cosﾏ��竏�/竏ぱ�(cosﾏ��/竏ぱ�)}
77     \textcolor{comment}{!}
78     \textcolor{comment}{! 繧剃ｽ懃畑縺吶ｋ(螟壼ｱ､逕ｨ).}
79     \textcolor{comment}{!}
80     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｮ繝ｩ繝励Λ繧ｷ繧｢繝ｳ縺ｨ縺ｯ, 蟇ｾ蠢懊☆繧区�ｼ蟄千せ繝��繧ｿ縺ｫ}
81     \textcolor{comment}{! 繝ｩ繝励Λ繧ｷ繧｢繝ｳ繧剃ｽ懃畑縺輔○縺溘ョ繝ｼ繧ｿ縺ｮ繧ｹ繝壹け繝医Ν螟画鋤縺ｮ縺薙→縺ｧ縺ゅｋ.}
82     \textcolor{comment}{!}
83     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
84     \textcolor{comment}{!(in) 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ}
85     \textcolor{keywordtype}{real(DP)}              :: wa\_lapla\_wa((nm+1)*(nm+1),size(wa\_data,2))
86     \textcolor{comment}{!(out) 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ縺ｮ繝ｩ繝励Λ繧ｷ繧｢繝ｳ}
87     \textcolor{keywordtype}{integer} :: k
88 
89     \textcolor{keywordflow}{do} k=1,\textcolor{keyword}{size}(wa\_data,2)
90       wa\_lapla\_wa(:,k) = w\_lapla\_w(wa\_data(:,k))
91 \textcolor{keywordflow}{    enddo}
92 
\end{DoxyCode}
\mbox{\Hypertarget{namespacewa__module__deriv_a922ff3a5cfb927d00afec3dd9df827e0}\label{namespacewa__module__deriv_a922ff3a5cfb927d00afec3dd9df827e0}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!wa\+\_\+laplainv\+\_\+wa@{wa\+\_\+laplainv\+\_\+wa}}
\index{wa\+\_\+laplainv\+\_\+wa@{wa\+\_\+laplainv\+\_\+wa}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{wa\+\_\+laplainv\+\_\+wa()}{wa\_laplainv\_wa()}}
{\footnotesize\ttfamily real(dp) function, dimension((nm+1)$\ast$(nm+1),size(wa\+\_\+data,2)), public wa\+\_\+module\+\_\+deriv\+::wa\+\_\+laplainv\+\_\+wa (\begin{DoxyParamCaption}\item[{real(dp), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



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


\begin{DoxyCode}
96     \textcolor{comment}{!}
97     \textcolor{comment}{! 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ縺ｫ騾�Λ繝励Λ繧ｷ繧｢繝ｳ}
98     \textcolor{comment}{!}
99     \textcolor{comment}{!    笆ｽ^\{-2\}}
100     \textcolor{comment}{!      =[1/cos^2ﾏ��竏�^2/竏ばｻ^2 + 1/cosﾏ��竏�/竏ぱ�(cosﾏ��/竏ぱ�)]^\{-1\}}
101     \textcolor{comment}{!}
102     \textcolor{comment}{! 繧剃ｽ懃畑縺吶ｋ(螟壼ｱ､逕ｨ).}
103     \textcolor{comment}{!}
104     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｮ騾�Λ繝励Λ繧ｷ繧｢繝ｳ縺ｨ縺ｯ, 蟇ｾ蠢懊☆繧区�ｼ蟄千せ繝��繧ｿ縺ｫ}
105     \textcolor{comment}{! 騾�Λ繝励Λ繧ｷ繧｢繝ｳ繧剃ｽ懃畑縺輔○縺溘ョ繝ｼ繧ｿ縺ｮ繧ｹ繝壹け繝医Ν螟画鋤縺ｮ縺薙→縺ｧ縺ゅｋ.}
106     \textcolor{comment}{!}
107     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
108     \textcolor{comment}{!(in) 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ}
109     \textcolor{keywordtype}{real(DP)}              :: wa\_laplainv\_wa((nm+1)*(nm+1),size(wa\_data,2))
110     \textcolor{comment}{!(out) 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｮ騾�Λ繝励Λ繧ｷ繧｢繝ｳ}
111     \textcolor{keywordtype}{integer} :: k
112 
113     \textcolor{keywordflow}{do} k=1,\textcolor{keyword}{size}(wa\_data,2)
114       wa\_laplainv\_wa(:,k) = w\_laplainv\_w(wa\_data(:,k))
115 \textcolor{keywordflow}{    enddo}
116 
\end{DoxyCode}
\mbox{\Hypertarget{namespacewa__module__deriv_af3257cedf615b2bbd2205c3d6952a91b}\label{namespacewa__module__deriv_af3257cedf615b2bbd2205c3d6952a91b}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!xya\+\_\+gradlambda\+\_\+wa@{xya\+\_\+gradlambda\+\_\+wa}}
\index{xya\+\_\+gradlambda\+\_\+wa@{xya\+\_\+gradlambda\+\_\+wa}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{xya\+\_\+gradlambda\+\_\+wa()}{xya\_gradlambda\_wa()}}
{\footnotesize\ttfamily real(dp) function, dimension(0\+:im-\/1,1\+:jm,size(wa\+\_\+data,2)), public wa\+\_\+module\+\_\+deriv\+::xya\+\_\+gradlambda\+\_\+wa (\begin{DoxyParamCaption}\item[{real(dp), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



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



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


\begin{DoxyCode}
235     \textcolor{comment}{!}
236     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ蜍ｾ驟榊梛邨悟ｺｦ蠕ｮ蛻� 竏�/竏ばｻ 繧剃ｽ懃畑縺吶ｋ(螟壼ｱ､逕ｨ).}
237     \textcolor{comment}{!}
238     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
239     \textcolor{comment}{!(in) 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ}
240     \textcolor{keywordtype}{real(DP)}              :: xya\_gradlambda\_wa(0:im-1,1:jm,size(wa\_data,2))
241     \textcolor{comment}{!(out) 繧ｹ繝壹け繝医Ν繝��繧ｿ繧貞鏡驟榊梛邨悟ｺｦ蠕ｮ蛻�＠縺滓�ｼ蟄千せ繝��繧ｿ}
242 
243     xya\_gradlambda\_wa = xya\_wa(wa\_data,ipow=0,iflag=-1)
244 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__module__deriv_af3257cedf615b2bbd2205c3d6952a91b_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__module__deriv_ae38c93df54e72fe8898d3d6a9549f794}\label{namespacewa__module__deriv_ae38c93df54e72fe8898d3d6a9549f794}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!xya\+\_\+gradlat\+\_\+wa@{xya\+\_\+gradlat\+\_\+wa}}
\index{xya\+\_\+gradlat\+\_\+wa@{xya\+\_\+gradlat\+\_\+wa}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{xya\+\_\+gradlat\+\_\+wa()}{xya\_gradlat\_wa()}}
{\footnotesize\ttfamily real(dp) function, dimension(0\+:im-\/1,1\+:jm,size(wa\+\_\+data,2)), public wa\+\_\+module\+\_\+deriv\+::xya\+\_\+gradlat\+\_\+wa (\begin{DoxyParamCaption}\item[{real(dp), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



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



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


\begin{DoxyCode}
153     \textcolor{comment}{!}
154     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ蜍ｾ驟榊梛邱ｯ蠎ｦ蠕ｮ蛻� 竏�/竏ぱ� 繧剃ｽ懃畑縺輔○縺ｦ}
155     \textcolor{comment}{! 譬ｼ蟄千せ繝��繧ｿ縺ｫ螟画鋤縺励※霑斐☆(螟壼ｱ､逕ｨ).}
156     \textcolor{comment}{!}
157     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
158     \textcolor{comment}{!(in) 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ}
159     \textcolor{keywordtype}{real(DP)}              :: xya\_gradlat\_wa(0:im-1,1:jm,size(wa\_data,2))
160     \textcolor{comment}{!(out) 繧ｹ繝壹け繝医Ν繝��繧ｿ繧貞鏡驟榊梛邱ｯ蠎ｦ蠕ｮ蛻�＠縺滓�ｼ蟄千せ繝��繧ｿ}
161 
162     xya\_gradlat\_wa = xya\_wa(wa\_data,ipow=1,iflag=1)
163 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__module__deriv_ae38c93df54e72fe8898d3d6a9549f794_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__module__deriv_aa45cb2f4714ad006c8a6963820821521}\label{namespacewa__module__deriv_aa45cb2f4714ad006c8a6963820821521}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!xya\+\_\+gradlon\+\_\+wa@{xya\+\_\+gradlon\+\_\+wa}}
\index{xya\+\_\+gradlon\+\_\+wa@{xya\+\_\+gradlon\+\_\+wa}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{xya\+\_\+gradlon\+\_\+wa()}{xya\_gradlon\_wa()}}
{\footnotesize\ttfamily real(dp) function, dimension(0\+:im-\/1,1\+:jm,size(wa\+\_\+data,2)), public wa\+\_\+module\+\_\+deriv\+::xya\+\_\+gradlon\+\_\+wa (\begin{DoxyParamCaption}\item[{real(dp), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



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



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


\begin{DoxyCode}
139     \textcolor{comment}{!}
140     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ蜍ｾ驟榊梛邨悟ｺｦ蠕ｮ蛻� 1/cosﾏ��竏�/竏ばｻ 繧筑
141     \textcolor{comment}{! 菴懃畑縺輔○縺滓�ｼ蟄千せ繝��繧ｿ繧定ｿ斐☆(螟壼ｱ､逕ｨ).}
142     \textcolor{comment}{!}
143     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
144     \textcolor{comment}{!(in) 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ}
145     \textcolor{keywordtype}{real(DP)}              :: xya\_gradlon\_wa(0:im-1,1:jm,size(wa\_data,2))
146     \textcolor{comment}{!(out) 繧ｹ繝壹け繝医Ν繝��繧ｿ繧貞鏡驟榊梛邨悟ｺｦ蠕ｮ蛻�＠縺滓�ｼ蟄千せ繝��繧ｿ}
147 
148     xya\_gradlon\_wa = xya\_wa(wa\_data,ipow=1,iflag=-1)
149 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__module__deriv_aa45cb2f4714ad006c8a6963820821521_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacewa__module__deriv_a7d747e78d1d2ddba0f3dbe272ec41482}\label{namespacewa__module__deriv_a7d747e78d1d2ddba0f3dbe272ec41482}} 
\index{wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}!xya\+\_\+gradmu\+\_\+wa@{xya\+\_\+gradmu\+\_\+wa}}
\index{xya\+\_\+gradmu\+\_\+wa@{xya\+\_\+gradmu\+\_\+wa}!wa\+\_\+module\+\_\+deriv@{wa\+\_\+module\+\_\+deriv}}
\subsubsection{\texorpdfstring{xya\+\_\+gradmu\+\_\+wa()}{xya\_gradmu\_wa()}}
{\footnotesize\ttfamily real(dp) function, dimension(0\+:im-\/1,1\+:jm,size(wa\+\_\+data,2)), public wa\+\_\+module\+\_\+deriv\+::xya\+\_\+gradmu\+\_\+wa (\begin{DoxyParamCaption}\item[{real(dp), dimension(\+:,\+:), intent(in)}]{wa\+\_\+data }\end{DoxyParamCaption})}



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



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


\begin{DoxyCode}
248     \textcolor{comment}{!}
249     \textcolor{comment}{! 繧ｹ繝壹け繝医Ν繝��繧ｿ縺ｫ蜍ｾ驟榊梛邱ｯ蠎ｦ蠕ｮ蛻� (1-ﾎｼ^2)竏�/竏ばｼ  (ﾎｼ=sinﾏ�)}
250     \textcolor{comment}{! 繧剃ｽ懃畑縺輔○縺ｦ譬ｼ蟄千せ繝��繧ｿ縺ｫ螟画鋤縺励※霑斐☆(螟壼ｱ､逕ｨ).}
251     \textcolor{comment}{!}
252     \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}  :: wa\_data(:,:)
253     \textcolor{comment}{!(in) 蜈･蜉帙せ繝壹け繝医Ν繝��繧ｿ}
254     \textcolor{keywordtype}{real(DP)}              :: xya\_gradmu\_wa(0:im-1,1:jm,size(wa\_data,2))
255     \textcolor{comment}{!(out) 繧ｹ繝壹け繝医Ν繝��繧ｿ繧貞鏡驟榊梛邱ｯ蠎ｦ蠕ｮ蛻�＠縺滓�ｼ蟄千せ繝��繧ｿ}
256 
257     xya\_gradmu\_wa = xya\_wa(wa\_data,ipow=0,iflag=1)
258 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacewa__module__deriv_a7d747e78d1d2ddba0f3dbe272ec41482_cgraph}
\end{center}
\end{figure}
</pre></body></html>