@@ -111,7 +111,7 @@ instance Show Image where
111 show ( VertJoin { part_top = t, part_bottom = b, output_width = c, output_height = r } )
111 show ( VertJoin { part_top = t, part_bottom = b, output_width = c, output_height = r } )
112 = "VertJoin (" ++ show c ++ ", " ++ show r ++ ") ( " ++ show t ++ " ) <-> ( " ++ show b ++ " )"
112 = "VertJoin (" ++ show c ++ ", " ++ show r ++ ") ( " ++ show t ++ " ) <-> ( " ++ show b ++ " )"
113 show ( Translation offset i )
113 show ( Translation offset i )
114− = "Translation ( " ++ show offset ++ ", " ++ show i ++ " )"
114+ = "Translation " ++ show offset ++ " ( " ++ show i ++ " )"
115 show ( EmptyImage ) = "EmptyImage"
115 show ( EmptyImage ) = "EmptyImage"
117-- | Currently append in the Monoid instance is equivalent to <->. Future versions will just stack
117-- | Currently append in the Monoid instance is equivalent to <->. Future versions will just stack