purescript-0.7.4.1: examples/passing/OverlappingInstances.purs

module Main where

import Prelude

data A = A

instance showA1 :: Show A where
  show A = "Instance 1"

instance showA2 :: Show A where
  show A = "Instance 2"

main = Test.Assert.assert $ show A == "Instance 1"