d1 $ jux (iter 4) $ sound "arpy arpy:2*2" |+ speed (slow 4 $ range 1 1.5 sine1)The above is equivalent to:
d1 $ jux (iter 4) $ sound "arpy arpy:2*2" |+ speed (slow 4 $ sine1 * 0.5 + 1)
d1 $ ( fixRange ( (# distort 1) . (# gain 0.8) ) ( pure $ Map.singleton "note" ((VN 0, VN 7)) ) ) $ s "superpiano" <| note "1 12 7 11"