(in-package #:fwoar.lisputils)

(defun pick (keys h-t)
  (mapcar (plambda:plambda (gethash :1 h-t))
          keys))