ベクトルを用いる

まず, ABCL/f において並列化しない場合(並列オブジェクトを用いない)について示す. この場合には, FORTRAN などによる記述と同様となる. 配列の長さは, セル数 N となる.

1. 配列を生成し, 初期化する.
   ; ABCL/f program

         (make-vector N r-ini)    ; 長さ=N, 値=r-ini の配列を生成

   
   配列の生成は,
   (make-vector ...)
   にて行なう. この戻り値が配列であり, 適当に変数にバインドして使う.
   
2. 計算する.
   ; ABCL/f program

         ; すでに 配列 r-n+1, r-n, ru-n+1
         ;        定数 DT, DX
         ; が定義されており, i番目のセルの計算をするところである. 
         (vsetf r-n+1 i (- (vref r-n i)
                           (/ (* DT
                                 (- (vref ru-n+1 i) (vref ru-n+1 (- i 1))))
                              DX)))

   
   配列に値を設定するには,
   (vsetf <配列の変数> <添字> <値>)
   を用いる. また, 配列の値を参照するには,
   (vref <配列の変数> <添字>)
   を用いる.