\hypertarget{wa__module__base_8f90}{}\section{wa\+\_\+module/wa\+\_\+module\+\_\+base.f90 File Reference}
\label{wa__module__base_8f90}\index{wa\+\_\+module/wa\+\_\+module\+\_\+base.\+f90@{wa\+\_\+module/wa\+\_\+module\+\_\+base.\+f90}}
\subsection*{Modules}
\begin{DoxyCompactItemize}
\item 
module \hyperlink{namespacewa__module__base}{wa\+\_\+module\+\_\+base}
\begin{DoxyCompactList}\small\item\em \hyperlink{namespacewa__module}{wa\+\_\+module} の下部モジュール\+: 基本変換 \end{DoxyCompactList}\end{DoxyCompactItemize}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine, public \hyperlink{namespacewa__module__base_ad6b9fa987cdb280f839a7ec1e80665a3}{wa\+\_\+module\+\_\+base\+::wa\+\_\+base\+\_\+initial} (k\+\_\+in)
\begin{DoxyCompactList}\small\item\em S\+N\+P\+A\+CK 用 wa\+\_\+base\+\_\+initial の互換のためのダミーサブルーチン \end{DoxyCompactList}\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jm, size(wa\+\_\+data, 2)), public \hyperlink{namespacewa__module__base_aa9be1c08f985cd84ed96076d55acce07}{wa\+\_\+module\+\_\+base\+::xya\+\_\+wa} (wa\+\_\+data, ipow, iflag)
\begin{DoxyCompactList}\small\item\em 球面調和関数スペクトル -\/$>$ 格子点\+: スペクトルデータから格子点へと逆変換する(多層用) \end{DoxyCompactList}\item 
real(dp) function, dimension((nm+1) $\ast$(nm+1), size(xya\+\_\+data, 3)), public \hyperlink{namespacewa__module__base_a80c96fda91fa12bb5ffc356d73ceb161}{wa\+\_\+module\+\_\+base\+::wa\+\_\+xya} (xya\+\_\+data, ipow, iflag)
\begin{DoxyCompactList}\small\item\em 格子点 -\/$>$ 球面調和関数スペクトル\+: 格子データからスペクトルデータへ(正)変換する(多層用). \end{DoxyCompactList}\item 
subroutine, public \hyperlink{namespacewa__module__base_aec8c477c419e359b50ec4e78718a96ee}{wa\+\_\+module\+\_\+base\+::wa\+\_\+streampotential2vector} (wa\+\_\+\+Psi, wa\+\_\+\+Chi, xya\+\_\+U, xya\+\_\+V)
\begin{DoxyCompactList}\small\item\em 流線・ポテンシャル(スペクトルデータ)から速度場(格子データ)に (逆)変換する(多層用) \end{DoxyCompactList}\item 
subroutine, public \hyperlink{namespacewa__module__base_ac4326534876aad64918772a57adbf158}{wa\+\_\+module\+\_\+base\+::wa\+\_\+vector2vordiv} (xya\+\_\+U, xya\+\_\+V, wa\+\_\+\+Vor, wa\+\_\+\+Div)
\begin{DoxyCompactList}\small\item\em 速度場(格子データ)から渦度・発散(スペクトルデータ)に (正)変換する(多層用) \end{DoxyCompactList}\item 
subroutine, public \hyperlink{namespacewa__module__base_a66e798da3f249687f9322b5b7748182a}{wa\+\_\+module\+\_\+base\+::wa\+\_\+vectorcoslat2vordiv} (xya\+\_\+\+U\+Cos\+Lat, xya\+\_\+\+V\+Cos\+Lat, wa\+\_\+\+Vor, wa\+\_\+\+Div)
\begin{DoxyCompactList}\small\item\em 速度場(格子データ)から渦度・発散(スペクトルデータ)に (正)変換する(多層用) \end{DoxyCompactList}\item 
subroutine, public \hyperlink{namespacewa__module__base_af6a7fde17ecc0c958b54f157c703e500}{wa\+\_\+module\+\_\+base\+::wa\+\_\+base\+\_\+finalize}
\begin{DoxyCompactList}\small\item\em 後方互換性のためのダミールーチン. 上位サブルーチン wa\+\_\+\+Finalize を使用すること. \end{DoxyCompactList}\end{DoxyCompactItemize}
\subsection*{Variables}
\begin{DoxyCompactItemize}
\item 
integer(8), save, public \hyperlink{namespacewa__module__base_ae4a1d47ec6a131516579c124c05df9bd}{wa\+\_\+module\+\_\+base\+::km} =16
\begin{DoxyCompactList}\small\item\em 同時に処理する最大データ数(層の数)\+: S\+N\+P\+A\+CK 用ルーチンとの互換性のため. \end{DoxyCompactList}\end{DoxyCompactItemize}
