20 lines
360 B
Clojure
20 lines
360 B
Clojure
(ns serialise
|
|
(:require [clj-cbor.core :as cbor]
|
|
[clojure.string :as str]))
|
|
|
|
(defn w [x]
|
|
(cbor/encode cbor/default-codec System/out x))
|
|
|
|
(defn c [x]
|
|
(->> x cbor/encode (map #(format "%02x" %)) (str/join " ")))
|
|
|
|
#_
|
|
(w "\\naturalto")
|
|
|
|
(w "\\ifxetex blah \\fi")
|
|
|
|
#_#_#_
|
|
(w "c = \\sqrt{a^2 + y^2}")
|
|
(w "c = \\sqrt{a^ + y^2")
|
|
(w "\\alpha^\\beta")
|