Commit 5e5fa7a5 authored by Simon Marlow's avatar Simon Marlow
Browse files

remove datatype context

parent 06d0dda1
{-# OPTIONS_GHC -fno-warn-missing-methods #-} {-# OPTIONS_GHC -fno-warn-missing-methods -fno-warn-deprecations #-}
module C where module C where
data RealFloat a => Complex a = !a :+ !a data Complex a = !a :+ !a
deriving (Eq, Show) deriving (Eq, Show)
instance (RealFloat a) => Num (Complex a) where instance (RealFloat a) => Num (Complex a) where
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment