cpml.f90 からepsi()を削除