diff --git a/examples/monads/state_monad.lamb b/examples/monads/state_monad.lamb
index e4a666c..7943cf7 100644
--- a/examples/monads/state_monad.lamb
+++ b/examples/monads/state_monad.lamb
@@ -25,7 +25,7 @@ bind(("state", h), f) ->
 get = ("state", \st -> (st, st)).
 
 -- sets the state, and the result to ()
-put(st) -> ("state", \_ -> ((), st)).
+put(st) -> ("state", \_ -> ((,), st)).
 
 
 derp = return(10).