1-- classic quick sort (short but not so efficient)
2qsort [] = []
3qsort (x:xs) = qsort [ x' | x' <- xs, x' < x ] ++ [x] ++ qsort [ x' | x' <- xs, x' >= x ]
4
5-- weird but legal identifiers
6x'y' = let f' = 1; g'h = 2 in f' + g'h
7