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:
Verifying my Blockstack ID is secured with the address 18wguybcVHapM2m1zc92th8iiE9dznYYym https://explorer.blockstack.org/address/18wguybcVHapM2m1zc92th8iiE9dznYYym |
I hereby claim:
To claim this, I am signing this object:
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 |