5HXAVDJYG7ZJD6BVEVHKO347YEUG5S4VVX77NPJO3NGEHOFJYSJQC
RCFSPU4YZQKLP33VGHRJMHXBX5LFTPGO6WTONJOW2N4EQHYKH6IQC
RXCY7LD6ZRIOIKZEYKLMCYPMQPXF4DOEEFBDLVR2B22BXLZJFFBQC
A3TVGLVHSVLMEHLHB3TPBSD3QGNVGX3DIK6BEBDTTHWBNW4ALMRAC
ZYEHQDDB635RZOU4YDJYS5SPJ6BBZEWGSYLNABXRTW5OA4AXU7LQC
GRCF6BNCM4CIRVMRQFB6CLABMJO3S3LPLV4PKZQLLDB2YDTCA7QAC
(fwoar/def-ns-fun keys (key &rest keys) (lambda (map) (loop for key in (cons key keys) for value = (fwoar/extract-key map key) finally (return value))))
(fwoar/def-ns-fun keys (key &rest keys)
(lambda (map)
(loop for key in (cons key keys)
for value = (fwoar/extract-key map key)
finally (return value))))
(cl-remove-if pred seq)))
(cl-remove-if-not pred seq)))