mscurtescu

Verifying my Blockstack ID is secured with the address 18wguybcVHapM2m1zc92th8iiE9dznYYym https://explorer.blockstack.org/address/18wguybcVHapM2m1zc92th8iiE9dznYYym

mscurtescu

Keybase proof

I hereby claim:

• I am mscurtescu on github.
• I am mscurtescu (https://keybase.io/mscurtescu) on keybase.
• I have a public key ASDWUAsnoT3s4bDrE6ZdNFm1-d_C39nEvGlj16-ducPIkgo

To claim this, I am signing this object:

mscurtescu

import qualified Data.List as List

data Shape = Oval | Squiggle | Diamond deriving (Show, Eq, Bounded, Enum, Ord)
data Color = Red | Purple | Green deriving (Show, Eq, Bounded, Enum, Ord)
data Number = One | Two | Three deriving (Show, Eq, Bounded, Enum, Ord)
data Shading = Solid | Striped | Outlined deriving (Show, Eq, Bounded, Enum, Ord)

data Card = Card Shape Color Number Shading deriving (Show, Eq, Ord)

isSet :: Card -> Card -> Card -> Bool