summaryrefslogtreecommitdiff
path: root/old-lib/resource/abstract/Text.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2009-06-22 15:39:08 +0000
committeraarne <aarne@chalmers.se>2009-06-22 15:39:08 +0000
commite89fdae2fa1626348d8025824a7469252fa85e42 (patch)
treec7d46bbd0494043b4bd6f917a25a7687517d0547 /old-lib/resource/abstract/Text.gf
parent3049b59b35b25381a7c6787444165c200d66e08b (diff)
next-lib renamed to lib, lib to old-lib
Diffstat (limited to 'old-lib/resource/abstract/Text.gf')
-rw-r--r--old-lib/resource/abstract/Text.gf15
1 files changed, 15 insertions, 0 deletions
diff --git a/old-lib/resource/abstract/Text.gf b/old-lib/resource/abstract/Text.gf
new file mode 100644
index 000000000..d3cfac16f
--- /dev/null
+++ b/old-lib/resource/abstract/Text.gf
@@ -0,0 +1,15 @@
+--1 Text: Texts
+
+-- Texts are built from an empty text by adding $Phr$ases,
+-- using as constructors the punctuation marks ".", "?", and "!".
+-- Any punctuation mark can be attached to any kind of phrase.
+
+abstract Text = Common ** {
+
+ fun
+ TEmpty : Text ; --
+ TFullStop : Phr -> Text -> Text ; -- John walks. ...
+ TQuestMark : Phr -> Text -> Text ; -- Are they here? ...
+ TExclMark : Phr -> Text -> Text ; -- Let's go! ...
+
+}