I wrote two tracks completely with Haskell.
You can listen to them on the soundcloud:

https://soundcloud.com/anton-kho/celtic

https://soundcloud.com/anton-kho/invisible-ocean

The music is based on samples but
a single track uses no more than 6 samples.
The code is under 100 lines of code.
I'm using my libs csound-sampler and csound-expression.

You can check out the source code at:

http://ge.tt/3MjwF852/v/0

Please turn off the AdBlock for this page to download the code.

Happy haskelling!
Anton