aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/licentia/document.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/program/licentia/document.lux')
-rw-r--r--stdlib/source/program/licentia/document.lux47
1 files changed, 0 insertions, 47 deletions
diff --git a/stdlib/source/program/licentia/document.lux b/stdlib/source/program/licentia/document.lux
deleted file mode 100644
index b1bc20cce..000000000
--- a/stdlib/source/program/licentia/document.lux
+++ /dev/null
@@ -1,47 +0,0 @@
-(.module:
- [lux (#- or and)
- [data
- ["." text
- ["%" format (#+ format)]]
- [collection
- ["." list ("#\." functor)]]]])
-
-(def: #export (quote text)
- (-> Text Text)
- (format text.double-quote text text.double-quote))
-
-(def: #export (block content)
- (-> Text Text)
- (format content text.new-line text.new-line))
-
-(def: #export (plural singular)
- (-> Text Text)
- (format singular "(s)"))
-
-(def: #export (sentence content)
- (-> Text Text)
- (format content "."))
-
-(def: #export paragraph
- (-> (List Text) Text)
- (|>> (list\map ..sentence)
- (text.join-with text.new-line)))
-
-(template [<name> <word>]
- [(def: #export <name>
- (-> (List Text) Text)
- (text.join-with (format ", " <word> " ")))]
-
- [or "or"]
- [and "and"]
- [and/or "and/or"]
- )
-
-(type: #export Section
- {#title Text
- #content Text})
-
-(def: #export (section value)
- (-> Section Text)
- (format (block (get@ #title value))
- (get@ #content value)))