advent-2025/p6/p6.org

Solution to p6

First load the data as a list of cons cells (start . end)

  (with-temp-buffer
    (insert-file-contents "input")
    (advent/replace-multiple-regex-buffer
     '(
       ("^" . "(")
       ("$" . ")")
       ))
    (goto-char (point-min))
    (insert "(setq data '(")
    (goto-char (point-max))
    (insert "))")
    (eval-buffer))

This is for part 1. Quite straightforward

  (-sum (--map (apply (car it) (cdr it))
  	     (apply #'-zip-lists (-rotate 1 data))))