\hypertarget{w__mpi__module__base_8f90}{}\section{w\+\_\+mpi\+\_\+module/w\+\_\+mpi\+\_\+module\+\_\+base.f90 File Reference}
\label{w__mpi__module__base_8f90}\index{w\+\_\+mpi\+\_\+module/w\+\_\+mpi\+\_\+module\+\_\+base.\+f90@{w\+\_\+mpi\+\_\+module/w\+\_\+mpi\+\_\+module\+\_\+base.\+f90}}
\subsection*{Modules}
\begin{DoxyCompactItemize}
\item 
module \hyperlink{namespacew__mpi__module__base}{w\+\_\+mpi\+\_\+module\+\_\+base}
\begin{DoxyCompactList}\small\item\em \hyperlink{namespacew__mpi__module}{w\+\_\+mpi\+\_\+module} の下部モジュール\+: 基本変換 \end{DoxyCompactList}\end{DoxyCompactItemize}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine, public \hyperlink{namespacew__mpi__module__base_ac9f74ac01303fb3d69e551a7c455da47}{w\+\_\+mpi\+\_\+module\+\_\+base\+::w\+\_\+base\+\_\+mpi\+\_\+initial} (n\+\_\+in, i\+\_\+in, j\+\_\+in, mpi\+\_\+comm)
\begin{DoxyCompactList}\small\item\em スペクトル変換の格子点数, 波数および O\+P\+E\+N\+MP 使用時の 最大スレッド数を設定する. \end{DoxyCompactList}\item 
real(dp) function, dimension(0\+:im-\/1, 1\+:jl), public \hyperlink{namespacew__mpi__module__base_af3c71ab39dece6b5a1016ba418f8371b}{w\+\_\+mpi\+\_\+module\+\_\+base\+::xv\+\_\+w} (w\+\_\+data, ipow, iflag)
\begin{DoxyCompactList}\small\item\em スペクトルデータから格子データへ変換する(1 層用). \end{DoxyCompactList}\item 
real(dp) function, dimension(nc), public \hyperlink{namespacew__mpi__module__base_a8437d71392fa94854209b7898dc2dd99}{w\+\_\+mpi\+\_\+module\+\_\+base\+::w\+\_\+xv} (xv\+\_\+data, ipow, iflag)
\begin{DoxyCompactList}\small\item\em 格子データからスペクトルデータへ(正)変換する(1 層用). \end{DoxyCompactList}\item 
subroutine, public \hyperlink{namespacew__mpi__module__base_a004e891d275758b2e9a39b5d41672a53}{w\+\_\+mpi\+\_\+module\+\_\+base\+::w\+\_\+streampotential2vectormpi} (w\+\_\+\+Psi, w\+\_\+\+Chi, xv\+\_\+U, xv\+\_\+V)
\begin{DoxyCompactList}\small\item\em 流線・ポテンシャル(スペクトルデータ)から速度場(格子データ)に (逆)変換する(1 層用, M\+PI) \end{DoxyCompactList}\item 
subroutine, public \hyperlink{namespacew__mpi__module__base_a15326f414093545618c681f41166ac70}{w\+\_\+mpi\+\_\+module\+\_\+base\+::w\+\_\+vector2vordivmpi} (xv\+\_\+U, xv\+\_\+V, w\+\_\+\+Vor, w\+\_\+\+Div)
\begin{DoxyCompactList}\small\item\em 速度場(格子データ)から渦度・発散(スペクトルデータ)に (正)変換する(1 層用, M\+PI) \end{DoxyCompactList}\item 
subroutine, public \hyperlink{namespacew__mpi__module__base_a843761fce9a1f561f1e84a2ce7fc7456}{w\+\_\+mpi\+\_\+module\+\_\+base\+::w\+\_\+vectorcoslat2vordivmpi} (xv\+\_\+\+U\+Cos\+Lat, xv\+\_\+\+V\+Cos\+Lat, w\+\_\+\+Vor, w\+\_\+\+Div)
\begin{DoxyCompactList}\small\item\em 速度場(格子データ)から渦度・発散(スペクトルデータ)に (正)変換する(1 層用, M\+PI) \end{DoxyCompactList}\item 
real(dp) function, dimension(size(av, 1), jm), public \hyperlink{namespacew__mpi__module__base_ae63f80b24fdcb153f05ceb6b594a3020}{w\+\_\+mpi\+\_\+module\+\_\+base\+::ay\+\_\+av} (av)
\begin{DoxyCompactList}\small\item\em 分割緯度データを集める. \end{DoxyCompactList}\item 
real(dp) function, dimension(size(ay, 1), jl), public \hyperlink{namespacew__mpi__module__base_ab3571ec52a70bea40da26233894aeef3}{w\+\_\+mpi\+\_\+module\+\_\+base\+::av\+\_\+ay} (ay)
\begin{DoxyCompactList}\small\item\em 緯度データを分割する \end{DoxyCompactList}\item 
subroutine, public \hyperlink{namespacew__mpi__module__base_ad4e9b0478f28164ffbb806acb7955427}{w\+\_\+mpi\+\_\+module\+\_\+base\+::w\+\_\+base\+\_\+mpi\+\_\+finalize}
\begin{DoxyCompactList}\small\item\em モジュールの終了処理(割り付け配列の解放)をおこなう. \end{DoxyCompactList}\end{DoxyCompactItemize}
\subsection*{Variables}
\begin{DoxyCompactItemize}
\item 
integer(8), save, public \hyperlink{namespacew__mpi__module__base_aa750b5cf518a6c9d727222f8f48abfa7}{w\+\_\+mpi\+\_\+module\+\_\+base\+::im} =64
\begin{DoxyCompactList}\small\item\em 格子点の設定(東西) \end{DoxyCompactList}\item 
integer(8), save, public \hyperlink{namespacew__mpi__module__base_a2b229672ec02d54aa8720cd2296723f0}{w\+\_\+mpi\+\_\+module\+\_\+base\+::jm} =32
\begin{DoxyCompactList}\small\item\em 格子点の設定(南北) \end{DoxyCompactList}\item 
integer(8), save, public \hyperlink{namespacew__mpi__module__base_a8425e34ad804e0f42d95bf509cb17626}{w\+\_\+mpi\+\_\+module\+\_\+base\+::mm}
\begin{DoxyCompactList}\small\item\em 切断波数(東西波数)の設定 \end{DoxyCompactList}\item 
integer(8), save, public \hyperlink{namespacew__mpi__module__base_a306a78f85237328517087aae0cf2278a}{w\+\_\+mpi\+\_\+module\+\_\+base\+::nn}
\begin{DoxyCompactList}\small\item\em 切断波数(全波数)の設定 \end{DoxyCompactList}\item 
integer(8), save, public \hyperlink{namespacew__mpi__module__base_a2394d4ea48fd8016698745debaaf65eb}{w\+\_\+mpi\+\_\+module\+\_\+base\+::nm}
\begin{DoxyCompactList}\small\item\em 計算する最大の全波数の設定 \end{DoxyCompactList}\item 
real(dp), dimension(\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_a072b71533174027ae9d27c2f1ff0f2fb}{w\+\_\+mpi\+\_\+module\+\_\+base\+::x\+\_\+lon}
\begin{DoxyCompactList}\small\item\em 経度座標格子点 \end{DoxyCompactList}\item 
real(dp), dimension(\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_a6ba4addf173c21cc9324d9d1ca54053a}{w\+\_\+mpi\+\_\+module\+\_\+base\+::x\+\_\+lon\+\_\+weight}
\begin{DoxyCompactList}\small\item\em 経度座標格子点重み \end{DoxyCompactList}\item 
real(dp), dimension(\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_ad610bc790b82eefa025e56ce5323efeb}{w\+\_\+mpi\+\_\+module\+\_\+base\+::v\+\_\+lat}
\begin{DoxyCompactList}\small\item\em 緯度座標分散格子点 \end{DoxyCompactList}\item 
real(dp), dimension(\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_a4e11ba6f50fd2ab37e67507800b4ebb4}{w\+\_\+mpi\+\_\+module\+\_\+base\+::v\+\_\+lat\+\_\+weight}
\begin{DoxyCompactList}\small\item\em 緯度座標分散格子点重み \end{DoxyCompactList}\item 
real(dp), dimension(\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_a558a26a9e3991d3a1ee452a4558064ca}{w\+\_\+mpi\+\_\+module\+\_\+base\+::y\+\_\+lat}
\begin{DoxyCompactList}\small\item\em 緯度座標格子点 \end{DoxyCompactList}\item 
real(dp), dimension(\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_a4786b3235b0aca80489c1eee6f3d03de}{w\+\_\+mpi\+\_\+module\+\_\+base\+::y\+\_\+lat\+\_\+weight}
\begin{DoxyCompactList}\small\item\em 緯度座標格子点重み \end{DoxyCompactList}\item 
real(dp), dimension(\+:,\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_aae7c556f825b8898424456421c6b5564}{w\+\_\+mpi\+\_\+module\+\_\+base\+::xv\+\_\+lon}
\begin{DoxyCompactList}\small\item\em 分散座標経度格子点, 2次元配列 \end{DoxyCompactList}\item 
real(dp), dimension(\+:,\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_aeea6ed2d8858448c1eb88e3b40cdce8b}{w\+\_\+mpi\+\_\+module\+\_\+base\+::xv\+\_\+lat}
\begin{DoxyCompactList}\small\item\em 分散座標緯度格子点, 2次元配列 \end{DoxyCompactList}\item 
real(dp), dimension(\+:,\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_a944d0cb65b11e2709ec56f34e7da8e36}{w\+\_\+mpi\+\_\+module\+\_\+base\+::xy\+\_\+lon}
\begin{DoxyCompactList}\small\item\em 座標経度格子点, 2次元配列 \end{DoxyCompactList}\item 
real(dp), dimension(\+:,\+:), allocatable, public \hyperlink{namespacew__mpi__module__base_aa21774d521bd62be2746c359c9e6ec9b}{w\+\_\+mpi\+\_\+module\+\_\+base\+::xy\+\_\+lat}
\begin{DoxyCompactList}\small\item\em 座標緯度格子点, 2次元配列 \end{DoxyCompactList}\item 
integer(8), save, public \hyperlink{namespacew__mpi__module__base_af5e3db67c239a3e8b2a850ac73abf702}{w\+\_\+mpi\+\_\+module\+\_\+base\+::icom}
\begin{DoxyCompactList}\small\item\em コミュニケータ \end{DoxyCompactList}\item 
integer(8), dimension(\+:), allocatable, save, public \hyperlink{namespacew__mpi__module__base_a8c5519e5496969ee7a701f06777d72de}{w\+\_\+mpi\+\_\+module\+\_\+base\+::it}
\begin{DoxyCompactList}\small\item\em 変換用配列 \end{DoxyCompactList}\item 
integer(8), dimension(\+:), allocatable, save, public \hyperlink{namespacew__mpi__module__base_a4e95d6c32cbce40f4047c6332ce6f46b}{w\+\_\+mpi\+\_\+module\+\_\+base\+::jc}
\begin{DoxyCompactList}\small\item\em 変換用配列 \end{DoxyCompactList}\item 
real(dp), dimension(\+:), allocatable, save, public \hyperlink{namespacew__mpi__module__base_aaef0c94ed2ea40df2026dd69c5ce5039}{w\+\_\+mpi\+\_\+module\+\_\+base\+::t}
\begin{DoxyCompactList}\small\item\em 変換用配列 \end{DoxyCompactList}\item 
real(dp), dimension(\+:), allocatable, save, public \hyperlink{namespacew__mpi__module__base_a1ed2fa41d296057ce767d1d4a02bed88}{w\+\_\+mpi\+\_\+module\+\_\+base\+::r}
\begin{DoxyCompactList}\small\item\em 変換用配列 \end{DoxyCompactList}\item 
real(dp), dimension(\+:,\+:), pointer, save, public \hyperlink{namespacew__mpi__module__base_ae4b015764a79f414de33dcbd01484ede}{w\+\_\+mpi\+\_\+module\+\_\+base\+::p}
\begin{DoxyCompactList}\small\item\em 変換用配列 \end{DoxyCompactList}\item 
integer(8), save, public \hyperlink{namespacew__mpi__module__base_aa05ba597bf438210e6d593f01220d1df}{w\+\_\+mpi\+\_\+module\+\_\+base\+::j1}
\begin{DoxyCompactList}\small\item\em 分散配置用変数 \end{DoxyCompactList}\item 
integer(8), save, public \hyperlink{namespacew__mpi__module__base_a314a50bfc7f6f6a9de03e8640d84f18e}{w\+\_\+mpi\+\_\+module\+\_\+base\+::j2}
\begin{DoxyCompactList}\small\item\em 分散配置用変数 \end{DoxyCompactList}\item 
integer, save, public \hyperlink{namespacew__mpi__module__base_a3d7dfd2e961ec614e9616b52cd57db4c}{w\+\_\+mpi\+\_\+module\+\_\+base\+::jl}
\begin{DoxyCompactList}\small\item\em 分散格子データの大きさ \end{DoxyCompactList}\item 
integer, save, public \hyperlink{namespacew__mpi__module__base_ab592cd691b8f91f3779f0b080f892973}{w\+\_\+mpi\+\_\+module\+\_\+base\+::nc}
\begin{DoxyCompactList}\small\item\em 分散スペクトルデータの大きさ \end{DoxyCompactList}\item 
integer, save, public \hyperlink{namespacew__mpi__module__base_ad6e4677d45a8306c58f581ef5ccd363c}{w\+\_\+mpi\+\_\+module\+\_\+base\+::np}
\begin{DoxyCompactList}\small\item\em M\+PI プロセス数 \end{DoxyCompactList}\item 
integer, save, public \hyperlink{namespacew__mpi__module__base_a0521d9abdcd00560146fa9bd257fdb4d}{w\+\_\+mpi\+\_\+module\+\_\+base\+::ip}
\begin{DoxyCompactList}\small\item\em M\+PI プロセス番号 \end{DoxyCompactList}\end{DoxyCompactItemize}
