( DPICK       copies the n-th number onto the top of the stack )

need pick
: dpick                           ( n --- d )
  2 *                             ( leave index to hi 16 bits)
  dup 1+                          ( leave index to lo 16 bits)
  pick                            ( copy lo 16 bits to top)
  swap pick                       ( copy hi 16 bits to top)
;