TypeClassesInOrder.purs

module Main where

import Prelude

class Foo a where
  foo :: a -> String

instance fooString :: Foo String where
  foo s = s

main = Control.Monad.Eff.Console.log $ foo "Done"