A simple implementation in PLT Racket:

I find Lisp aesthetically pleasing. There’s something attractive about its rounded edges, simple names and fluid form; this then is made even more appealing knowing that taking such a shape can be a useful tool.