use ExceptT
Merge pull request #34 from cosmo0920/ExceptT

use ExceptT