>>782-783
短い!エラー処理ではなくMaybeかー
やりたかったことは
dofirst p f = fmap f . find p
こうでした