refactoring: File.Binary.PNG.RW.hs