@@ -43,8 +43,8 @@ express this as follows:
44.. code-block:: idris
44.. code-block:: idris
46− readInt : Eff ()[STATE (Vect n Int), STDIO]
46+ readInt : Eff () [STATE (Vect n Int), STDIO]
47− [STATE (Vect (S n) Int), STDIO]
47+ [STATE (Vect (S n) Int), STDIO]
48 readInt = do let x = trim !getStr
48 readInt = do let x = trim !getStr
49 putM (cast x :: !get)
49 putM (cast x :: !get)