かってきままな日々

_ Codeium で elisp 書いてみた

(defun even (lst)
  (when lst
    (let ((elt (car lst))
	  (rest (cdr lst)))
      (if (is-even elt)
	  (cons elt (even rest))
	(even rest)))))

(defun is-even (elt)
  (= 0 (mod elt 2)))

(even '(1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20))
(2 4 6 8 10 12 14 16 18 20)

is-even とかいうのは補完で書くと一瞬だけど、 even はあんまり便利ではなかったなぁ。 (elt (car lst)) を書くと (rest (cdr lst)) を補完してくれたのは、 まぁ良かったけど。

_ 原神 - 幻想シアター

氷キャラをあんまり持ってないことに気づいた…