From 28871579687690d83b69203fa160e213a3e40003 Mon Sep 17 00:00:00 2001
From: Sébastien Dailly <sebastien@dailly.me>
Date: Mon, 24 Apr 2023 17:17:55 +0200
Subject: Update

---
 src/lib/repr/tengwar.mli | 73 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 73 insertions(+)
 create mode 100644 src/lib/repr/tengwar.mli

(limited to 'src/lib/repr/tengwar.mli')

diff --git a/src/lib/repr/tengwar.mli b/src/lib/repr/tengwar.mli
new file mode 100644
index 0000000..e80279a
--- /dev/null
+++ b/src/lib/repr/tengwar.mli
@@ -0,0 +1,73 @@
+type tehta
+
+val three_dots : tehta
+val two_dots   : tehta
+val dot        : tehta
+val acute      : tehta
+val agrave     : tehta
+val right_curl : tehta 
+val left_curl  : tehta 
+val double_right_curl: tehta 
+val double_left_curl:  tehta 
+val double_acute: tehta
+val bar: tehta
+
+type tengwa =
+  | Tinco
+  | Parma
+  | Calma
+  | Quesse
+
+  | Ando
+  | Umbar
+  | Anga
+  | Ungwe
+
+  | Sule
+  | Formen
+  | Harma
+  | Hwesta
+
+  | Anto
+  | Ampa
+  | Anca
+  | Unque
+
+  | Numen
+  | Malta
+  | Noldo
+  | Nwame
+
+  | Ore
+  | Vala
+  | Anna
+  | Vilya
+
+  | Romen
+  | Arda
+  | Lambe
+  | Alda
+
+  | Silme
+  | Silme_nuquerna
+  | Esse
+  | Esse_nuquerna
+
+  | Hyarmen
+  | Hwesta_sindarinwa
+  | Yanta
+  | Ure
+
+  | Halla
+  | Osse
+  | Telco
+  | Ara
+
+type t =
+  { tengwa : tengwa
+  ; tehta_above : tehta option
+  ; tehta_below : tehta option
+  }
+
+val build
+  : tengwa -> tehta option -> tehta option -> t
-- 
cgit v1.2.3