├── .gitignore ├── Setup.hs ├── CHANGES └── Sound └── Tidal └── Drum ├── Drumroll3.hs ├── GhostSnare1a.hs ├── GhostSnare1b.hs ├── GhostSnare2a.hs ├── GhostSnare2b.hs ├── Kick.hs ├── Hiphop5.hs ├── Poly1b.hs ├── YaMama.hs ├── Electro1a.hs ├── Electro1b.hs ├── Electro2a.hs ├── Electro2b.hs ├── Electro3a.hs ├── Electro3b.hs ├── GoodToGo.hs ├── Hiphop1a.hs ├── Hiphop1b.hs ├── Hiphop1c.hs ├── Hiphop2a.hs ├── Hiphop2b.hs ├── Hiphop3a.hs ├── Hiphop3b.hs ├── Hiphop4a.hs ├── Hiphop4b.hs ├── Poly1a.hs ├── Rolling1.hs ├── Rolling10.hs ├── Rolling11.hs ├── Rolling2.hs ├── Rolling3a.hs ├── Rolling3b.hs ├── Rolling4a.hs ├── Rolling4b.hs ├── Rolling5a.hs ├── Rolling5b.hs ├── Rolling6a.hs ├── Rolling7a.hs ├── Rolling7b.hs ├── Rolling7c.hs ├── Rolling7d.hs ├── Rolling8.hs ├── Rolling9a.hs ├── Rolling9b.hs ├── TinyHouse.hs ├── Breakbeat1.hs ├── Breakbeat2.hs ├── Breakbeat3.hs ├── Drumroll2.hs ├── HybridKick1a.hs ├── HybridKick1b.hs ├── HybridKick1c.hs ├── HybridKick1d.hs ├── HybridKick1e.hs ├── HybridKick1f.hs ├── HybridKick1g.hs ├── HybridKick2a.hs ├── HybridKick2b.hs ├── HybridKick3a.hs ├── HybridKick3b.hs ├── Irregular1a.hs ├── Irregular1b.hs ├── Irregular2a.hs ├── Irregular2b.hs ├── Irregular3.hs ├── WeWillRockYou.hs ├── ContemporaryKick1a.hs ├── ContemporaryKick1b.hs ├── ContemporaryKick2a.hs ├── ContemporaryKick2b.hs ├── ContemporaryKick3a.hs ├── ContemporaryKick3b.hs ├── ContemporaryKick4.hs ├── ContemporarySnare1a.hs ├── ContemporarySnare1b.hs ├── ContemporarySnare2a.hs ├── ContemporarySnare2b.hs ├── ContemporarySnare3a.hs ├── ContemporarySnare3b.hs ├── OneSevenFiveThirteen.hs ├── UnconventionalSnare1a.hs ├── UnconventionalSnare1b.hs ├── UnconventionalSnare2a.hs ├── UnconventionalSnare2b.hs ├── UnconventionalSnare3a.hs ├── UnconventionalSnare3b.hs ├── UnconventionalSnare4a.hs ├── UnconventionalSnare4b.hs ├── FourOnTheFloor.hs ├── Dnb1a.hs ├── Dnb1b.hs ├── Dnb2a.hs ├── Blues1a.hs ├── Blues2a.hs ├── Bouton.hs ├── Break1.hs ├── Break2.hs ├── HalfDrop.hs ├── HipHop.hs ├── Hiphop6.hs ├── Hiphop7.hs ├── Hiphop8.hs ├── Jungle1b.hs ├── OneDrop.hs ├── Shuffle1a.hs ├── Shuffle2a.hs ├── Steppers.hs ├── Swing1a.hs ├── Swing2a.hs ├── Trap1a.hs ├── TwoDrop.hs ├── BootsNCats.hs ├── Drumroll4.hs ├── Drumroll5.hs ├── MiamiBass1.hs ├── MiamiBass2.hs ├── Numbers1a.hs ├── Numbers1b.hs ├── Reggaeton.hs ├── SynthWave.hs ├── DasModel1a.hs ├── DasModel1b.hs ├── Drumroll13.hs ├── Drumroll14.hs ├── Drumroll17.hs ├── Drumroll18.hs ├── RockThePlanet.hs ├── RollinBreak.hs ├── Trap1b.hs ├── MusicNonStop1a.hs ├── SiberianNights.hs ├── Supersonic1a.hs ├── Supersonic1b.hs ├── TransEuroExpress.hs ├── Afro1a.hs ├── Afro1b.hs ├── Afro4a.hs ├── Afro5b.hs ├── Afro5c.hs ├── Afro6a.hs ├── End1a.hs ├── End1b.hs ├── Funk1a.hs ├── Funk2b.hs ├── Funk3a.hs ├── Funk3b.hs ├── Funk4a.hs ├── Funk4b.hs ├── Funk4c.hs ├── Funk5b.hs ├── Funk6c.hs ├── Funk8a.hs ├── Funk8b.hs ├── Pop2a.hs ├── Pop3a.hs ├── Pop3b.hs ├── Pop4a.hs ├── Pop4b.hs ├── Pop5a.hs ├── Pop5c.hs ├── RNB1a.hs ├── RNB1b.hs ├── RNB1c.hs ├── RNB2a.hs ├── RNB2b.hs ├── RNB3a.hs ├── RNB3b.hs ├── RNB4a.hs ├── RNB5a.hs ├── RNB5b.hs ├── Rock1b.hs ├── Rock3a.hs ├── Rock3b.hs ├── Rock4a.hs ├── Rock4c.hs ├── Rock5a.hs ├── Rock5b.hs ├── Ballad1a.hs ├── Ballad1b.hs ├── Ballad2b.hs ├── Ballad3b.hs ├── Ballad5b.hs ├── BigBeat.hs ├── BillyJean.hs ├── Bossa1a.hs ├── Bossa1b.hs ├── Bossa2c.hs ├── Disco2c.hs ├── Disco3a.hs ├── Disco3b.hs ├── Funk10a.hs ├── Funk10b.hs ├── Funk13c.hs ├── Funk14a.hs ├── Funk14b.hs ├── GrooveMe.hs ├── Hiphop.hs ├── Reggae1a.hs ├── Reggae1b.hs ├── Reggae3a.hs ├── Reggae3b.hs ├── Reggae5a.hs ├── Samba2c.hs ├── Twist1b.hs ├── Twist2c.hs ├── GenericGahu.hs ├── GenericRock.hs ├── GenericSon.hs ├── ItsANewDay.hs ├── FunkyDrummer.hs ├── GenericRumba.hs ├── GenericShiko.hs ├── GenericSoukous.hs ├── Nico.hs ├── Superstition.hs ├── GenericBossaNova.hs ├── ColdSweatOpening.hs ├── WhenTheLeveeBreaks.hs ├── Funk15a.hs ├── TheSameBlood.hs ├── TheTrillsGone.hs ├── Dnb3.hs ├── Dnb4a.hs ├── Dnb4b.hs ├── Sally.hs ├── DeepHouse.hs ├── Dubstep1a.hs ├── Dubstep1b.hs ├── Footwork1.hs ├── Footwork2.hs ├── House1b.hs ├── Jungle1a.hs ├── Drumroll6.hs ├── Drumroll7.hs ├── Drumroll8.hs ├── Drumroll9.hs ├── Ageispolis.hs ├── BlueMonday1a.hs ├── Drumroll15.hs ├── Drumroll16.hs ├── UnknownDrummer.hs ├── Haus.hs ├── Pattern00.hs ├── Pattern01.hs ├── Pattern02.hs ├── Pattern03.hs ├── Pattern04.hs ├── Pattern05.hs ├── Pattern06.hs ├── Pattern07.hs ├── Pattern08.hs ├── Pattern09.hs ├── Pattern10.hs ├── Pattern11.hs ├── Pattern12.hs ├── Pattern13.hs ├── Pattern14.hs ├── Pattern15.hs ├── Pattern16.hs ├── Pattern17.hs ├── Pattern18.hs ├── Pattern19.hs ├── Pattern20.hs ├── Pattern21.hs ├── Pattern22.hs ├── Pattern23.hs ├── Pattern24.hs ├── Pattern25.hs ├── Pattern26.hs ├── Pattern27.hs ├── Pattern28.hs ├── Pattern29.hs ├── Pattern30.hs ├── Pattern31.hs ├── Pattern32.hs ├── Pattern33.hs ├── Pattern34.hs ├── Pattern35.hs ├── Pattern36.hs ├── Pattern37.hs ├── Pattern38.hs ├── Pattern39.hs ├── Pattern40.hs ├── Pattern41.hs ├── Pattern42.hs ├── Pattern43.hs ├── Pattern44.hs ├── Pattern45.hs ├── Pattern46.hs ├── Pattern47.hs ├── Pattern48.hs ├── Pattern49.hs ├── Pattern50.hs ├── Pattern51.hs ├── Pattern52.hs ├── Pattern53.hs ├── Pattern54.hs ├── Pattern55.hs ├── Pattern56.hs ├── Pattern57.hs ├── Pattern58.hs ├── Pattern59.hs ├── Pattern60.hs ├── Pattern61.hs ├── Pattern62.hs ├── Pattern63.hs ├── Afro2b.hs ├── Amen.hs ├── Bossa2a.hs ├── Bossa2b.hs ├── Disco1a.hs ├── Disco1b.hs ├── Disco2a.hs ├── Disco2b.hs ├── Disco4a.hs ├── Disco4b.hs ├── Disco4c.hs ├── Disco5a.hs ├── Disco5b.hs ├── Funk10c.hs ├── Funk11a.hs ├── Funk11b.hs ├── Funk11c.hs ├── Funk12a.hs ├── Funk12b.hs ├── Funk12c.hs ├── Funk13a.hs ├── Funk13b.hs ├── Funk14c.hs ├── Funk1b.hs ├── Funk1c.hs ├── Funk2a.hs ├── Funk2c.hs ├── Funk3c.hs ├── Funk5a.hs ├── Funk5c.hs ├── Funk6a.hs ├── Funk7a.hs ├── Funk7c.hs ├── Funk9a.hs ├── Funk9b.hs ├── Funk9c.hs ├── GetUp.hs ├── Juke.hs ├── Pop1a.hs ├── Pop1b.hs ├── Pop2b.hs ├── Pop2c.hs ├── Pop4c.hs ├── Pop5b.hs ├── RNB2c.hs ├── RNB4b.hs ├── RNB4c.hs ├── Rock1a.hs ├── Rock2b.hs ├── Rock3c.hs ├── Rock4b.hs ├── Rock5c.hs ├── Samba1b.hs ├── Samba3a.hs ├── Samba3b.hs ├── Ska1a.hs ├── Ska1c.hs ├── Techno.hs ├── Twist1a.hs ├── Twist1c.hs ├── Twist2a.hs ├── Twist2b.hs ├── Ballad2a.hs ├── Ballad3a.hs ├── Ballad3c.hs ├── Ballad4a.hs ├── Ballad4b.hs ├── Ballad5a.hs ├── DubstepRatcheted.hs ├── Jungle.hs ├── Reggae2a.hs ├── Reggae2b.hs ├── Reggae5b.hs ├── ColdSweat.hs ├── CowdBell.hs ├── HiphopAlt.hs ├── JungleAlt.hs ├── PapaWasToo.hs ├── WalkThisWay.hs ├── CissyStrutShort.hs ├── FunkyDrummerAlt.hs ├── FunkyPresident.hs ├── HaitianDivorce.hs ├── Strbtsdcgogo100.hs ├── Swing3a.hs ├── ChugChugChugaLug.hs ├── ImpeachThePresident.hs ├── KnocksOffMyFeet.hs ├── House1a.hs ├── NewWave.hs ├── BritHouse.hs ├── DirtyHouse.hs ├── UkGarage1a.hs ├── UkGarage1b.hs ├── DeeperHouse.hs ├── Drumroll1.hs ├── Drumroll10.hs ├── Drumroll12.hs ├── FrenchHouse.hs ├── BlueMonday2a.hs ├── HotSweat.hs ├── SlowDeepHouse.hs ├── Supersonic2a.hs ├── Supersonic2b.hs ├── TheFez.hs ├── MusicNonStop2a.hs ├── MusicNonStop2b.hs ├── ComeDancing.hs ├── MoreBounceToTheOunce.hs ├── Pop1c.hs ├── RNB3c.hs ├── RNB5c.hs ├── Ska1b.hs ├── Afro2a.hs ├── Afro3a.hs ├── Afro3b.hs ├── Afro3c.hs └── Afro4b.hs /.gitignore: -------------------------------------------------------------------------------- 1 | dist 2 | *~ 3 | -------------------------------------------------------------------------------- /Setup.hs: -------------------------------------------------------------------------------- 1 | import Distribution.Simple 2 | main = defaultMain 3 | -------------------------------------------------------------------------------- /CHANGES: -------------------------------------------------------------------------------- 1 | # 0.2 2 | 3 | * Moved all `Pattern String` to `Pattern Int`, this way allows to be used with Super/Classic Dirt + MIDI Synths. 4 | * Added 3 basic versions of classic styles. 5 | 6 | # 0.1 7 | 8 | * Initial version 9 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll3.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll3 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | sn = "[t t t ~] [t t t ~] [t ~ t ~] [t t t t] " :: Pattern Bool 8 | 9 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GhostSnare1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GhostSnare1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ ~] [t ~ ~ t] " :: Pattern Bool 8 | 9 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GhostSnare1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GhostSnare1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ ~] [t ~ ~ ~] " :: Pattern Bool 8 | 9 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GhostSnare2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GhostSnare2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | sn = "[~ t ~ ~] [t ~ ~ t] [~ ~ ~ ~] [t ~ ~ t] " :: Pattern Bool 8 | 9 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GhostSnare2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GhostSnare2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | sn = "[~ t ~ ~] [t ~ ~ ~] [~ t ~ ~] [t ~ ~ t] " :: Pattern Bool 8 | 9 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Kick.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Kick where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop5.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop5 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ t] [t ~ t ~] [~ ~ ~ t]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Poly1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Poly1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ t ~] [~ ~ t ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/YaMama.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.YaMama where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | cy = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Electro1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Electro1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Electro1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Electro1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Electro2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Electro2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Electro2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Electro2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ t ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Electro3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Electro3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Electro3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Electro3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ t] [~ t ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GoodToGo.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GoodToGo where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ ~ t] [~ ~ t ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop1c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop1c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t t ~ ~] [~ t ~ t]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [t t ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ t t ~] [~ ~ ~ t]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ t] [t t t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Poly1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Poly1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ t ~] [t ~ ~ [t t]] [t ~ t t] [t ~ t t]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling1.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling1 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling10.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling10 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling11.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling11 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ t t ~] [~ t t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling2.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling2 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ t ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t t ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ t t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling5a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling5a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling5b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling5b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling6a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling6a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling7a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling7a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling7b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling7b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling7c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling7c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling7d.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling7d where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling8.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling8 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling9a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling9a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rolling9b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rolling9b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t t ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/TinyHouse.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.TinyHouse where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Breakbeat1.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Breakbeat1 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Breakbeat2.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Breakbeat2 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Breakbeat3.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Breakbeat3 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll2.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll2 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 8 | sn = "[t ~ t t] [t ~ t t] [~ t t t] [~ ~ ~ ~] " :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ t ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick1c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick1c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick1d.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick1d where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick1e.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick1e where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick1f.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick1f where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick1g.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick1g where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ t ~ t] [~ t t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t t ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HybridKick3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HybridKick3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t t ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Irregular1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Irregular1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t t] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~] [t ~ ~ t]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Irregular1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Irregular1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ t]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Irregular2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Irregular2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Irregular2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Irregular2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Irregular3.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Irregular3 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~]" :: Pattern Bool 8 | sn = "[~ t ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ t ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/WeWillRockYou.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.WeWillRockYou where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | cp = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporaryKick1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporaryKick1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporaryKick1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporaryKick1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporaryKick2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporaryKick2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ t ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporaryKick2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporaryKick2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporaryKick3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporaryKick3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporaryKick3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporaryKick3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporaryKick4.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporaryKick4 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporarySnare1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporarySnare1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ t ~ ~] [~ ~ t ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporarySnare1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporarySnare1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ t ~ ~] [~ t ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporarySnare2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporarySnare2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporarySnare2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporarySnare2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ t ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporarySnare3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporarySnare3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ t ~ t]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ContemporarySnare3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ContemporarySnare3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/OneSevenFiveThirteen.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.OneSevenFiveThirteen where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UnconventionalSnare1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UnconventionalSnare1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UnconventionalSnare1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UnconventionalSnare1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UnconventionalSnare2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UnconventionalSnare2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UnconventionalSnare2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UnconventionalSnare2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UnconventionalSnare3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UnconventionalSnare3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UnconventionalSnare3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UnconventionalSnare3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UnconventionalSnare4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UnconventionalSnare4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ t ~] [~ t ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UnconventionalSnare4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UnconventionalSnare4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[t ~ ~ ~] [t ~ ~ ~] [~ t ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | 10 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/FourOnTheFloor.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.FourOnTheFloor where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Dnb1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Dnb1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ t t ~] [~ ~ ~ t]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Dnb1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Dnb1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ t] [t t t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Dnb2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Dnb2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t t]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Blues1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Blues1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t t t t] [t t t t] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t t] [t t t t] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Blues2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Blues2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ t] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 11 | sn = "[~ t t ~] [t t ~ t] [t ~ t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Bouton.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Bouton where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ t ~]" :: Pattern Bool 8 | rm = "[~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Break1.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Break1 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t t t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Break2.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Break2 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t t] [t ~ t ~] [~ ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HalfDrop.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HalfDrop where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HipHop.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HipHop where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ t t] [~ ~ ~ ~] [~ ~ t ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop6.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop6 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [~ ~ ~ t] [t ~ ~ t]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop7.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop7 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ t ~] [~ t ~ t]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop8.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop8 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ ~ ~] [t ~ t t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t t ~ t] [t ~ t t] [t t ~ t] [t ~ t t]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Jungle1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Jungle1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ t t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ t ~ ~] [t ~ ~ t] [~ t ~ ~] [~ ~ t ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t t]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/OneDrop.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.OneDrop where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Shuffle1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Shuffle1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t t ~ t] [t ~ t t] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ t] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Shuffle2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Shuffle2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ ~] [t ~ ~ t] " :: Pattern Bool 10 | ch = "[t ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ t t ~] [t t t t] [~ t t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Steppers.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Steppers where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Swing1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Swing1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [~ ~ t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Swing2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Swing2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t t t ~] [t t t ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ t] [~ ~ ~ t] [~ t t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Trap1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Trap1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/TwoDrop.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.TwoDrop where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/BootsNCats.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.BootsNCats where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll4.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll4 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ t] [t ~ ~ t] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 9 | cy = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll5.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll5 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ ~] [t ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/MiamiBass1.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.MiamiBass1 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/MiamiBass2.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.MiamiBass2 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ t ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Numbers1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Numbers1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | ch = "[t ~ t t] [t ~ t t] [t t t t] [t ~ t t] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Numbers1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Numbers1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | ch = "[t ~ t t] [t t ~ t] [t t t t] [t t ~ t] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Reggaeton.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Reggaeton where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ t] [~ ~ t ~] [~ ~ ~ t] [~ ~ t ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/SynthWave.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.SynthWave where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t t t t] [t t t t] [t t t t] [t t t t]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/DasModel1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.DasModel1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/DasModel1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.DasModel1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll13.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll13 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ ~ ~ ~] [~ ~ ~ ~] [~ t t t] [t ~ ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ t] [t t t t] [t ~ ~ ~] [~ t t ~] " :: Pattern Bool 9 | lt = "[t t t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll14.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll14 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ t ~ ~] [~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | lt = "[~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] " :: Pattern Bool 9 | sn = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll17.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll17 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [t ~ ~ ~] [t ~ t ~] [~ ~ t ~] " :: Pattern Bool 8 | sn = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 9 | cy = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll18.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll18 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [t ~ ~ ~] [t ~ t ~] [~ ~ t ~] " :: Pattern Bool 8 | sn = "[t t ~ ~] [~ ~ t t] [~ ~ ~ ~] [t t ~ ~] " :: Pattern Bool 9 | cy = "[~ ~ t ~] [t ~ ~ ~] [t ~ t ~] [~ ~ t ~] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RockThePlanet.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RockThePlanet where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t t] [t ~ t t] [t t ~ t] [t t t t]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RollinBreak.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RollinBreak where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Trap1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Trap1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | ch = "[[t t t] ~ t ~] [t ~ t ~] [t ~ t ~] [[t t t] ~ t ~]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/MusicNonStop1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.MusicNonStop1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t t ~ ~] [~ ~ t t] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | oh = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/SiberianNights.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.SiberianNights where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t]" :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Supersonic1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Supersonic1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Supersonic1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Supersonic1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/TransEuroExpress.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.TransEuroExpress where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t t ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | ch = "[t ~ t t] [t ~ ~ t] [t ~ t t] [t ~ ~ t] " :: Pattern Bool 10 | 11 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | rm = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | rm = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | rm = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro5b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro5b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | rm = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro5c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro5c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | sn = "[t ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro6a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro6a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | rm = "[~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/End1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.End1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | cy = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/End1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.End1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ t ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ t ~] [~ t ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t t t t] [~ ~ t ~] [t t t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t t t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk4c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk4c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 10 | ht = "[~ ~ ~ ~] [t t t t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | sn = "[t t t t] [~ ~ ~ ~] [t t t t] [t t ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk5b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk5b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ t ~] [~ t ~ ~] [t ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t t t ~] [t ~ t t] [t ~ t t] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk6c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk6c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t t] [~ ~ ~ ~] " :: Pattern Bool 10 | mt = "[~ ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [~ t t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk8a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk8a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ ~] [t ~ t t] [~ ~ ~ ~] " :: Pattern Bool 10 | oh = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk8b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk8b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ ~] [t ~ t t] [~ ~ ~ ~] " :: Pattern Bool 10 | oh = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ ~ ~] [t ~ t t] [~ t ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[t ~ ~ t] [~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t t] [~ t ~ ~] [t ~ t t] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ t t] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop5a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop5a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ t] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop5c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop5c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | oh = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ t t t] [t ~ t t] [t t t ~] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ t t] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ ~] [t ~ ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB1c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB1c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | lt = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | mt = "[~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | sn = "[t t ~ t] [~ t t t] [~ t ~ t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ t ~ t] [~ ~ t t] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ ~ t] [~ t t ~] [~ t ~ t] [~ t t ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ t ~ t] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t t] [~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ t t] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ t t] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ ~] [t ~ ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB5a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB5a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t t ~ t] [t ~ t ~] [t t ~ t] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ t ~] [~ ~ t ~] [~ ~ ~ t] [~ ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB5b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB5b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t t] [~ ~ ~ t] [t ~ t t] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ t ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock4c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock4c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ t] [t ~ ~ t] [t ~ ~ t] [t ~ ~ t] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock5a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock5a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock5b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock5b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t t ~ ~] [~ ~ ~ t] [t ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t t ~ ~] [~ ~ t t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad5b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad5b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t t ~ ~] [~ ~ ~ t] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/BigBeat.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.BigBeat where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ t ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | cp = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/BillyJean.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.BillyJean where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Bossa1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Bossa1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | rm = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Bossa1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Bossa1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | rm = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Bossa2c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Bossa2c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 11 | mt = "[~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco2c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco2c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ t] [t ~ t ~] [t ~ t ~] [t t t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[~ ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ t t] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk10a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk10a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t t] [~ t t t] [t t t t] [~ t t t] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk10b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk10b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ t ~] [~ t ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t t] [~ t t t] [t t t t] [~ t t t] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk13c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk13c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | mt = "[~ ~ ~ ~] [~ t t ~] [~ ~ ~ ~] [~ t ~ t] " :: Pattern Bool 11 | sn = "[~ ~ ~ t] [t ~ ~ ~] [~ t ~ t] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk14a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk14a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t t ~ ~] [~ ~ t t] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk14b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk14b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ ~] [t t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GrooveMe.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GrooveMe where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.9 8 | 9 | bd = "[t ~ ~ t] [t ~ ~ t] [t t ~ t] [~ t ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Hiphop.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Hiphop where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 0.666 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ t ~] [~ t ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Reggae1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Reggae1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 11 | rm = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ ~] [t ~ ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Reggae1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Reggae1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 11 | rm = "[~ ~ t t] [~ ~ t ~] [~ ~ t t] [~ ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Reggae3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Reggae3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t t t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Reggae3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Reggae3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [~ t t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Reggae5a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Reggae5a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t] " :: Pattern Bool 11 | rm = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Samba2c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Samba2c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | lt = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | mt = "[t ~ ~ t] [~ ~ t ~] [~ t ~ ~] [t ~ ~ t] " :: Pattern Bool 11 | sn = "[~ t t ~] [~ ~ ~ t] [t ~ ~ ~] [~ t t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Twist1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Twist1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Twist2c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Twist2c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | sn = "[~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GenericGahu.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GenericGahu where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | rm = "[~ ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ t t] " :: Pattern Bool 11 | ch = "[t ~ ~ t] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GenericRock.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GenericRock where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ ~ t ~] [t ~ t ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GenericSon.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GenericSon where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [t ~ ~ t] [t ~ ~ t] [t ~ ~ t] " :: Pattern Bool 10 | rm = "[t ~ ~ t] [~ ~ t ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 11 | oh = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ItsANewDay.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ItsANewDay where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.6 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ ~] [~ ~ t t] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/FunkyDrummer.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.FunkyDrummer where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.85 8 | 9 | bd = "[t ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ t] [t ~ ~ t] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GenericRumba.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GenericRumba where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [t ~ ~ t] [t ~ ~ t] [t ~ ~ t] " :: Pattern Bool 10 | rm = "[t ~ ~ t] [~ ~ ~ t] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 11 | oh = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GenericShiko.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GenericShiko where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ t ~] [t ~ ~ ~] [t ~ t ~] " :: Pattern Bool 10 | rm = "[~ ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ t t] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [t ~ t ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GenericSoukous.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GenericSoukous where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ t ~] " :: Pattern Bool 10 | rm = "[t ~ ~ t] [~ ~ t ~] [t ~ ~ t] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ ~ t] [~ ~ t ~] [~ t t ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Nico.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Nico where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 2.3333333333333335 8 | 9 | bd = "[t t ~ ~] [~ ~ ~ ~] [~ t t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | rm = "[~ ~ t t] [~ t t t] [t ~ ~ t] [~ t t t] " :: Pattern Bool 11 | ch = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Superstition.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Superstition where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.63 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t t] [t t t ~] [t ~ t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GenericBossaNova.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GenericBossaNova where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [t ~ ~ t] [t ~ ~ t] [t ~ ~ t] " :: Pattern Bool 10 | rm = "[t ~ ~ t] [~ ~ t ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 11 | oh = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ColdSweatOpening.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ColdSweatOpening where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.86 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~] [t ~ ~ t] " :: Pattern Bool 11 | oh = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/WhenTheLeveeBreaks.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.WhenTheLeveeBreaks where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t t ~ ~] [~ ~ ~ t] [~ ~ t t] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk15a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk15a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ t ~] [t ~ t ~] [t t ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/TheSameBlood.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.TheSameBlood where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 2.0166666666666666 8 | 9 | bd = "[t t ~ ~] [~ ~ ~ ~] [t t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ t] [~ t t ~] [~ ~ ~ ~] [t t t ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t t] [t ~ t t] [t ~ t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/TheTrillsGone.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.TheTrillsGone where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.5166666666666666 8 | 9 | bd = "[~ ~ ~ ~] [~ ~ ~ t] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[~ t ~ t] [~ t ~ t] [~ t ~ t] [~ t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Dnb3.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Dnb3 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t t t t] [t t t t] [t t t t] [t t t t]" :: Pattern Bool 10 | oh = "[~ ~ ~ ~] [~ ~ t t] [t t ~ ~] [~ ~ ~ ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Dnb4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Dnb4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t t]" :: Pattern Bool 10 | oh = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Dnb4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Dnb4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t t]" :: Pattern Bool 10 | oh = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Sally.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Sally where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | lt = "[t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/DeepHouse.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.DeepHouse where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | cl = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[~ t ~ ~] [~ ~ ~ t] [~ t ~ ~] [~ ~ ~ ~]" :: Pattern Bool 10 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Dubstep1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Dubstep1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | ch = "[~ t t ~] [~ ~ t ~] [~ ~ ~ t] [~ ~ t ~]" :: Pattern Bool 10 | oh = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Dubstep1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Dubstep1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | ch = "[~ t t ~] [~ ~ t ~] [~ ~ ~ t] [~ ~ t ~]" :: Pattern Bool 10 | oh = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Footwork1.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Footwork1 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ t ~] [t ~ ~ t] [~ ~ t ~]" :: Pattern Bool 8 | cl = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 10 | rm = "[t t t t] [t t t t] [t t t t] [t t t t]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Footwork2.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Footwork2 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ t ~] [t ~ ~ t] [~ ~ t ~]" :: Pattern Bool 8 | cl = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[~ ~ t ~] [~ ~ ~ t] [t ~ t ~] [~ ~ t ~]" :: Pattern Bool 10 | rm = "[t t t t] [t t t t] [t t t t] [t t t t]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/House1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.House1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t t t t] [t t t t] [t t t t] [t t t t]" :: Pattern Bool 10 | oh = "[~ ~ t ~] [~ t ~ ~] [~ ~ t ~] [~ t ~ ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Jungle1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Jungle1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ ~] [~ ~ t ~]" :: Pattern Bool 9 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t t]" :: Pattern Bool 10 | oh = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll6.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll6 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ t] [~ ~ t t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t t] [~ t ~ ~] " :: Pattern Bool 10 | sn = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll7.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll7 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ ~] [t ~ ~ ~] [t ~ t t] [~ ~ ~ ~] " :: Pattern Bool 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll8.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll8 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 10 | sn = "[t t ~ ~] [~ ~ t ~] [t t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll9.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll9 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ ~ t t] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ ~] [~ ~ t t] [~ ~ t t] [~ ~ ~ ~] " :: Pattern Bool 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[t t ~ ~] [t t ~ ~] [t t ~ ~] [t t ~ ~] " :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ageispolis.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ageispolis where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/BlueMonday1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.BlueMonday1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | cp = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll15.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll15 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 8 | sn = "[t t ~ ~] [~ ~ t t] [~ ~ ~ ~] [t t ~ ~] " :: Pattern Bool 9 | ch = "[~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | cy = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll16.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll16 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ ~ t t] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [t t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 9 | sn = "[t t ~ ~] [t ~ t t] [~ ~ t ~] [t t t t] " :: Pattern Bool 10 | cy = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UnknownDrummer.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UnknownDrummer where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ t ~ ~] [t ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[~ t t ~] [t t ~ t] [~ ~ ~ ~] [~ t ~ ~]" :: Pattern Bool 10 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Haus.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Haus where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern00.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern00 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern01.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern01 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern02.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern02 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern03.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern03 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern04.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern04 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern05.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern05 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern06.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern06 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern07.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern07 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern08.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern08 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern09.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern09 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern10.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern10 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern11.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern11 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern12.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern12 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern13.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern13 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern14.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern14 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern15.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern15 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern16.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern16 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern17.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern17 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern18.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern18 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern19.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern19 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern20.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern20 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern21.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern21 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern22.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern22 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern23.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern23 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern24.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern24 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern25.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern25 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern26.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern26 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern27.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern27 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern28.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern28 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern29.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern29 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern30.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern30 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern31.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern31 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern32.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern32 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern33.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern33 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern34.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern34 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern35.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern35 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern36.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern36 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern37.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern37 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern38.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern38 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern39.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern39 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern40.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern40 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern41.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern41 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern42.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern42 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern43.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern43 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern44.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern44 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern45.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern45 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern46.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern46 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern47.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern47 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern48.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern48 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern49.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern49 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern50.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern50 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern51.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern51 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern52.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern52 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern53.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern53 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern54.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern54 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern55.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern55 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern56.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern56 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern57.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern57 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern58.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern58 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern59.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern59 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern60.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern60 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern61.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern61 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern62.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern62 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pattern63.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pattern63 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ t t ~] [t t ~ t] [t ~ t t] [~ t t ~] [t t ~ t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 12 | rm = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Amen.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Amen where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 2.26 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ ~] [~ ~ t t] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ ~] [t ~ ~ t] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Bossa2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Bossa2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | cy = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | rm = "[~ ~ t ~] [~ t ~ ~] [t ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Bossa2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Bossa2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | cy = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | rm = "[~ ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t ~ t] [t t ~ t] [t ~ t t] [t t ~ t] " :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ t ~] [~ t ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | cb = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | cb = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ t t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t ~] [~ t t ~] [t t t ~] [~ t t ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ t] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t ~] [~ t t ~] [t t t ~] [~ t t ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco4c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco4c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t ~ ~] [~ t ~ ~] [~ t ~ ~] [~ t ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ t] [t ~ ~ t] [t ~ ~ t] [t ~ ~ t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco5a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco5a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t ~ ~] [~ t ~ t] [t t ~ ~] [~ t ~ t] " :: Pattern Bool 11 | oh = "[~ ~ t t] [~ ~ t ~] [~ ~ t t] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Disco5b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Disco5b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t ~] [~ t t t] [t t t t] [~ t t ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk10c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk10c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ t ~ ~] [~ t ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | bd = "[~ ~ ~ ~] [~ t ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[~ ~ ~ ~] [~ t ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[t t ~ t] [t ~ ~ t] [t ~ ~ ~] [t t t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk11a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk11a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ t] [~ ~ t ~] [t ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk11b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk11b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t t ~ ~] [~ ~ t ~] [t ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk11c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk11c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] " :: Pattern Bool 10 | ht = "[~ ~ ~ ~] [~ t t ~] [~ ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 11 | lt = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ t t] [t ~ ~ ~] [t t t ~] [~ ~ t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk12a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk12a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ t ~ t] [~ ~ ~ t] " :: Pattern Bool 10 | ch = "[t t t ~] [~ t t ~] [t ~ t ~] [~ t t ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ t] [~ ~ ~ t] [~ t ~ t] [~ ~ ~ t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk12b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk12b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t ~] [~ t t ~] [t t t ~] [~ t t ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk12c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk12c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t t t t] " :: Pattern Bool 10 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [t t t t] [~ ~ ~ ~] " :: Pattern Bool 11 | oh = "[t ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ t ~ t] [t t t t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk13a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk13a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t ~] [t t ~ ~] [t t t ~] [t t ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk13b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk13b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t t ~] [t t ~ ~] [t t t ~] [t t ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk14c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk14c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 10 | bd = "[~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 11 | ch = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 12 | sn = "[t ~ ~ t] [t ~ ~ ~] [t ~ t ~] [t t ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t t ~ ~] [~ ~ ~ t] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk1c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk1c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t t] " :: Pattern Bool 10 | bd = "[t ~ ~ t] [~ ~ t ~] [~ t ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ t] [~ ~ t ~] [~ t ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ t t ~] [t t ~ t] [t ~ t t] [~ ~ t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ t ~ t] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t t t ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ ~ ~ t] [~ t ~ t] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk2c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk2c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [t ~ t ~] [t ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [t ~ t ~] [t ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ t] [~ ~ ~ ~] [~ ~ t t] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk3c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk3c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ t t t] [t t t ~] [~ t t t] [t ~ t ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk5a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk5a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t t ~ ~] [~ ~ ~ t] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk5c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk5c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ t ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [~ t ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ht = "[~ ~ ~ ~] [~ ~ ~ ~] [t t t t] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t t t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk6a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk6a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [t t ~ ~] [~ ~ ~ ~] [t t ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ t] [~ ~ t ~] [t ~ ~ t] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t t ~ t] [~ ~ t ~] [t t ~ t] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ t ~] [t t ~ t] [~ ~ t ~] [t t ~ t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk7a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk7a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | ch = "[t t t ~] [~ t t ~] [t t t ~] [~ t t ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk7c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk7c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | bd = "[~ t ~ ~] [t ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[t ~ ~ t] [~ ~ ~ ~] [~ t ~ t] [t t t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk9a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk9a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ t] " :: Pattern Bool 10 | ch = "[~ ~ ~ ~] [t t t ~] [t t t ~] [t t t t] " :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk9b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk9b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t t] [~ t ~ t] [~ t ~ t] [~ t ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ t ~ t] [~ t ~ t] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Funk9c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Funk9c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ t] [~ t ~ ~] [~ t ~ t] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ t t ~] [t ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/GetUp.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.GetUp where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.98 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ t t] [~ t ~ ~] [t ~ ~ t] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [t ~ t t] [t ~ ~ ~] [t ~ t ~] " :: Pattern Bool 12 | oh = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Juke.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Juke where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 2.66 8 | 9 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | sn = "[t ~ t t] [~ t ~ t] [~ t t ~] [t ~ t ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | cp = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ t] [~ ~ ~ ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop2c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop2c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ t] [~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [t ~ t ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [t t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ t t] [~ ~ ~ ~] [~ ~ ~ ~] [t t t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop4c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop4c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ t] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ t ~] [t ~ ~ ~] [t ~ t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop5b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop5b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t t ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ t] [~ ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB2c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB2c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ ~ ~] " :: Pattern Bool 10 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [t t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | mt = "[~ ~ ~ ~] [t t ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[t t ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t t t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t ~ t] [t t ~ t] [t t ~ t] [t t ~ t] " :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB4c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB4c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[~ ~ ~ t] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | mt = "[~ ~ ~ ~] [~ ~ t t] [t ~ ~ ~] [t ~ t t] " :: Pattern Bool 12 | sn = "[~ t t ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ t ~ ~] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | ch = "[t t t t] [t t t ~] [t t t t] [t t t ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock3c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock3c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Rock5c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Rock5c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ t] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Samba1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Samba1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [t ~ ~ t] [t ~ ~ t] [t ~ ~ t] " :: Pattern Bool 10 | cb = "[t ~ t ~] [t t ~ t] [~ t t ~] [t t ~ t] " :: Pattern Bool 11 | ch = "[~ t ~ t] [~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Samba3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Samba3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ t] [t ~ ~ t] [t ~ ~ t] [t ~ ~ t] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Samba3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Samba3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ t] [t ~ ~ t] [t ~ ~ t] [t ~ ~ t] " :: Pattern Bool 11 | ch = "[~ t ~ t] [~ ~ t ~] [t ~ ~ t] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[t ~ t ~] [t t ~ t] [~ t t ~] [t t ~ t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ska1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ska1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ska1c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ska1c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | mt = "[~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[t ~ t t] [~ ~ ~ ~] [t ~ t ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Techno.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Techno where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Twist1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Twist1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Twist1c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Twist1c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ t ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | mt = "[~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t t t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Twist2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Twist2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [t ~ t ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Twist2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Twist2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t t ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad3c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad3c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t t ~ ~] [t t ~ ~] [t t ~ ~] " :: Pattern Bool 10 | ht = "[~ ~ ~ ~] [~ ~ t t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t t] [~ ~ ~ ~] " :: Pattern Bool 12 | sn = "[~ ~ t t] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad4a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad4a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ballad5a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ballad5a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ t] " :: Pattern Bool 10 | ch = "[t t t t] [t t t ~] [t t t t] [t t t ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 12 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/DubstepRatcheted.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.DubstepRatcheted where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ [~ t] [t t] ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ t]" :: Pattern Bool 9 | ch = "[~ t t ~] [~ ~ t ~] [~ ~ ~ t] [~ ~ t ~]" :: Pattern Bool 10 | oh = "[~ ~ [t t] [t t]] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 11 | 12 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Jungle.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Jungle where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 2.58 8 | 9 | bd = "[t ~ ~ ~] [~ t ~ ~] [t ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ t ~] [~ ~ t ~] [~ t ~ ~] [~ t ~ t] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | oh = "[~ ~ ~ t] [~ ~ t ~] [~ ~ ~ t] [~ ~ t ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Reggae2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Reggae2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[~ ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | rm = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Reggae2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Reggae2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[~ ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | rm = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Reggae5b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Reggae5b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t t ~ ~] [t t ~ ~] [t t ~ ~] [t t ~ ~] " :: Pattern Bool 11 | oh = "[~ ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ t t] " :: Pattern Bool 12 | rm = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ColdSweat.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ColdSweat where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.86 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [t ~ t ~] [t ~ ~ ~] [t ~ t ~] " :: Pattern Bool 12 | oh = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/CowdBell.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.CowdBell where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.56 8 | 9 | bd = "[t ~ ~ t] [~ ~ t t] [~ ~ t t] [~ t ~ t] " :: Pattern Bool 10 | sn = "[~ t ~ t] [t t ~ t] [~ t ~ t] [t t ~ t] " :: Pattern Bool 11 | ch = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t] " :: Pattern Bool 12 | cow = "[t ~ t t] [t ~ t t] [t ~ t t] [t ~ t t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HiphopAlt.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HiphopAlt where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 0.666 8 | 9 | bd = "[t ~ ~ ~] [t t ~ ~] [t ~ ~ ~] [t t ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | oh = "[~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/JungleAlt.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.JungleAlt where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 2.58 8 | 9 | bd = "[t ~ ~ ~] [~ t ~ ~] [t ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | oh = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/PapaWasToo.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.PapaWasToo where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ t ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[~ ~ ~ ~] [t ~ ~ ~] [t ~ t ~] [t ~ t t] " :: Pattern Bool 12 | lt = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/WalkThisWay.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.WalkThisWay where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[~ ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | oh = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/CissyStrutShort.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.CissyStrutShort where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.61 8 | 9 | bd = "[t ~ ~ t] [~ t ~ ~] [t t ~ t] [~ t ~ ~] " :: Pattern Bool 10 | sn = "[t t t ~] [t ~ t t] [~ t t ~] [t ~ t ~] " :: Pattern Bool 11 | ch = "[t t t ~] [t ~ t t] [~ t t ~] [t ~ t ~] " :: Pattern Bool 12 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/FunkyDrummerAlt.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.FunkyDrummerAlt where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.85 8 | 9 | bd = "[t ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ t] [~ t ~ t] [t ~ ~ t] " :: Pattern Bool 11 | ch = "[t t t t] [t t t ~] [t t t t] [t ~ t t] " :: Pattern Bool 12 | oh = "[~ ~ ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/FunkyPresident.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.FunkyPresident where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.75 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ t t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ ~ ~] [t ~ t ~] " :: Pattern Bool 12 | oh = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HaitianDivorce.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HaitianDivorce where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.23 8 | 9 | bd = "[~ ~ t ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ t ~ ~] [t ~ t t] [~ t ~ ~] [t ~ t t] " :: Pattern Bool 11 | ch = "[t t ~ ~] [t t t t] [t t ~ ~] [t t t t] " :: Pattern Bool 12 | oh = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Strbtsdcgogo100.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Strbtsdcgogo100 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.85 8 | 9 | bd = "[t ~ ~ t] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ t ~ ~] [t ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[~ t t ~] [t t ~ t] [~ ~ ~ ~] [~ t t ~] " :: Pattern Bool 12 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Swing3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Swing3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 10 | cy = "[t ~ ~ t] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 11 | mt = "[~ ~ ~ ~] [t t ~ ~] [~ ~ t t] " :: Pattern Bool 12 | oh = "[t ~ ~ t] [~ ~ t ~] [~ t ~ ~] " :: Pattern Bool 13 | sn = "[~ t t ~] [~ ~ ~ t] [t ~ ~ ~] " :: Pattern Bool 14 | 15 | 16 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ChugChugChugaLug.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ChugChugChugaLug where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.48 8 | 9 | bd = "[t ~ ~ t] [~ t ~ t] [~ t ~ t] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ t t ~] [t ~ ~ t] [~ t t ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t t t ~] [t t t ~] [t ~ ~ ~] " :: Pattern Bool 12 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ImpeachThePresident.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ImpeachThePresident where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t t] [t ~ ~ ~] [t ~ t ~] " :: Pattern Bool 12 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/KnocksOffMyFeet.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.KnocksOffMyFeet where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.5166666666666666 8 | 9 | bd = "[t ~ t ~] [t ~ ~ t] [t ~ t ~] [t ~ ~ t] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [~ ~ t t] [~ t ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | oh = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | 14 | 15 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/House1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.House1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t t t t] [t t t t] [t t t t] [t t t t]" :: Pattern Bool 10 | cy = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/NewWave.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.NewWave where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [t t ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t t t t] [t t t t] [t t t t] [t t t t]" :: Pattern Bool 10 | oh = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 11 | sh = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/BritHouse.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.BritHouse where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t t ~ t] [t t ~ t] [t t ~ t] [t t ~ t]" :: Pattern Bool 10 | cy = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/DirtyHouse.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.DirtyHouse where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [t ~ ~ ~] [t ~ t ~] [t ~ ~ t]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | cl = "[~ ~ t ~] [t ~ ~ ~] [t ~ t ~] [t ~ ~ ~]" :: Pattern Bool 10 | ch = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ t]" :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UkGarage1a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UkGarage1a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | cl = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[~ ~ t t] [~ ~ t ~] [~ ~ t ~] [~ ~ t t]" :: Pattern Bool 10 | rm = "[~ t ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [~ t ~ ~]" :: Pattern Bool 11 | mt = "[~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/UkGarage1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.UkGarage1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 8 | cl = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~]" :: Pattern Bool 10 | rm = "[~ t ~ ~] [~ ~ ~ t] [~ ~ ~ ~] [~ t ~ ~]" :: Pattern Bool 11 | mt = "[~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ t] [~ ~ ~ ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/DeeperHouse.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.DeeperHouse where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | cl = "[~ t ~ ~] [~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~]" :: Pattern Bool 9 | mt = "[~ ~ t ~] [~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~]" :: Pattern Bool 10 | sh = "[~ ~ ~ t] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t t] [~ ~ t ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll1.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll1 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ ~ ~ ~] [~ ~ ~ ~] [t t t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ t] [t t ~ ~] " :: Pattern Bool 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t t] " :: Pattern Bool 10 | oh = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | cy = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll10.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll10 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ t ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ ~] [t ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ t t] " :: Pattern Bool 10 | sn = "[t ~ ~ t] [~ ~ t ~] [~ t ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | bd = "[~ ~ t ~] [~ t ~ ~] [t ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Drumroll12.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Drumroll12 where 4 | 5 | import Sound.Tidal.Context 6 | 7 | ht = "[~ t ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | mt = "[~ ~ ~ ~] [~ t ~ ~] [~ t ~ ~] [~ ~ ~ ~] " :: Pattern Bool 9 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ t ~ ~] " :: Pattern Bool 10 | sn = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | bd = "[~ ~ t t] [~ ~ t t] [~ ~ t t] [~ ~ t t] " :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/FrenchHouse.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.FrenchHouse where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | ch = "[t t t t] [t t t t] [t t t t] [t t t t]" :: Pattern Bool 10 | sh = "[t t t ~] [t ~ t t] [t t t t] [t ~ t t]" :: Pattern Bool 11 | oh = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/BlueMonday2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.BlueMonday2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | cp = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ ~ t] [t ~ ~ t] [t ~ ~ t] [t ~ ~ t] " :: Pattern Bool 11 | oh = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/HotSweat.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.HotSweat where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.9 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ t t] [~ ~ ~ ~] [~ ~ t t] [~ ~ t ~] " :: Pattern Bool 10 | sn = "[~ ~ ~ ~] [t ~ ~ t] [t t ~ ~] [t ~ t t] [~ t ~ t] [t t ~ t] [~ t ~ t] [t t ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t t] [t ~ t ~] [t ~ t t] [t ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/SlowDeepHouse.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.SlowDeepHouse where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | sh = "[t t t t] [t t t t] [t t t t] [t t t t]" :: Pattern Bool 10 | ch = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 11 | oh = "[~ ~ t t] [~ ~ t t] [~ t t ~] [~ ~ t ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Supersonic2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Supersonic2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | cb = "[t ~ t t] [t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | rm = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Supersonic2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Supersonic2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ t ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 9 | cb = "[t ~ t t] [t ~ t ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | rm = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/TheFez.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.TheFez where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.65 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ t] [t ~ ~ ~] " :: Pattern Bool 10 | sn = "[~ t ~ t] [t t ~ t] [~ t ~ t] [t t ~ t] [~ t ~ t] [t t ~ t] [~ t ~ t] [t t ~ t] " :: Pattern Bool 11 | ch = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ t ~] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/MusicNonStop2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.MusicNonStop2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t t ~ ~] [~ ~ t t] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | rm = "[t t t ~] [~ t ~ ~] [t ~ ~ t] [~ t t ~] " :: Pattern Bool 10 | ch = "[~ t ~ t] [~ t ~ t] [~ t ~ t] [~ t ~ t] " :: Pattern Bool 11 | oh = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/MusicNonStop2b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.MusicNonStop2b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t t ~ ~] [~ ~ t t] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 9 | rm = "[t ~ t ~] [t t ~ ~] [t ~ ~ t] [~ t t t] " :: Pattern Bool 10 | ch = "[~ t ~ t] [~ t ~ t] [~ t ~ t] [~ t ~ t] " :: Pattern Bool 11 | oh = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/ComeDancing.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.ComeDancing where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1.6 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ t] [t ~ ~ ~] [~ ~ ~ t] [t ~ t ~] [~ t ~ t] [t ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | sn = "[~ t t ~] [t t t ~] [~ t t ~] [t t t ~] [~ t ~ ~] [t t ~ ~] [~ t ~ ~] [t t t ~] " :: Pattern Bool 11 | ch = "[t t t t] [t t t t] [t t t t] [t t t t] [t t t t] [t t t t] [t t t t] [t t t t] " :: Pattern Bool 12 | 13 | 14 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/MoreBounceToTheOunce.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.MoreBounceToTheOunce where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t t ~ ~] [~ ~ ~ ~]" :: Pattern Bool 8 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 9 | cy = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~]" :: Pattern Bool 10 | ch = "[~ ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ t ~]" :: Pattern Bool 11 | oh = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~]" :: Pattern Bool 12 | 13 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Pop1c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Pop1c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 12 | lt = "[~ ~ t ~] [t ~ t ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | sn = "[~ ~ t ~] [t ~ t ~] [t ~ t t] [t ~ ~ ~] " :: Pattern Bool 14 | 15 | 16 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB3c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB3c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ t] " :: Pattern Bool 10 | ch = "[t ~ ~ t] [t ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 11 | ht = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t t ~ ~] " :: Pattern Bool 12 | lt = "[~ ~ ~ ~] [~ t ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | sn = "[~ ~ t ~] [~ ~ ~ ~] [t ~ t t] [~ ~ t ~] " :: Pattern Bool 14 | 15 | 16 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/RNB5c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.RNB5c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ t] [~ ~ ~ t] [~ ~ ~ t] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [t t t ~] [~ ~ ~ ~] " :: Pattern Bool 12 | mt = "[~ ~ ~ ~] [t t t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 13 | sn = "[~ t t ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 14 | 15 | 16 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Ska1b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Ska1b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[~ ~ t ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ t ~] [t ~ t ~] [t ~ t ~] [t ~ ~ ~] " :: Pattern Bool 12 | oh = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 13 | sn = "[~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 14 | 15 | 16 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro2a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro2a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 12 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | rm = "[~ ~ ~ t] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 14 | 15 | 16 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro3a.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro3a where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | mt = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | rm = "[~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 14 | 15 | 16 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro3b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro3b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [t ~ t ~] " :: Pattern Bool 12 | mt = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | sn = "[~ ~ ~ t] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 14 | 15 | 16 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro3c.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro3c where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | ac = "[t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] [t ~ ~ ~] " :: Pattern Bool 10 | bd = "[t ~ ~ ~] [t ~ t ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 11 | ch = "[t ~ ~ ~] [t ~ t ~] [~ ~ t ~] [t ~ ~ ~] " :: Pattern Bool 12 | mt = "[~ ~ t t] [~ ~ ~ ~] [t t ~ ~] [~ ~ t t] " :: Pattern Bool 13 | sn = "[~ t ~ ~] [~ t ~ t] [~ ~ ~ t] [~ t ~ ~] " :: Pattern Bool 14 | 15 | 16 | -------------------------------------------------------------------------------- /Sound/Tidal/Drum/Afro4b.hs: -------------------------------------------------------------------------------- 1 | {-# LANGUAGE OverloadedStrings #-} 2 | 3 | module Sound.Tidal.Drum.Afro4b where 4 | 5 | import Sound.Tidal.Context 6 | 7 | bps = 1 8 | 9 | bd = "[t ~ ~ ~] [~ ~ ~ ~] [t ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 10 | ch = "[t ~ t t] [t ~ t ~] [t ~ t ~] [t ~ t ~] " :: Pattern Bool 11 | lt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] " :: Pattern Bool 12 | mt = "[~ ~ ~ ~] [~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] " :: Pattern Bool 13 | rm = "[~ ~ ~ ~] [~ ~ t ~] [~ ~ ~ ~] [~ ~ ~ ~] " :: Pattern Bool 14 | 15 | 16 | --------------------------------------------------------------------------------