
{-# LANGUAGE FunctionalDependencies #-}
{-# OPTIONS_GHC -XMultiParamTypeClasses #-}

module Foo where

class Foo a b | a -> b

