An implementation of 'See-N-Say