# Funny business with squeeze

**URL:** <https://uzu.lurk.org/t/funny-business-with-squeeze/5887>\
**Category:** TidalCycles\
**Tags:** questions\
**Created:** [4 September 2025 22:37 UTC](https://uzu.lurk.org/t/funny-business-with-squeeze/5887 "2025-09-04T22:37:26Z")\
**Posts on this page:** 2\
**Page:** 1

<div class="post-metadata">

**Author:** ![bmstr](https://uzu.lurk.org/user_avatar/uzu.lurk.org/bmstr/32/3262_2.png) [@bmstr](https://uzu.lurk.org/u/bmstr)\
**Post date:** [4 September 2025 22:37 UTC](https://uzu.lurk.org/t/funny-business-with-squeeze/5887/1 "2025-09-04T22:37:26Z")

</div>

I’ve found myself using this:  
`squeeze “<0 0 1 1 2 2 3 3>” $ x`  
which is not very nice. I tried to make it more compact like this:  
`squeeze (slow 2 $ “<0 1 2 3>”) $ x`  
expecting the `slow 2 $ “<0 1 2 3>”` to be evaluated to `”<0 0 1 1 2 2 3 3>”`, but it seems like instead it treats the whole bracketed thing as a pattern (?) and so the result is `slow 2 x[i]` for cycle `i`.

We can resort to haskell and do it like this  
`drawLine $ squeeze (fromList $ concatMap (replicate 2) [0 .. 3]) $ x`  
But hopefully I’m missing something.

---

<div class="post-metadata">

**Author:** ![jwaldmann](https://uzu.lurk.org/letter_avatar_proxy/v4/letter/j/977dab/32.png) [@jwaldmann](https://uzu.lurk.org/u/jwaldmann)\
**Post date:** [14 January 2026 14:40 UTC](https://uzu.lurk.org/t/funny-business-with-squeeze/5887/2 "2026-01-14T14:40:11Z")

</div>

> [@bmstr](#):
>
> But hopefully I’m missing something.

you are missing `segment`?

```haskell
      squeeze (segment 1 $ slow 2 "<0 1 2 3>") x

```