%表題 bsnsq_2d 時間空間座標管理ライブラリ (時間ステップ制御)
%
%履歴 
\Drireki{96/03/14 竹広真一}
%
%
\section{サブルーチンの説明 : 
         時間ステップ制御}
\label{astep}

\subsection{ATSSET}
\label{atsset}
\begin{enumerate}
  \item 機能 
  \begin{quote}
    時間ステップ制御の設定を行なう. 
  \end{quote}
  \item 呼び出し方法 
      \begin{verbatim}
          CALL ATSSET
         I     ( ITSTRT, ITEND , INTOUT , 
         I       HINTG )
      \end{verbatim}
  \item パラメーターの説明 
  \begin{quote}
    \begin{tabular}{llp{11cm}}
      {\tt ITSTRT}  & {\tt [I]}    & 計算開始ステップ\\
      {\tt ITEND}  & {\tt [I]}     & 計算終了ステップ\\
      {\tt INTOUT} & {\tt [I]}     & 出力間隔\\
      {\tt HINTG*(NCC)}& {\tt [C]} & 時間積分スキームスイッチ\\
    \end{tabular}
  \end{quote}
  \item 備考 
  \begin{enumerate}
    \item {\tt ATSTEP}(\ref{atstep}) で
          時刻ステップ制御を行なうための設定を行なう.
    \item 今のところ等間隔での出力にしか対応していない. 
  \end{enumerate}
\end{enumerate}

\subsection{ATSTEP}
\label{atstep}
\begin{enumerate}
  \item 機能 
  \begin{quote}
    時間ステップを制御する. 
  \end{quote}
  \item 呼び出し方法 
      \begin{verbatim}
          CALL ATSTEP            !"  時刻制御 
         M     ( IT   ,     
         O       HINTG , OOUT , OEND )
      \end{verbatim}
  \item パラメーターの説明 
  \begin{quote}
    \begin{tabular}{llp{11cm}}
      {\tt IT}     & {\tt [R]}     & ループカウンタ\\
      {\tt HINTG*(NCC)}& {\tt [C]} & 時間積分スキームスイッチ(ダミー)\\
      {\tt OOUT}   & {\tt [L]}     & 出力スイッチ\\
      {\tt OEND}   & {\tt [L]}     & 終了スイッチ\\
    \end{tabular}
  \end{quote}
  \item 備考 
  \begin{enumerate}
    \item 時刻ステップ {\tt IT} を 1 進める.
    \item {\tt ATSSET}(\ref{atsset}) で設定された 
          {\tt ITSTRT},{\tt ITEND},{\tt INTOUT}, {\tt HINTG} を用いて
          (進めた後の) {\tt IT} ステップ目での動作スイッチを返す. 
    \item 1 加えられた後の {\tt IT} が {\tt INTOUT} で割り切れるか, 
          {\tt ITEND} に等しくなった時 {\tt OOUT} が真となる. 
          今のところ等間隔での出力にしか対応していない. 
    \item 1 加えられた後の {\tt IT} が {\tt ITEND} に等しくなった時
          {\tt OEND} が真となる. 
  \end{enumerate}
\end{enumerate}

%%% Local Variables: 
%%% mode: japanese-latex
%%% TeX-master: "/usr/export/home/takepiro/model/bsnsq_2d/doc/sub"
%%% End: