Justfor the records: I updated the version at http://rosettacode.org/wiki/Knuth%27s_algorithm_S#Racket -- Manfred