d_show = [d| data A = A

             instance Show A  where
                 show _ = "A"
         |]
d_show = [d| data A = A

             instance Show A  where
                 show _ = "A"
         |]
d_show = [d| data A = A

             instance Show A  where
                 show _ = "A"
         |]