Ja-rek

Ja-rek / great_code.hs

Created December 7, 2019 23:13

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)