JoyCog

The qsort1 definition was wrong, hence the comment about the wrong
result. I'd forgot that `swap23` mentioned here:

http://www.kevinalbrecht.com/code/joy-mirror/j06prg.html

isn't just `swap`, but rather `[swap] dip`. However, before I realised
that I wondered if the nested gear pairs was the issue and decided to
build up a flatter list. I.e. [ [ 4.16667 12 50] ... ] as opposed to
[ [ 4.16667 [12 50] ] ... ]. I think I prefer this approach anyway as
rather than build up a list of ratios, then a list of pairs and then zip
these together, can build up two lists of triples and just concat these. check-in: 4535761621 user: base@atomicules.co.uk tags: origin/master, trunk