rebol[]prin pick[362880 59049 34](length? input)** .4