use utilfort (my fortran library) and some modifications

text encoding: shift-jis -> UTF-8
subroutine part_matcrs: remove argument