ダメだ

やはり全部OCamlでやるのはムリがあったか。indexを使ったループを書こうとするととたんに貧弱になる。もう、何度書き直したことか。そもそもListをindexで使ってるのが間違いなわけで、かといって今更データ構造ごと変えるのは、それも間違いなわけで。。。もう適当に書いてごまかそう。保守などしない。