quicksort with Cont monad
either: pics and mejora