% 表題  中島健介対流モデル解説  地表面条件, コリオリ定数の設定
%
% 履歴  1998/07/02  小高正嗣
%       1999/06/14  小高正嗣
%
\subsection{地表面条件, コリオリ定数の設定}

サブルーチン {\tt SETCST2} を呼んで地表面条件, コリオリ定数を設定する.

\subsubsection{SETCST2}

\begin{enumerate}
  \item 機能
    \begin{quote}
      地表面条件, コリオリ定数を設定する.
    \end{quote}
  \item パラメータ
    \begin{quote}
      \begin{tabular}{lllp{10cm}}
        {\tt CDRAG} & (実数) &                  & 抵抗係数 \\
        {\tt VSFC0} & (実数) &                  & 地表風速 \\
        {\tt TSFC}  & (実数) & {\tt ( -2:NXB )} & 地表面温度 \\
        {\tt QVSFC} & (実数) & {\tt ( -2:NXB )} & 地表面水蒸気混合比 \\
        {\tt FCOLI} & (実数) & {\tt ( -2:NXB )} & コリオリ定数 \\
        {\tt PSFC}  & (実数) &                  & 地表気圧 \\
        {\tt RMVAP} & (実数) &                  & 水蒸気分子量 \\
        {\tt NX }   & (整数) &                  & 水平方向格子点数 \\
        {\tt NXB}   & (整数) &                  & 水平方向次元数
      \end{tabular}       
    \end{quote}
\end{enumerate}

{\tt SETCST2} が呼ばれた後, 変数群 {\tt MODEL}, {\tt CONST1}, {\tt
CONST2} を{\tt @T1\{CNUM(IRUN+1)\}.VB.DATA} に出力する.

