exupero

exupero

#!/usr/bin/env bb

(ns stack-math
  (:require [clojure.string :as str]
            [clojure.core.match :refer [match]]
            [clojure.tools.cli :as cli]))

(defn parse-stack [s]
  (read-string (format "[%s]" s)))

exupero

#!/usr/bin/env bb

(require '[babashka.deps :as deps])
(deps/add-deps '{:deps {org.clojars.askonomm/ruuter {:mvn/version "1.3.2"}}})

(require '[clojure.java.browse :as browse]
         '[clojure.string :as str]
         '[cheshire.core :as json]
         '[org.httpkit.server :as srv]
         '[ruuter.core :as ruuter]

exupero

#!/usr/bin/env bb

(ns server
  (:require [clojure.string :as string]
            [clojure.java.browse :as browse]
            [clojure.tools.cli :refer [parse-opts]]
            [babashka.fs :as fs]
            [org.httpkit.server :as server])
  (:import [java.net URLDecoder]
           [java.time Instant]))

exupero

Traced from this image of crustal age and assuming an equirectangular projection.

I've imagined a connection between where the ridge disappears under Alaska and where it emerges from eastern Siberia.

If you know where I can find proper geographical coordinates for the mid-oceanic ridge, please leave a comment.

exupero

• Orange roads use "County Line" names
• Red roads use hyphenated names
• Blue roads use portmanteaus

exupero

GeoJSON of the Michigan Big Tree Register, data from this Google Sheet.

exupero

package squij;

import clojure.lang.*;
import com.intellij.openapi.actionSystem.AnAction;
import com.intellij.openapi.actionSystem.AnActionEvent;
import com.intellij.openapi.project.Project;
import com.intellij.openapi.ui.Messages;
import org.apache.log4j.Logger;
import org.jetbrains.annotations.NotNull;

exupero

(ns exupero.advent-of-code.2018
  (:require [clojure.string :as string]
            [clojure.set :refer [intersection rename-keys map-invert]]
            [clojure.zip :as zip]
            [net.cgrand.xforms :as xf]))

(def parse-int #(Integer/parseInt %))

; Day 1, puzzle 1
(def input-1 (map parse-int (string/split-lines (slurp "./resources/advent-of-code/2018/day-1-input.txt"))))

exupero

; Constructing a physical building is, ideally, a linear process, but in reality there can be twists
; and turns and backtracking to previous steps. Here's a state machine that models a simple,
; hypothetical construction process:

(def construction-process
  {:concept {:revised-concept :concept
             :township-approved :township-permission
             :township-rejected :terminated}
   :township-permission {:blueprints-delivered :blueprints}
   :blueprints {:code-violations :blueprints-in-revision