% 表題  中島健介対流モデル解説  入出力ファイルの準備
%
% 履歴  1998/07/02  小高正嗣
%       1999/06/14  小高正嗣
%
\subsection{入出力ファイルの準備}

サブルーチン {\tt FOPEN} を読んで入出力ファイルの準備を行なう.

\subsubsection{FOPEN}

\begin{enumerate}
  \item 機能
    \begin{quote}
      入出力ファイルを定義する. 
    \end{quote}
  \item パラメータ
    \begin{quote}
    \begin{tabular}{lll}
      {\tt IRUN} & (整数) & 実験番号 
    \end{tabular}
    \end{quote}
  \item 解説

    入力ファイル名は {\tt @T1\{CNUM(IRUN)\}.U.DATA}等である. {\tt
    CNUM} は {\tt IRUN}を引数に持つ配列で {\tt 0-Z} の間の文字が入る.
    入力ファイルには {\tt CNUM(IRUN)}, 出力ファイルには {\tt
    CNUM(IRUN+1)}を与える. 入力ファイルは{\tt IRUN > 1} の場合に開かれ
    る.

    入出力ファイルとその装置番号を以下に示す.

    \begin{enumerate}
      \item 入力ファイル

      \begin{tabular}{lll}
        装置番号 & ファイル名 & 入力変数 \\
        21       & {\tt @T1\{CNUM(IRUN)\}.RAND.DATA} & 乱数 \\
        31       & {\tt @T1\{CNUM(IRUN)\}.U.DATA } & 風速 x 成分 \\
        32       & {\tt @T1\{CNUM(IRUN)\}.V.DATA } & 風速 y 成分 \\
        33       & {\tt @T1\{CNUM(IRUN)\}.W.DATA } & 風速 z 成分 \\
        34       & {\tt @T1\{CNUM(IRUN)\}.TPOT.DATA } & 温位 \\
        35       & {\tt @T1\{CNUM(IRUN)\}.QVAP.DATA } & 水蒸気混合比 \\
        36       & {\tt @T1\{CNUM(IRUN)\}.QCLW.DATA } & 雲水混合比 \\
        37       & {\tt @T1\{CNUM(IRUN)\}.QRAI.DATA } & 雨水混合比 \\
        38       & {\tt @T1\{CNUM(IRUN)\}.TURB.DATA } & 乱流拡散係数 \\
        39       & {\tt @T1\{CNUM(IRUN)\}.PPAI.DATA } & 無次元圧力関数 \\
      \end{tabular}
    
    \item 出力ファイル

      \begin{tabular}{lll}
        装置番号 & ファイル名 & 出力変数 \\
        16       & {\tt @T1\{CNUM(IRUN+1)\}.VB.DATA } & 
                   基本場の変数の鉛直分布 \\
        61       & {\tt @T1\{CNUM(IRUN+1)\}.VREF.DATA } & 
                   各種変数の水平平均(診断用) \\
        71       & {\tt @T1\{CNUM(IRUN+1)\}.KUBU.DATA } & 
                   雲・雨領域の区分(診断用) \\
        72       & {\tt @T1\{CNUM(IRUN+1)\}.TSFC.DATA } & 
                   地表面フラックス積算値(診断用)\\
        81       & {\tt @T1\{CNUM(IRUN+1)\}.U.DATA } & 風速 x 成分 \\
        82       & {\tt @T1\{CNUM(IRUN+1)\}.V.DATA } & 風速 y 成分 \\
        83       & {\tt @T1\{CNUM(IRUN+1)\}.W.DATA } & 風速 z 成分 \\
        84       & {\tt @T1\{CNUM(IRUN+1)\}.TPOT.DATA } & 温位 \\
        85       & {\tt @T1\{CNUM(IRUN+1)\}.QVAP.DATA } & 水蒸気混合比 \\
        86       & {\tt @T1\{CNUM(IRUN+1)\}.QCLW.DATA } & 雲水混合比 \\
        87       & {\tt @T1\{CNUM(IRUN+1)\}.QRAI.DATA } & 雨水混合比 \\
        88       & {\tt @T1\{CNUM(IRUN+1)\}.TURB.DATA } & 乱流拡散係数 \\
        89       & {\tt @T1\{CNUM(IRUN+1)\}.PPAI.DATA } & 無次元圧力関数 \\
      \end{tabular}
    \end{enumerate}  
\end{enumerate}

