>>698
a(j) = b(j)

の部分がおかしいのでは？
直前の「b(i) = …」で計算した値が１つ（b(j)）しか a に代入されていない。
a = b
として、配列 b の中身をすべて a に代入すれば良いのではないかな