Skip to content

@egonSchiele /tidal.hs secret
Created

Embed URL

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
tidal
{-# LANGUAGE OverloadedStrings #-}
import Sound.Tidal.Strategies
import Sound.Tidal.Dirt
import Sound.Tidal.Pattern
import Sound.Tidal.Stream
import Sound.Tidal.Parse
import Sound.Tidal.Tempo
import Sound.Tidal.Time
import Sound.Tidal.Context
main = stack [ every 4 (0.25 <~) $ every 3 rev $ striate 64 $ sound "[lesshuman lesshuman/4 lesshuman/7 lesshuman/4]/2" |+| speed "[1 1 1 1.5]/8", spread' (striate) "[8 3 2 4]/2" $ slow 2 $ striate 64 $ sound "[[cities cities/1 cities cities/2]/4]" |+| speed "[1.0 0.8 1.0 0.9]/4" |+| shape "-0.4"]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.