(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"))