25 lines
430 B
Clojure
25 lines
430 B
Clojure
(ns serialise
|
|
(:require [clj-cbor.core :as cbor]
|
|
[clojure.string :as str])
|
|
(:gen-class))
|
|
|
|
(defn w [x]
|
|
(cbor/encode cbor/default-codec System/out x))
|
|
|
|
(defn c [x]
|
|
(->> x cbor/encode (map #(format "%02x" %)) (str/join " ")))
|
|
|
|
#_
|
|
(w "\\naturalto")
|
|
|
|
(defn -main []
|
|
(w "\\begin{align*}
|
|
x &= y
|
|
\\\\ &= zzz
|
|
\\end{align*}")
|
|
|
|
#_#_#_
|
|
(w "c = \\sqrt{a^2 + y^2}")
|
|
(w "c = \\sqrt{a^ + y^2")
|
|
(w "\\alpha^\\beta"))
|