too fucking tired... going to bed

2025-10-02 08:44:17 -07:00
parent 437988acee
commit 69a89cf78e
8 changed files with 527 additions and 3 deletions
@@ -24,7 +24,9 @@
    validate/1,
    from_list/1, to_list/1,
    %% ops
-    mul/2, mul/1
+    mul/2, mul/1,
+    %% from_
+    from_ltr/1
 ]).

 -opaque word() :: {w, ordsets:ordset(wfc_ltr:ltr())}.
@@ -108,3 +110,13 @@ mul({w, X}, {w, Y}) ->

 mul([Word | Rest]) -> mul(Word, mul(Rest));
 mul([])            -> one().
+
+
+%%-----------------------------
+%% from_
+%%-----------------------------
+
+-spec from_ltr(term()) -> {ok, word()} | {error, string()}.
+
+from_ltr(Ltr) ->
+    from_list([Ltr]).