diff --git a/BootTidal.hs b/BootTidal.hs
--- a/BootTidal.hs
+++ b/BootTidal.hs
@@ -38,11 +38,6 @@
     anticipate i = transition tidal True (Sound.Tidal.Transition.anticipate) i
     anticipateIn i t = transition tidal True (Sound.Tidal.Transition.anticipateIn t) i
     forId i t = transition tidal False (Sound.Tidal.Transition.mortalOverlay t) i
-    setI = streamSetI tidal
-    setF = streamSetF tidal
-    setS = streamSetS tidal
-    setR = streamSetI tidal
-    setB = streamSetB tidal
     d1 = p 1 . (|< orbit 0) 
     d2 = p 2 . (|< orbit 1) 
     d3 = p 3 . (|< orbit 2) 
@@ -59,6 +54,14 @@
     d14 = p 14
     d15 = p 15
     d16 = p 16
+:}
+
+:{
+let setI = streamSetI tidal
+    setF = streamSetF tidal
+    setS = streamSetS tidal
+    setR = streamSetI tidal
+    setB = streamSetB tidal
 :}
 
 :set prompt "tidal> "
diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,9 @@
 # TidalCycles log of changes
 
+## 1.1.1 - Chelsea Park
+
+* Useability fixes for `binary` / `binaryN` / `ascii` @yaxu
+
 ## 1.1.0 - Brincliffe Edge
 
 * `binary` and `ascii` functions for playing with bit patterns @yaxu
diff --git a/src/Sound/Tidal/UI.hs b/src/Sound/Tidal/UI.hs
--- a/src/Sound/Tidal/UI.hs
+++ b/src/Sound/Tidal/UI.hs
@@ -1839,11 +1839,11 @@
 _binary :: Data.Bits.Bits b => Int -> b -> Pattern Bool
 _binary n num = listToPat $ __binary n num
 
-binaryN :: Data.Bits.Bits b => Int -> Pattern b -> Pattern Bool
+binaryN :: Int -> Pattern Int -> Pattern Bool
 binaryN n p = innerJoin $ _binary n <$> p
 
-binary :: Data.Bits.Bits b => Pattern b -> Pattern Bool
+binary :: Pattern Int -> Pattern Bool
 binary = binaryN 8
 
 ascii :: Pattern String -> Pattern Bool
-ascii p = innerJoin $ (listToPat . concatMap (__binary 8 . ord)) <$> p
+ascii p = squeezeJoin $ (listToPat . concatMap (__binary 8 . ord)) <$> p
diff --git a/src/Sound/Tidal/Version.hs b/src/Sound/Tidal/Version.hs
--- a/src/Sound/Tidal/Version.hs
+++ b/src/Sound/Tidal/Version.hs
@@ -1,4 +1,4 @@
 module Sound.Tidal.Version where
 
 tidal_version :: String
-tidal_version = "1.1.0"
+tidal_version = "1.1.1"
diff --git a/tidal.cabal b/tidal.cabal
--- a/tidal.cabal
+++ b/tidal.cabal
@@ -1,5 +1,5 @@
 name:                tidal
-version:             1.1.0
+version:             1.1.1
 synopsis:            Pattern language for improvised music
 -- description:
 homepage:            http://tidalcycles.org/