purescript-0.15.15: tests/purs/passing/3595.purs

module Main where

import Prelude as P
import Effect (Effect)
import Effect.Console (log)

class P.Show a <= Show a where
  id :: a -> a

instance showString :: Show String where
  id x = x

main :: Effect P.Unit
main = log (id "Done")