├── .gitignore ├── CHANGES ├── LICENSE ├── README.md ├── Setup.hs ├── Sound └── Tidal │ └── Drum │ ├── Afro1a.hs │ ├── Afro1b.hs │ ├── Afro1c.hs │ ├── Afro2a.hs │ ├── Afro2b.hs │ ├── Afro2c.hs │ ├── Afro3a.hs │ ├── Afro3b.hs │ ├── Afro3c.hs │ ├── Afro4a.hs │ ├── Afro4b.hs │ ├── Afro4c.hs │ ├── Afro5a.hs │ ├── Afro5b.hs │ ├── Afro5c.hs │ ├── Afro6a.hs │ ├── Afro6b.hs │ ├── Afro6c.hs │ ├── Ageispolis.hs │ ├── All.hs │ ├── Amen.hs │ ├── AmenBrother.hs │ ├── AshleysRoachClip.hs │ ├── Autobahn1a.hs │ ├── Autobahn1b.hs │ ├── Ballad1a.hs │ ├── Ballad1b.hs │ ├── Ballad1c.hs │ ├── Ballad2a.hs │ ├── Ballad2b.hs │ ├── Ballad2c.hs │ ├── Ballad3a.hs │ ├── Ballad3b.hs │ ├── Ballad3c.hs │ ├── Ballad4a.hs │ ├── Ballad4b.hs │ ├── Ballad4c.hs │ ├── Ballad5a.hs │ ├── Ballad5b.hs │ ├── Ballad5c.hs │ ├── BigBeat.hs │ ├── BillyJean.hs │ ├── BlueMonday1a.hs │ ├── BlueMonday2a.hs │ ├── Blues1a.hs │ ├── Blues2a.hs │ ├── BookOfMoses.hs │ ├── BootsNCats.hs │ ├── Bossa1a.hs │ ├── Bossa1b.hs │ ├── Bossa1c.hs │ ├── Bossa2a.hs │ ├── Bossa2b.hs │ ├── Bossa2c.hs │ ├── Bouton.hs │ ├── Break1.hs │ ├── Break2.hs │ ├── Breakbeat1.hs │ ├── Breakbeat2.hs │ ├── Breakbeat3.hs │ ├── BritHouse.hs │ ├── ChaChaCha1a.hs │ ├── ChaChaCha1b.hs │ ├── ChaChaCha1c.hs │ ├── ChugChugChugaLug.hs │ ├── CissyStrutLong.hs │ ├── CissyStrutShort.hs │ ├── ColdSweat.hs │ ├── ColdSweatOpening.hs │ ├── ComeDancing.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 │ ├── CowdBell.hs │ ├── DasModel1a.hs │ ├── DasModel1b.hs │ ├── DeepHouse.hs │ ├── DeeperHouse.hs │ ├── DirtyHouse.hs │ ├── Disco1a.hs │ ├── Disco1b.hs │ ├── Disco1c.hs │ ├── Disco2a.hs │ ├── Disco2b.hs │ ├── Disco2c.hs │ ├── Disco3a.hs │ ├── Disco3b.hs │ ├── Disco3c.hs │ ├── Disco4a.hs │ ├── Disco4b.hs │ ├── Disco4c.hs │ ├── Disco5a.hs │ ├── Disco5b.hs │ ├── Disco5c.hs │ ├── Dnb1a.hs │ ├── Dnb1b.hs │ ├── Dnb2a.hs │ ├── Dnb3.hs │ ├── Dnb4a.hs │ ├── Dnb4b.hs │ ├── Drumroll1.hs │ ├── Drumroll10.hs │ ├── Drumroll11.hs │ ├── Drumroll12.hs │ ├── Drumroll13.hs │ ├── Drumroll14.hs │ ├── Drumroll15.hs │ ├── Drumroll16.hs │ ├── Drumroll17.hs │ ├── Drumroll18.hs │ ├── Drumroll19.hs │ ├── Drumroll2.hs │ ├── Drumroll3.hs │ ├── Drumroll4.hs │ ├── Drumroll5.hs │ ├── Drumroll6.hs │ ├── Drumroll7.hs │ ├── Drumroll8.hs │ ├── Drumroll9.hs │ ├── Dubstep1a.hs │ ├── Dubstep1b.hs │ ├── DubstepRatcheted.hs │ ├── Electro1a.hs │ ├── Electro1b.hs │ ├── Electro2a.hs │ ├── Electro2b.hs │ ├── Electro3a.hs │ ├── Electro3b.hs │ ├── End1a.hs │ ├── End1b.hs │ ├── ExpensiveShit.hs │ ├── ExpressYourself.hs │ ├── Footwork1.hs │ ├── Footwork2.hs │ ├── FourOnTheFloor.hs │ ├── FrenchHouse.hs │ ├── Funk10a.hs │ ├── Funk10b.hs │ ├── Funk10c.hs │ ├── Funk11a.hs │ ├── Funk11b.hs │ ├── Funk11c.hs │ ├── Funk12a.hs │ ├── Funk12b.hs │ ├── Funk12c.hs │ ├── Funk13a.hs │ ├── Funk13b.hs │ ├── Funk13c.hs │ ├── Funk14a.hs │ ├── Funk14b.hs │ ├── Funk14c.hs │ ├── Funk15a.hs │ ├── Funk1a.hs │ ├── Funk1b.hs │ ├── Funk1c.hs │ ├── Funk2a.hs │ ├── Funk2b.hs │ ├── Funk2c.hs │ ├── Funk3a.hs │ ├── Funk3b.hs │ ├── Funk3c.hs │ ├── Funk4a.hs │ ├── Funk4b.hs │ ├── Funk4c.hs │ ├── Funk5a.hs │ ├── Funk5b.hs │ ├── Funk5c.hs │ ├── Funk6a.hs │ ├── Funk6b.hs │ ├── Funk6c.hs │ ├── Funk7a.hs │ ├── Funk7b.hs │ ├── Funk7c.hs │ ├── Funk8a.hs │ ├── Funk8b.hs │ ├── Funk8c.hs │ ├── Funk9a.hs │ ├── Funk9b.hs │ ├── Funk9c.hs │ ├── FunkyDrummer.hs │ ├── FunkyDrummerAlt.hs │ ├── FunkyPresident.hs │ ├── GenericBossaNova.hs │ ├── GenericGahu.hs │ ├── GenericRock.hs │ ├── GenericRumba.hs │ ├── GenericShiko.hs │ ├── GenericSon.hs │ ├── GenericSoukous.hs │ ├── GetUp.hs │ ├── GhostSnare1a.hs │ ├── GhostSnare1b.hs │ ├── GhostSnare2a.hs │ ├── GhostSnare2b.hs │ ├── GoodToGo.hs │ ├── GrooveMe.hs │ ├── HaitianDivorce.hs │ ├── HalfDrop.hs │ ├── Haus.hs │ ├── HipHop.hs │ ├── Hiphop.hs │ ├── Hiphop1a.hs │ ├── Hiphop1b.hs │ ├── Hiphop1c.hs │ ├── Hiphop2a.hs │ ├── Hiphop2b.hs │ ├── Hiphop3a.hs │ ├── Hiphop3b.hs │ ├── Hiphop4a.hs │ ├── Hiphop4b.hs │ ├── Hiphop5.hs │ ├── Hiphop6.hs │ ├── Hiphop7.hs │ ├── Hiphop8.hs │ ├── HiphopAlt.hs │ ├── HookAndSling.hs │ ├── HotSweat.hs │ ├── House1a.hs │ ├── House1b.hs │ ├── HybridKick1a.hs │ ├── HybridKick1b.hs │ ├── HybridKick1c.hs │ ├── HybridKick1d.hs │ ├── HybridKick1e.hs │ ├── HybridKick1f.hs │ ├── HybridKick1g.hs │ ├── HybridKick2a.hs │ ├── HybridKick2b.hs │ ├── HybridKick3a.hs │ ├── HybridKick3b.hs │ ├── IGotTheFeelin.hs │ ├── IGotYou.hs │ ├── ImpeachThePresident.hs │ ├── Irregular1a.hs │ ├── Irregular1b.hs │ ├── Irregular2a.hs │ ├── Irregular2b.hs │ ├── Irregular3.hs │ ├── ItaloDisco1a.hs │ ├── ItaloDisco1b.hs │ ├── ItsANewDay.hs │ ├── Juke.hs │ ├── Jungle.hs │ ├── Jungle1a.hs │ ├── Jungle1b.hs │ ├── JungleAlt.hs │ ├── Kick.hs │ ├── KissingMyLove.hs │ ├── KnocksOffMyFeet.hs │ ├── Lady.hs │ ├── LadyMarmalade.hs │ ├── LetAWomanBeAWomanLetAManBeAMan.hs │ ├── LookingForThePerfectBeat1a.hs │ ├── LookingForThePerfectBeat1b.hs │ ├── Lookkapypy.hs │ ├── MiamiBass1.hs │ ├── MiamiBass2.hs │ ├── MoreBounceToTheOunce.hs │ ├── MotherPopcorn.hs │ ├── MusicNonStop1a.hs │ ├── MusicNonStop2a.hs │ ├── MusicNonStop2b.hs │ ├── NewWave.hs │ ├── Nico.hs │ ├── Numbers1a.hs │ ├── Numbers1b.hs │ ├── OneDrop.hs │ ├── OneSevenFiveThirteen.hs │ ├── OohChild.hs │ ├── PalmGrease.hs │ ├── PapaWasToo.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 │ ├── PlanetRock.hs │ ├── Poly1a.hs │ ├── Poly1b.hs │ ├── Pop1a.hs │ ├── Pop1b.hs │ ├── Pop1c.hs │ ├── Pop2a.hs │ ├── Pop2b.hs │ ├── Pop2c.hs │ ├── Pop3a.hs │ ├── Pop3b.hs │ ├── Pop3c.hs │ ├── Pop4a.hs │ ├── Pop4b.hs │ ├── Pop4c.hs │ ├── Pop5a.hs │ ├── Pop5b.hs │ ├── Pop5c.hs │ ├── Poptech2010.hs │ ├── RNB1a.hs │ ├── RNB1b.hs │ ├── RNB1c.hs │ ├── RNB2a.hs │ ├── RNB2b.hs │ ├── RNB2c.hs │ ├── RNB3a.hs │ ├── RNB3b.hs │ ├── RNB3c.hs │ ├── RNB4a.hs │ ├── RNB4b.hs │ ├── RNB4c.hs │ ├── RNB5a.hs │ ├── RNB5b.hs │ ├── RNB5c.hs │ ├── Reggae1a.hs │ ├── Reggae1b.hs │ ├── Reggae1c.hs │ ├── Reggae2a.hs │ ├── Reggae2b.hs │ ├── Reggae2c.hs │ ├── Reggae3a.hs │ ├── Reggae3b.hs │ ├── Reggae3c.hs │ ├── Reggae4a.hs │ ├── Reggae5a.hs │ ├── Reggae5b.hs │ ├── Reggae5c.hs │ ├── Reggaeton.hs │ ├── RespectYourself.hs │ ├── Rock1a.hs │ ├── Rock1b.hs │ ├── Rock1c.hs │ ├── Rock2a.hs │ ├── Rock2b.hs │ ├── Rock2c.hs │ ├── Rock3a.hs │ ├── Rock3b.hs │ ├── Rock3c.hs │ ├── Rock4a.hs │ ├── Rock4b.hs │ ├── Rock4c.hs │ ├── Rock5a.hs │ ├── Rock5b.hs │ ├── Rock5c.hs │ ├── RockSteady.hs │ ├── RockThePlanet.hs │ ├── RollinBreak.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 │ ├── Sally.hs │ ├── Samba1a.hs │ ├── Samba1b.hs │ ├── Samba1c.hs │ ├── Samba2a.hs │ ├── Samba2b.hs │ ├── Samba2c.hs │ ├── Samba3a.hs │ ├── Samba3b.hs │ ├── Samba3c.hs │ ├── Shuffle1a.hs │ ├── Shuffle2a.hs │ ├── SiberianNights.hs │ ├── Ska1a.hs │ ├── Ska1b.hs │ ├── Ska1c.hs │ ├── SlowDeepHouse.hs │ ├── Steppers.hs │ ├── Strbtsdcgogo100.hs │ ├── Supersonic1a.hs │ ├── Supersonic1b.hs │ ├── Supersonic2a.hs │ ├── Supersonic2b.hs │ ├── Superstition.hs │ ├── Swing1a.hs │ ├── Swing2a.hs │ ├── Swing3a.hs │ ├── SynthWave.hs │ ├── SynthethicSubstitution.hs │ ├── TakeMeToMardiGras.hs │ ├── TakeMeToMardiGrasAlt.hs │ ├── Techno.hs │ ├── TheFez.hs │ ├── TheSameBlood.hs │ ├── TheTrillsGone.hs │ ├── TinyHouse.hs │ ├── TransEuroExpress.hs │ ├── Trap1a.hs │ ├── Trap1b.hs │ ├── Twist1a.hs │ ├── Twist1b.hs │ ├── Twist1c.hs │ ├── Twist2a.hs │ ├── Twist2b.hs │ ├── Twist2c.hs │ ├── TwoDrop.hs │ ├── UkGarage1a.hs │ ├── UkGarage1b.hs │ ├── UnconventionalSnare1a.hs │ ├── UnconventionalSnare1b.hs │ ├── UnconventionalSnare2a.hs │ ├── UnconventionalSnare2b.hs │ ├── UnconventionalSnare3a.hs │ ├── UnconventionalSnare3b.hs │ ├── UnconventionalSnare4a.hs │ ├── UnconventionalSnare4b.hs │ ├── UnknownDrummer.hs │ ├── UseMe.hs │ ├── UseMeAlt.hs │ ├── WalkThisWay.hs │ ├── WeWillRockYou.hs │ ├── WhenTheLeveeBreaks.hs │ └── YaMama.hs └── tidal-drum-patterns.cabal /.gitignore: -------------------------------------------------------------------------------- 1 | dist 2 | *~ 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 | -------------------------------------------------------------------------------- /Setup.hs: -------------------------------------------------------------------------------- 1 | import Distribution.Simple 2 | main = defaultMain 3 | -------------------------------------------------------------------------------- /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/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/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/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/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/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 | -------------------------------------------------------------------------------- /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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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/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 | --------------------------------------------------------------------------------