* whats the correct way to match on an enum, I'm still interested on figuring out this syntax
```hs
data dir = R | L
y dir = if dir == R  true else false
```