境界線を持つ物質12を関数化。主プログラム部は１５０行程度である。