lagenorhynque

#!/usr/bin/env bb
(ns github-graphql-api-client
  (:require
   [babashka.curl :as curl]
   [cheshire.core :as cheshire]
   [clojure.pprint :refer [pprint]]))

(def auth-token (System/getenv "AUTH_TOKEN"))

(def graphql-query

lagenorhynque

#!/usr/bin/env bash

# npm install -g reveal-md

reveal-md the-world-of-labour-law.md --theme night --highlight-theme monokai-sublime -w "$@"

lagenorhynque

Clojureで作る"simple"なDSL

---

lagénorhynque

(defprofile lagénorhynque
  :id           @lagenorhynque
 :reading "/laʒenɔʁɛ̃k/"

lagenorhynque

lagenorhynque

GraphQL入門

---

lagénorhynque

(defprofile lagénorhynque
  :id           @lagenorhynque
 :reading "/laʒenɔʁɛ̃k/"

lagenorhynque

dev> (require '[clojure.spec.alpha :as s]
              '[clojure.spec.test.alpha :as stest])
nil
dev> (defn twice [f x]
       (f (f x)))
#'dev/twice
dev> (s/fdef twice
       :args (s/cat :f (s/fspec :args (s/tuple integer?)
                                :ret integer?)
                    :x integer?)

lagenorhynque

> fizzBuzz = map (\(f, b, n) -> maybe "" id f ++ maybe "" id b ++ (if null f && null b then show n else "")) $ zip3 (cycle [Nothing, Nothing, Just "Fizz"]) (cycle [Nothing, Nothing, Nothing, Nothing, Just "Buzz"]) [1..]
fizzBuzz :: [[Char]]
[Prelude]
> take 30 fizzBuzz
["1","2","Fizz","4","Buzz","Fizz","7","8","Fizz","Buzz","11","Fizz","13","14","FizzBuzz","16","17","Fizz","19","Buzz","Fizz","22","23","Fizz","Buzz","26","Fizz","28","29","FizzBuzz"]
it :: [[Char]]
[Prelude]
> import Data.Maybe
[Prelude Data.Maybe]
> fizzBuzz' = map (\(f, b, n) -> fromMaybe "" f ++ fromMaybe "" b ++ (if null f && null b then show n else "")) $ zip3 (cycle [Nothing, Nothing, Just "Fizz"]) (cycle [Nothing, Nothing, Nothing, Nothing, Just "Buzz"]) [1..]

lagenorhynque

Everyday Life

with clojure.spec

---

lagénorhynque

(defprofile lagénorhynque

lagenorhynque

たのしい多言語学習

実例とともに言語学の基礎知識を学ぼう

---

lagénorhynque

(defprofile lagénorhynque

lagenorhynque

$ scala
Welcome to Scala 2.13.1 (OpenJDK 64-Bit Server VM, Java 14).
Type in expressions for evaluation. Or try :help.

scala> case class Point(x: Int, y: Int) {
     |   def +(other: Point): Point = Point(this.x + other.x, this.y + other.y)
     | }
defined class Point

scala> val p1 = Point(1, 2)