doerg/doerg-tex/serialise.clj

@@ -1,7 +1,6 @@
 (ns serialise
   (:require [clj-cbor.core :as cbor]
-            [clojure.string :as str])
-  (:gen-class))
+            [clojure.string :as str]))
 
 (defn w [x]
   (cbor/encode cbor/default-codec System/out x))
@@ -12,13 +11,9 @@
 #_
 (w "\\naturalto")
 
-(defn -main []
-  (w "\\begin{align*}
-x &= y
-\\\\ &= zzz
-\\end{align*}")
+(w "\\ifxetex blah \\fi")
 
-  #_#_#_
-  (w "c = \\sqrt{a^2 + y^2}")
-  (w "c = \\sqrt{a^ + y^2")
-  (w "\\alpha^\\beta"))
+#_#_#_
+(w "c = \\sqrt{a^2 + y^2}")
+(w "c = \\sqrt{a^ + y^2")
+(w "\\alpha^\\beta")