Skip to content

Instantly share code, notes, and snippets.

@Ja-rek
Ja-rek / great_code.hs
Created December 7, 2019 23:13 — forked from paulmillr/great_code.hs
Cool & pretty readable haskell code
data Cargo = Peasant
| Cabbage
| Wolf
| Goat
deriving (Eq, Enum, Show)
type ShoreState = [Cargo]
type Move = [Cargo]
type State = (ShoreState, ShoreState)