サブルーチンと配列に少しコメントを

コメントとサンプルコード書いてみました。
また、元のコードにはバグがあります。何か分かるかな。