Date: 2014-10-09 03:15 pm (UTC)
I think you want to fix the signature here

withPhony :: Monad m => Gen2 m input (WithPhony output) -> Gen1 m input output

If you don't have an account you can create one now.
HTML doesn't work in the subject.
More info about formatting