state monads, poker, slides