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