Evaluated proc shuffle_helper args {expr int(rand()*3)-1}