HaskellでDI