\hypertarget{namespacew__module__deriv}{}\doxysection{w\+\_\+module\+\_\+deriv Module Reference}
\label{namespacew__module__deriv}\index{w\_module\_deriv@{w\_module\_deriv}}


\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 
subroutine, public \mbox{\hyperlink{namespacew__module__deriv_adc13d210b7a9740e5a19f115ef208441}{w\+\_\+deriv\+\_\+initial}}
\begin{DoxyCompactList}\small\item\em スペクトル微分計算に必要となる作業領域を設定する. \end{DoxyCompactList}\item 
real(dp) function, dimension((nn+1) $\ast$(nn+1)), public \mbox{\hyperlink{namespacew__module__deriv_a0bf8cc78dc8dde2691985c05044d9c4b}{w\+\_\+lapla\+\_\+w}} (w\+\_\+data)
\begin{DoxyCompactList}\small\item\em 入力スペクトルデータにラプラシアン \end{DoxyCompactList}\item 
real(dp) function, dimension((nn+1) $\ast$(nn+1)), public \mbox{\hyperlink{namespacew__module__deriv_aa247a4a281588e92be2ec6a11da04a5b}{w\+\_\+laplainv\+\_\+w}} (w\+\_\+data)
\begin{DoxyCompactList}\small\item\em 入力スペクトルデータに逆ラプラシアン \end{DoxyCompactList}\item 
real(dp) function, dimension((nn+1) $\ast$(nn+1)), public \mbox{\hyperlink{namespacew__module__deriv_a1676aabd52064c64b765e84b140b8a82}{w\+\_\+dlon\+\_\+w}} (w\+\_\+data)
\begin{DoxyCompactList}\small\item\em スペクトルデータに経度微分 $∂/∂λ$ を作用させる(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jm), public \mbox{\hyperlink{namespacew__module__deriv_a88efad865d2eb89d3a069ac9c45b3f9b}{xy\+\_\+gradlon\+\_\+w}} (w\+\_\+data)
\begin{DoxyCompactList}\small\item\em スペクトルデータに勾配型経度微分 $1/\cosφ・∂/∂λ$ を 作用させた格子点データを返す(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jm), public \mbox{\hyperlink{namespacew__module__deriv_a79fbe256e0d5145fc01ca38435860741}{xy\+\_\+gradlat\+\_\+w}} (w\+\_\+data)
\begin{DoxyCompactList}\small\item\em スペクトルデータに勾配型緯度微分 $∂/∂φ$ を作用させて 格子点データに変換して返す(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension((nn+1) $\ast$(nn+1)), public \mbox{\hyperlink{namespacew__module__deriv_a4ad86b3db507fb0bff454e007e515ba0}{w\+\_\+divlon\+\_\+xy}} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 格子点データに発散型経度微分 $1/\cosφ・∂/∂λ$ を作用させて スペクトルデータに変換して返す(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension((nn+1) $\ast$(nn+1)), public \mbox{\hyperlink{namespacew__module__deriv_ab13eefdf5b81060ce83e3065b1fea953}{w\+\_\+divlat\+\_\+xy}} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 格子点データに発散型緯度微分 $1/\cosφ・∂(f \cosφ)/∂φ$ を作用させてスペクトルデータに変換して返す(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension((nn+1) $\ast$(nn+1)), public \mbox{\hyperlink{namespacew__module__deriv_a4ac727e6389247d61f99e5358aebf069}{w\+\_\+div\+\_\+xy\+\_\+xy}} (xy\+\_\+u, xy\+\_\+v)
\begin{DoxyCompactList}\small\item\em 2 つの入力格子点データをベクトル成分とする発散を計算し, スペクトルデータとして返す(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension((nn+1) $\ast$(nn+1)), public \mbox{\hyperlink{namespacew__module__deriv_a7a61436e763799d6fb0b980e84e1b232}{w\+\_\+jacobian\+\_\+w\+\_\+w}} (w\+\_\+a, w\+\_\+b)
\begin{DoxyCompactList}\small\item\em 2 つのスペクトルデータにヤコビアン \end{DoxyCompactList}\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jm), public \mbox{\hyperlink{namespacew__module__deriv_aafdccb5625e83fc74e07f28c29c663ae}{xy\+\_\+gradlambda\+\_\+w}} (w\+\_\+data)
\begin{DoxyCompactList}\small\item\em スペクトルデータに勾配型経度微分 ∂/∂λ を作用する(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jm), public \mbox{\hyperlink{namespacew__module__deriv_a602369ddd0f5e6b89163ac558e0d71b1}{xy\+\_\+gradmu\+\_\+w}} (w\+\_\+data)
\begin{DoxyCompactList}\small\item\em スペクトルデータに勾配型緯度微分 $(1-μ^2)∂/∂μ ,\, (μ=\sinφ)$ を作用させて格子点データに変換して返す(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension((nn+1) $\ast$(nn+1)), public \mbox{\hyperlink{namespacew__module__deriv_a6dc1edaff2ff00ce89f907370a0b0292}{w\+\_\+divlambda\+\_\+xy}} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 格子点データに発散型経度微分 $1/(1-μ^2)・∂/∂λ, \, (μ=\sinφ)$ を作用させてスペクトルデータに変換して返す(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension((nn+1) $\ast$(nn+1)), public \mbox{\hyperlink{namespacew__module__deriv_a984edeb7ba46736df32910567e30ed8e}{w\+\_\+divmu\+\_\+xy}} (xy\+\_\+data)
\begin{DoxyCompactList}\small\item\em 格子点データに発散型緯度微分 $∂/∂μ, \, (μ=\sinφ)$ を作用させてスペクトルデータに変換して返す(1 層用). \end{DoxyCompactList}\item 
subroutine, public \mbox{\hyperlink{namespacew__module__deriv_a4ae2b14017f1185e0ad0b37652fa2532}{w\+\_\+deriv\+\_\+finalize}}
\begin{DoxyCompactList}\small\item\em モジュールの終了処理(割り付け配列の解放)をおこなう. \end{DoxyCompactList}\end{DoxyCompactItemize}
\doxysubsection*{Variables}
\begin{DoxyCompactItemize}
\item 
real(dp), dimension(\+:,\+:), allocatable, save, public \mbox{\hyperlink{namespacew__module__deriv_aa475b204ff39d1a9d988d1893de349fd}{rn}}
\begin{DoxyCompactList}\small\item\em ラプラシアン演算用配列(後方互換性のため) \end{DoxyCompactList}\item 
real(dp), dimension(\+:), allocatable, save \mbox{\hyperlink{namespacew__module__deriv_aea8ba234f16c8969a5da560bc0e3e144}{d}}
\begin{DoxyCompactList}\small\item\em ラプラシアン演算用配列 \end{DoxyCompactList}\item 
logical \mbox{\hyperlink{namespacew__module__deriv_a80e4a41002a04bcce70c8e7c7ddb3420}{w\+\_\+deriv\+\_\+initialize}} =.false.
\begin{DoxyCompactList}\small\item\em 初期化フラグ \end{DoxyCompactList}\end{DoxyCompactItemize}


\doxysubsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{namespacew__module__deriv_a4ae2b14017f1185e0ad0b37652fa2532}\label{namespacew__module__deriv_a4ae2b14017f1185e0ad0b37652fa2532}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_deriv\_finalize@{w\_deriv\_finalize}}
\index{w\_deriv\_finalize@{w\_deriv\_finalize}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_deriv\_finalize()}{w\_deriv\_finalize()}}
{\footnotesize\ttfamily subroutine, public w\+\_\+module\+\_\+deriv\+::w\+\_\+deriv\+\_\+finalize (\begin{DoxyParamCaption}{ }\end{DoxyParamCaption})}



モジュールの終了処理(割り付け配列の解放)をおこなう. 

\begin{DoxyWarning}{Warning}
このサブルーチンを単独で用いるのでなく, 上位サブルーチン \mbox{\hyperlink{namespacew__module_a8fa63b83c6aee6f23c4560de239475e6}{w\+\_\+\+Finalize}} を使用すること. 
\end{DoxyWarning}


Definition at line 303 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{303 }
\DoxyCodeLine{304     \textcolor{keywordflow}{if} ( .not. w\_deriv\_initialize ) \textcolor{keywordflow}{then}}
\DoxyCodeLine{305       \textcolor{keyword}{call }messagenotify(\textcolor{stringliteral}{'W'},\textcolor{stringliteral}{'w\_deriv\_Finalize'},\&}
\DoxyCodeLine{306         \textcolor{stringliteral}{'w\_module\_deriv not initialized yet'})}
\DoxyCodeLine{307       \textcolor{keywordflow}{return}}
\DoxyCodeLine{308 \textcolor{keywordflow}{    endif}}
\DoxyCodeLine{309 }
\DoxyCodeLine{310     \textcolor{keyword}{deallocate}(d)           \textcolor{comment}{! ラプラシアン演算用配列}}
\DoxyCodeLine{311     \textcolor{keyword}{deallocate}(rn)          \textcolor{comment}{! ラプラシアン演算用配列}}
\DoxyCodeLine{312 }
\DoxyCodeLine{313     w\_deriv\_initialize = .false.}
\DoxyCodeLine{314 }
\DoxyCodeLine{315     \textcolor{keyword}{call }messagenotify(\textcolor{stringliteral}{'M'},\textcolor{stringliteral}{'w\_deriv\_finalize'},\&}
\DoxyCodeLine{316       \textcolor{stringliteral}{'w\_module\_deriv (2019/10/04) is finalized'})}
\DoxyCodeLine{317 }

\end{DoxyCode}


References d, rn, and w\+\_\+deriv\+\_\+initialize.



Referenced by w\+\_\+module\+::w\+\_\+finalize().

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_a4ae2b14017f1185e0ad0b37652fa2532_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_adc13d210b7a9740e5a19f115ef208441}\label{namespacew__module__deriv_adc13d210b7a9740e5a19f115ef208441}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_deriv\_initial@{w\_deriv\_initial}}
\index{w\_deriv\_initial@{w\_deriv\_initial}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_deriv\_initial()}{w\_deriv\_initial()}}
{\footnotesize\ttfamily subroutine, public w\+\_\+module\+\_\+deriv\+::w\+\_\+deriv\+\_\+initial (\begin{DoxyParamCaption}{ }\end{DoxyParamCaption})}



スペクトル微分計算に必要となる作業領域を設定する. 

他の関数を呼ぶ前に, 最初にこのサブルーチンを呼んで 初期設定をしなければならない.

\begin{DoxyWarning}{Warning}
このサブルーチンを単独で用いるのでなく, 上位サブルーチン \mbox{\hyperlink{namespacew__module_a34cf65ed64bfeec316d31e8764e8ffc0}{w\+\_\+\+Initial}} を使用すること. 
\end{DoxyWarning}


Definition at line 79 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{79     \textcolor{keyword}{allocate}(d((nn+1)*(nn+1)*2))}
\DoxyCodeLine{80     \textcolor{keyword}{allocate}(rn((nn+1)*(nn+1),2))}
\DoxyCodeLine{81 }
\DoxyCodeLine{82     \textcolor{keyword}{call }sxinid(mm,nn,d)}
\DoxyCodeLine{83 }
\DoxyCodeLine{84     rn = reshape(d,(/(nn+1)**2,2\_8/))}
\DoxyCodeLine{85 }
\DoxyCodeLine{86     w\_deriv\_initialize=.true.}
\DoxyCodeLine{87 }
\DoxyCodeLine{88     \textcolor{keyword}{call }messagenotify(\textcolor{stringliteral}{'M'},\textcolor{stringliteral}{'w\_deriv\_initial'},\&}
\DoxyCodeLine{89       \textcolor{stringliteral}{'w\_module\_deriv (2019/03/16) is initialized'})}
\DoxyCodeLine{90 }

\end{DoxyCode}


References d, w\+\_\+module\+\_\+base\+::mm, w\+\_\+module\+\_\+base\+::nn, rn, and w\+\_\+deriv\+\_\+initialize.



Referenced by w\+\_\+module\+::w\+\_\+initial().

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_adc13d210b7a9740e5a19f115ef208441_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a4ac727e6389247d61f99e5358aebf069}\label{namespacew__module__deriv_a4ac727e6389247d61f99e5358aebf069}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_div\_xy\_xy@{w\_div\_xy\_xy}}
\index{w\_div\_xy\_xy@{w\_div\_xy\_xy}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_div\_xy\_xy()}{w\_div\_xy\_xy()}}
{\footnotesize\ttfamily real(dp) function, dimension((nn+1)$\ast$(nn+1)), public w\+\_\+module\+\_\+deriv\+::w\+\_\+div\+\_\+xy\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+u,  }\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+v }\end{DoxyParamCaption})}



2 つの入力格子点データをベクトル成分とする発散を計算し, スペクトルデータとして返す(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em xy\+\_\+u} & ベクトル経度成分の格子点データ \\
\hline
\mbox{\texttt{ in}}  & {\em xy\+\_\+v} & ベクトル緯度成分の格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
2 つの入力格子点データをベクトル成分とする発散のスペクトルデータ 
\end{DoxyReturn}


Definition at line 202 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{202 }
\DoxyCodeLine{203 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: xy\_u(0:im-\/1,1:jm)}
\DoxyCodeLine{205 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: xy\_v(0:im-\/1,1:jm)}
\DoxyCodeLine{207 \textcolor{keywordtype}{    real}(DP)              :: w\_Div\_xy\_xy((nn+1)*(nn+1))}
\DoxyCodeLine{208 }
\DoxyCodeLine{209     w\_div\_xy\_xy = w\_divlon\_xy(xy\_u) + w\_divlat\_xy(xy\_v)}
\DoxyCodeLine{210 }

\end{DoxyCode}


References w\+\_\+divlat\+\_\+xy(), and w\+\_\+divlon\+\_\+xy().

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_a4ac727e6389247d61f99e5358aebf069_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a6dc1edaff2ff00ce89f907370a0b0292}\label{namespacew__module__deriv_a6dc1edaff2ff00ce89f907370a0b0292}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_divlambda\_xy@{w\_divlambda\_xy}}
\index{w\_divlambda\_xy@{w\_divlambda\_xy}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_divlambda\_xy()}{w\_divlambda\_xy()}}
{\footnotesize\ttfamily real(dp) function, dimension((nn+1)$\ast$(nn+1)), public w\+\_\+module\+\_\+deriv\+::w\+\_\+divlambda\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



格子点データに発散型経度微分 $1/(1-μ^2)・∂/∂λ, \, (μ=\sinφ)$ を作用させてスペクトルデータに変換して返す(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em xy\+\_\+data} & 入力格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
格子点データを発散型経度微分したスペクトルデータ 
\end{DoxyReturn}


Definition at line 270 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{270 }
\DoxyCodeLine{271 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: xy\_data(0:im-\/1,1:jm)}
\DoxyCodeLine{273 \textcolor{keywordtype}{    real}(DP)              :: w\_DivLambda\_xy((nn+1)*(nn+1))}
\DoxyCodeLine{274 }
\DoxyCodeLine{275     w\_divlambda\_xy = w\_xy(xy\_data,ipow=2,iflag=-\/1)}
\DoxyCodeLine{276 }

\end{DoxyCode}


References w\+\_\+module\+\_\+base\+::w\+\_\+xy().

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_a6dc1edaff2ff00ce89f907370a0b0292_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_ab13eefdf5b81060ce83e3065b1fea953}\label{namespacew__module__deriv_ab13eefdf5b81060ce83e3065b1fea953}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_divlat\_xy@{w\_divlat\_xy}}
\index{w\_divlat\_xy@{w\_divlat\_xy}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_divlat\_xy()}{w\_divlat\_xy()}}
{\footnotesize\ttfamily real(dp) function, dimension((nn+1)$\ast$(nn+1)), public w\+\_\+module\+\_\+deriv\+::w\+\_\+divlat\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



格子点データに発散型緯度微分 $1/\cosφ・∂(f \cosφ)/∂φ$ を作用させてスペクトルデータに変換して返す(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em xy\+\_\+data} & 入力格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
格子点データを発散型緯度微分したスペクトルデータ 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{188 }
\DoxyCodeLine{189 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: xy\_data(0:im-\/1,1:jm)}
\DoxyCodeLine{191 \textcolor{keywordtype}{    real}(DP)              :: w\_DivLat\_xy((nn+1)*(nn+1))}
\DoxyCodeLine{192 }
\DoxyCodeLine{193     w\_divlat\_xy = w\_xy(xy\_data,ipow=1,iflag=1)}
\DoxyCodeLine{194 }

\end{DoxyCode}


References w\+\_\+module\+\_\+base\+::w\+\_\+xy().



Referenced by w\+\_\+div\+\_\+xy\+\_\+xy().

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_ab13eefdf5b81060ce83e3065b1fea953_cgraph}
\end{center}
\end{figure}
Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_ab13eefdf5b81060ce83e3065b1fea953_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a4ad86b3db507fb0bff454e007e515ba0}\label{namespacew__module__deriv_a4ad86b3db507fb0bff454e007e515ba0}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_divlon\_xy@{w\_divlon\_xy}}
\index{w\_divlon\_xy@{w\_divlon\_xy}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_divlon\_xy()}{w\_divlon\_xy()}}
{\footnotesize\ttfamily real(dp) function, dimension((nn+1)$\ast$(nn+1)), public w\+\_\+module\+\_\+deriv\+::w\+\_\+divlon\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



格子点データに発散型経度微分 $1/\cosφ・∂/∂λ$ を作用させて スペクトルデータに変換して返す(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em xy\+\_\+data} & 入力格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
格子点データを発散型経度微分したスペクトルデータ 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{174 }
\DoxyCodeLine{175 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: xy\_data(0:im-\/1,1:jm)}
\DoxyCodeLine{177 \textcolor{keywordtype}{    real}(DP)              :: w\_DivLon\_xy((nn+1)*(nn+1))}
\DoxyCodeLine{178 }
\DoxyCodeLine{179     w\_divlon\_xy = w\_xy(xy\_data,ipow=1,iflag=-\/1)}
\DoxyCodeLine{180 }

\end{DoxyCode}


References w\+\_\+module\+\_\+base\+::w\+\_\+xy().



Referenced by w\+\_\+div\+\_\+xy\+\_\+xy().

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_a4ad86b3db507fb0bff454e007e515ba0_cgraph}
\end{center}
\end{figure}
Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_a4ad86b3db507fb0bff454e007e515ba0_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a984edeb7ba46736df32910567e30ed8e}\label{namespacew__module__deriv_a984edeb7ba46736df32910567e30ed8e}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_divmu\_xy@{w\_divmu\_xy}}
\index{w\_divmu\_xy@{w\_divmu\_xy}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_divmu\_xy()}{w\_divmu\_xy()}}
{\footnotesize\ttfamily real(dp) function, dimension((nn+1)$\ast$(nn+1)), public w\+\_\+module\+\_\+deriv\+::w\+\_\+divmu\+\_\+xy (\begin{DoxyParamCaption}\item[{real(dp), dimension(0\+:im-\/1,1\+:jm), intent(in)}]{xy\+\_\+data }\end{DoxyParamCaption})}



格子点データに発散型緯度微分 $∂/∂μ, \, (μ=\sinφ)$ を作用させてスペクトルデータに変換して返す(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em xy\+\_\+data} & 入力格子点データ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
格子点データを発散型緯度微分したスペクトルデータ 
\end{DoxyReturn}


Definition at line 285 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{285 }
\DoxyCodeLine{286 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: xy\_data(0:im-\/1,1:jm)}
\DoxyCodeLine{288 \textcolor{keywordtype}{    real}(DP)              :: w\_DivMu\_xy((nn+1)*(nn+1))}
\DoxyCodeLine{289 }
\DoxyCodeLine{290     w\_divmu\_xy = w\_xy(xy\_data,ipow=2,iflag=1)}
\DoxyCodeLine{291 }

\end{DoxyCode}


References w\+\_\+module\+\_\+base\+::w\+\_\+xy().

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_a984edeb7ba46736df32910567e30ed8e_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a1676aabd52064c64b765e84b140b8a82}\label{namespacew__module__deriv_a1676aabd52064c64b765e84b140b8a82}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_dlon\_w@{w\_dlon\_w}}
\index{w\_dlon\_w@{w\_dlon\_w}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_dlon\_w()}{w\_dlon\_w()}}
{\footnotesize\ttfamily real(dp) function, dimension((nn+1)$\ast$(nn+1)), public w\+\_\+module\+\_\+deriv\+::w\+\_\+dlon\+\_\+w (\begin{DoxyParamCaption}\item[{real(dp), dimension((nn+1)$\ast$(nn+1)), intent(in)}]{w\+\_\+data }\end{DoxyParamCaption})}



スペクトルデータに経度微分 $∂/∂λ$ を作用させる(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em w\+\_\+data} & 入力スペクトルデータ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
スペクトルデータの経度微分 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{132 }
\DoxyCodeLine{133 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: w\_data((nn+1)*(nn+1))}
\DoxyCodeLine{135 \textcolor{keywordtype}{    real}(DP)              :: w\_DLon\_w((nn+1)*(nn+1))}
\DoxyCodeLine{136 }
\DoxyCodeLine{137     \textcolor{keyword}{call }sxcs2x(mm,nn,w\_data,w\_dlon\_w)}
\DoxyCodeLine{138 }

\end{DoxyCode}


References w\+\_\+module\+\_\+base\+::mm, and w\+\_\+module\+\_\+base\+::nn.



Referenced by w\+\_\+jacobian\+\_\+w\+\_\+w().

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_a1676aabd52064c64b765e84b140b8a82_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a7a61436e763799d6fb0b980e84e1b232}\label{namespacew__module__deriv_a7a61436e763799d6fb0b980e84e1b232}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_jacobian\_w\_w@{w\_jacobian\_w\_w}}
\index{w\_jacobian\_w\_w@{w\_jacobian\_w\_w}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_jacobian\_w\_w()}{w\_jacobian\_w\_w()}}
{\footnotesize\ttfamily real(dp) function, dimension((nn+1)$\ast$(nn+1)), public w\+\_\+module\+\_\+deriv\+::w\+\_\+jacobian\+\_\+w\+\_\+w (\begin{DoxyParamCaption}\item[{real(dp), dimension((nn+1)$\ast$(nn+1)), intent(in)}]{w\+\_\+a,  }\item[{real(dp), dimension((nn+1)$\ast$(nn+1)), intent(in)}]{w\+\_\+b }\end{DoxyParamCaption})}



2 つのスペクトルデータにヤコビアン 

\begin{align*} J(f,g) & = ∂f/∂λ・∂g/∂μ - ∂g/∂λ・∂f/∂μ \\ & = ∂f/∂λ・1/\cos φ・∂g/∂φ - ∂g/∂λ・1/\cos φ・∂f/∂φ \end{align*} を作用させる(1 層用). 
\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em w\+\_\+a} & 1つ目の入力スペクトルデータ \\
\hline
\mbox{\texttt{ in}}  & {\em w\+\_\+b} & 2つ目の入力スペクトルデータ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
2 つのスペクトルデータのヤコビアン 
\end{DoxyReturn}


Definition at line 223 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{223 }
\DoxyCodeLine{224 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)} :: w\_a((nn+1)*(nn+1))}
\DoxyCodeLine{226 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)} :: w\_b((nn+1)*(nn+1))}
\DoxyCodeLine{228 \textcolor{keywordtype}{    real}(DP)             :: w\_Jacobian\_w\_w((nn+1)*(nn+1))}
\DoxyCodeLine{229 }
\DoxyCodeLine{230     w\_jacobian\_w\_w =                                          \&}
\DoxyCodeLine{231       \& w\_xy(  xy\_w(w\_dlon\_w(w\_a))*xy\_w(w\_b,ipow=2,iflag=1)   \&}
\DoxyCodeLine{232       \&      -\/ xy\_w(w\_dlon\_w(w\_b))*xy\_w(w\_a,ipow=2,iflag=1) )}
\DoxyCodeLine{233 }

\end{DoxyCode}


References w\+\_\+dlon\+\_\+w(), w\+\_\+module\+\_\+base\+::w\+\_\+xy(), and w\+\_\+module\+\_\+base\+::xy\+\_\+w().

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacew__module__deriv_a7a61436e763799d6fb0b980e84e1b232_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a0bf8cc78dc8dde2691985c05044d9c4b}\label{namespacew__module__deriv_a0bf8cc78dc8dde2691985c05044d9c4b}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_lapla\_w@{w\_lapla\_w}}
\index{w\_lapla\_w@{w\_lapla\_w}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_lapla\_w()}{w\_lapla\_w()}}
{\footnotesize\ttfamily real(dp) function, dimension((nn+1)$\ast$(nn+1)), public w\+\_\+module\+\_\+deriv\+::w\+\_\+lapla\+\_\+w (\begin{DoxyParamCaption}\item[{real(dp), dimension((nn+1)$\ast$(nn+1)), intent(in)}]{w\+\_\+data }\end{DoxyParamCaption})}



入力スペクトルデータにラプラシアン 

\begin{align*} ▽^2 = 1/\cos^2φ・∂^2/∂λ^2 + 1/\cosφ・∂/∂φ(\cosφ∂/∂φ) \end{align*} を作用する(1 層用). 
\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em w\+\_\+data} & 入力スペクトルデータ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
入力スペクトルデータのラプラシアン 
\end{DoxyReturn}


Definition at line 101 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{101 }
\DoxyCodeLine{102 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: w\_data((nn+1)*(nn+1))}
\DoxyCodeLine{104 \textcolor{keywordtype}{    real}(DP)              :: w\_Lapla\_w((nn+1)*(nn+1))}
\DoxyCodeLine{105 }
\DoxyCodeLine{106     \textcolor{keyword}{call }sxclap(mm,nn,w\_data,w\_lapla\_w,d,1\_8)}
\DoxyCodeLine{107 }

\end{DoxyCode}


References d, w\+\_\+module\+\_\+base\+::mm, and w\+\_\+module\+\_\+base\+::nn.

\mbox{\Hypertarget{namespacew__module__deriv_aa247a4a281588e92be2ec6a11da04a5b}\label{namespacew__module__deriv_aa247a4a281588e92be2ec6a11da04a5b}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_laplainv\_w@{w\_laplainv\_w}}
\index{w\_laplainv\_w@{w\_laplainv\_w}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_laplainv\_w()}{w\_laplainv\_w()}}
{\footnotesize\ttfamily real(dp) function, dimension((nn+1)$\ast$(nn+1)), public w\+\_\+module\+\_\+deriv\+::w\+\_\+laplainv\+\_\+w (\begin{DoxyParamCaption}\item[{real(dp), dimension((nn+1)$\ast$(nn+1)), intent(in)}]{w\+\_\+data }\end{DoxyParamCaption})}



入力スペクトルデータに逆ラプラシアン 

\begin{align*} ▽^{-2} =[1/\cos^2φ・∂^2/∂λ^2 + 1/\cosφ・∂/∂φ(\cosφ∂/∂φ)]^{-1} \end{align*} を作用する(1 層用). 
\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em w\+\_\+data} & 入力スペクトルデータ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
スペクトルデータの逆ラプラシアン 
\end{DoxyReturn}


Definition at line 119 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{119 }
\DoxyCodeLine{120 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: w\_data((nn+1)*(nn+1))}
\DoxyCodeLine{122 \textcolor{keywordtype}{    real}(DP)              :: w\_LaplaInv\_w((nn+1)*(nn+1))}
\DoxyCodeLine{123 }
\DoxyCodeLine{124     \textcolor{keyword}{call }sxclap(mm,nn,w\_data,w\_laplainv\_w,d,2\_8)}
\DoxyCodeLine{125 }

\end{DoxyCode}


References d, w\+\_\+module\+\_\+base\+::mm, and w\+\_\+module\+\_\+base\+::nn.

\mbox{\Hypertarget{namespacew__module__deriv_aafdccb5625e83fc74e07f28c29c663ae}\label{namespacew__module__deriv_aafdccb5625e83fc74e07f28c29c663ae}} 
\index{w\_module\_deriv@{w\_module\_deriv}!xy\_gradlambda\_w@{xy\_gradlambda\_w}}
\index{xy\_gradlambda\_w@{xy\_gradlambda\_w}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{xy\_gradlambda\_w()}{xy\_gradlambda\_w()}}
{\footnotesize\ttfamily real(dp) function, dimension(0\+:im-\/1,1\+:jm), public w\+\_\+module\+\_\+deriv\+::xy\+\_\+gradlambda\+\_\+w (\begin{DoxyParamCaption}\item[{real(dp), dimension((nn+1)$\ast$(nn+1)), intent(in)}]{w\+\_\+data }\end{DoxyParamCaption})}



スペクトルデータに勾配型経度微分 ∂/∂λ を作用する(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em w\+\_\+data} & 入力スペクトルデータ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
スペクトルデータを勾配型経度微分した格子点データ 
\end{DoxyReturn}


Definition at line 240 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{240 }
\DoxyCodeLine{241 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: w\_data((nn+1)*(nn+1))}
\DoxyCodeLine{243 \textcolor{keywordtype}{    real}(DP)              :: xy\_GradLambda\_w(0:im-\/1,1:jm)}
\DoxyCodeLine{244 }
\DoxyCodeLine{245     xy\_gradlambda\_w = xy\_w(w\_data,ipow=0,iflag=-\/1)}
\DoxyCodeLine{246 }

\end{DoxyCode}


References w\+\_\+module\+\_\+base\+::xy\+\_\+w().

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=336pt]{namespacew__module__deriv_aafdccb5625e83fc74e07f28c29c663ae_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a79fbe256e0d5145fc01ca38435860741}\label{namespacew__module__deriv_a79fbe256e0d5145fc01ca38435860741}} 
\index{w\_module\_deriv@{w\_module\_deriv}!xy\_gradlat\_w@{xy\_gradlat\_w}}
\index{xy\_gradlat\_w@{xy\_gradlat\_w}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{xy\_gradlat\_w()}{xy\_gradlat\_w()}}
{\footnotesize\ttfamily real(dp) function, dimension(0\+:im-\/1,1\+:jm), public w\+\_\+module\+\_\+deriv\+::xy\+\_\+gradlat\+\_\+w (\begin{DoxyParamCaption}\item[{real(dp), dimension((nn+1)$\ast$(nn+1)), intent(in)}]{w\+\_\+data }\end{DoxyParamCaption})}



スペクトルデータに勾配型緯度微分 $∂/∂φ$ を作用させて 格子点データに変換して返す(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em w\+\_\+data} & 入力スペクトルデータ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
スペクトルデータを勾配型緯度微分した格子点データ 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{160 }
\DoxyCodeLine{161 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: w\_data((nn+1)*(nn+1))}
\DoxyCodeLine{163 \textcolor{keywordtype}{    real}(DP)              :: xy\_GradLat\_w(0:im-\/1,1:jm)}
\DoxyCodeLine{164 }
\DoxyCodeLine{165     xy\_gradlat\_w = xy\_w(w\_data,ipow=1,iflag=1)}
\DoxyCodeLine{166 }

\end{DoxyCode}


References w\+\_\+module\+\_\+base\+::xy\+\_\+w().

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=336pt]{namespacew__module__deriv_a79fbe256e0d5145fc01ca38435860741_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a88efad865d2eb89d3a069ac9c45b3f9b}\label{namespacew__module__deriv_a88efad865d2eb89d3a069ac9c45b3f9b}} 
\index{w\_module\_deriv@{w\_module\_deriv}!xy\_gradlon\_w@{xy\_gradlon\_w}}
\index{xy\_gradlon\_w@{xy\_gradlon\_w}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{xy\_gradlon\_w()}{xy\_gradlon\_w()}}
{\footnotesize\ttfamily real(dp) function, dimension(0\+:im-\/1,1\+:jm), public w\+\_\+module\+\_\+deriv\+::xy\+\_\+gradlon\+\_\+w (\begin{DoxyParamCaption}\item[{real(dp), dimension((nn+1)$\ast$(nn+1)), intent(in)}]{w\+\_\+data }\end{DoxyParamCaption})}



スペクトルデータに勾配型経度微分 $1/\cosφ・∂/∂λ$ を 作用させた格子点データを返す(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em w\+\_\+data} & 入力スペクトルデータ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
スペクトルデータを勾配型経度微分した格子点データ 
\end{DoxyReturn}


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


\begin{DoxyCode}{0}
\DoxyCodeLine{146 }
\DoxyCodeLine{147 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: w\_data((nn+1)*(nn+1))}
\DoxyCodeLine{149 \textcolor{keywordtype}{    real}(DP)              :: xy\_GradLon\_w(0:im-\/1,1:jm)}
\DoxyCodeLine{150 }
\DoxyCodeLine{151     xy\_gradlon\_w = xy\_w(w\_data,ipow=1,iflag=-\/1)}
\DoxyCodeLine{152 }

\end{DoxyCode}


References w\+\_\+module\+\_\+base\+::xy\+\_\+w().

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=336pt]{namespacew__module__deriv_a88efad865d2eb89d3a069ac9c45b3f9b_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacew__module__deriv_a602369ddd0f5e6b89163ac558e0d71b1}\label{namespacew__module__deriv_a602369ddd0f5e6b89163ac558e0d71b1}} 
\index{w\_module\_deriv@{w\_module\_deriv}!xy\_gradmu\_w@{xy\_gradmu\_w}}
\index{xy\_gradmu\_w@{xy\_gradmu\_w}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{xy\_gradmu\_w()}{xy\_gradmu\_w()}}
{\footnotesize\ttfamily real(dp) function, dimension(0\+:im-\/1,1\+:jm), public w\+\_\+module\+\_\+deriv\+::xy\+\_\+gradmu\+\_\+w (\begin{DoxyParamCaption}\item[{real(dp), dimension((nn+1)$\ast$(nn+1)), intent(in)}]{w\+\_\+data }\end{DoxyParamCaption})}



スペクトルデータに勾配型緯度微分 $(1-μ^2)∂/∂μ ,\, (μ=\sinφ)$ を作用させて格子点データに変換して返す(1 層用). 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em w\+\_\+data} & 入力スペクトルデータ \\
\hline
\end{DoxyParams}
\begin{DoxyReturn}{Returns}
スペクトルデータを勾配型緯度微分した格子点データ 
\end{DoxyReturn}


Definition at line 255 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{255 }
\DoxyCodeLine{256 \textcolor{keywordtype}{    real}(DP), \textcolor{keywordtype}{intent(in)}  :: w\_data((nn+1)*(nn+1))}
\DoxyCodeLine{258 \textcolor{keywordtype}{    real}(DP)              :: xy\_GradMu\_w(0:im-\/1,1:jm)}
\DoxyCodeLine{259 }
\DoxyCodeLine{260     xy\_gradmu\_w = xy\_w(w\_data,ipow=0,iflag=1)}
\DoxyCodeLine{261 }

\end{DoxyCode}


References w\+\_\+module\+\_\+base\+::xy\+\_\+w().

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


\doxysubsection{Variable Documentation}
\mbox{\Hypertarget{namespacew__module__deriv_aea8ba234f16c8969a5da560bc0e3e144}\label{namespacew__module__deriv_aea8ba234f16c8969a5da560bc0e3e144}} 
\index{w\_module\_deriv@{w\_module\_deriv}!d@{d}}
\index{d@{d}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{d}{d}}
{\footnotesize\ttfamily real(dp), dimension(\+:), allocatable, save w\+\_\+module\+\_\+deriv\+::d\hspace{0.3cm}{\ttfamily [private]}}



ラプラシアン演算用配列 


\begin{DoxyItemize}
\item スペクトルデータのラプラシアンを計算するための係数 配列のサイズは((mm+1)$\ast$(mm+1)$\ast$2) 
\end{DoxyItemize}

Definition at line 58 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{58 \textcolor{keywordtype}{  real}(DP), \textcolor{keywordtype}{allocatable}  :: D(:)}

\end{DoxyCode}


Referenced by w\+\_\+deriv\+\_\+finalize(), w\+\_\+deriv\+\_\+initial(), w\+\_\+lapla\+\_\+w(), and w\+\_\+laplainv\+\_\+w().

\mbox{\Hypertarget{namespacew__module__deriv_aa475b204ff39d1a9d988d1893de349fd}\label{namespacew__module__deriv_aa475b204ff39d1a9d988d1893de349fd}} 
\index{w\_module\_deriv@{w\_module\_deriv}!rn@{rn}}
\index{rn@{rn}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{rn}{rn}}
{\footnotesize\ttfamily real(dp), dimension(\+:,\+:), allocatable, save, public w\+\_\+module\+\_\+deriv\+::rn}



ラプラシアン演算用配列(後方互換性のため) 


\begin{DoxyItemize}
\item スペクトルデータのラプラシアンを計算するための係数 配列のサイズは((nn+1)$\ast$(nn+1), 2)
\item r(\+L,1) には L 番目の格納位置のスペクトルに対するラプラシアン計算の 係数 -\/n(n+1) の値が格納されている. 
\end{DoxyItemize}

Definition at line 50 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{50 \textcolor{keywordtype}{  real}(DP), \textcolor{keywordtype}{allocatable}  :: rn(:,:)}

\end{DoxyCode}


Referenced by w\+\_\+deriv\+\_\+finalize(), and w\+\_\+deriv\+\_\+initial().

\mbox{\Hypertarget{namespacew__module__deriv_a80e4a41002a04bcce70c8e7c7ddb3420}\label{namespacew__module__deriv_a80e4a41002a04bcce70c8e7c7ddb3420}} 
\index{w\_module\_deriv@{w\_module\_deriv}!w\_deriv\_initialize@{w\_deriv\_initialize}}
\index{w\_deriv\_initialize@{w\_deriv\_initialize}!w\_module\_deriv@{w\_module\_deriv}}
\doxysubsubsection{\texorpdfstring{w\_deriv\_initialize}{w\_deriv\_initialize}}
{\footnotesize\ttfamily logical w\+\_\+module\+\_\+deriv\+::w\+\_\+deriv\+\_\+initialize =.false.\hspace{0.3cm}{\ttfamily [private]}}



初期化フラグ 



Definition at line 61 of file w\+\_\+module\+\_\+deriv.\+f90.


\begin{DoxyCode}{0}
\DoxyCodeLine{61   \textcolor{keywordtype}{logical}               :: w\_deriv\_initialize=.false.}

\end{DoxyCode}


Referenced by w\+\_\+deriv\+\_\+finalize(), and w\+\_\+deriv\+\_\+initial().

