summaryrefslogtreecommitdiff
path: root/doc/tutorial/arithm/ArithmSwe.gf
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2006-06-01 16:16:18 +0000
committeraarne <aarne@cs.chalmers.se>2006-06-01 16:16:18 +0000
commit013f3ce803cac0d6b0d6f100f4561fb8a0e892fe (patch)
tree1a0e76c97ec0a73ec35b2ce29b86481994609049 /doc/tutorial/arithm/ArithmSwe.gf
parent89bd3aff33b7775dd0b1b6290828806c3e5f1c90 (diff)
resource examples in tutorial
Diffstat (limited to 'doc/tutorial/arithm/ArithmSwe.gf')
-rw-r--r--doc/tutorial/arithm/ArithmSwe.gf29
1 files changed, 29 insertions, 0 deletions
diff --git a/doc/tutorial/arithm/ArithmSwe.gf b/doc/tutorial/arithm/ArithmSwe.gf
new file mode 100644
index 000000000..070dcc280
--- /dev/null
+++ b/doc/tutorial/arithm/ArithmSwe.gf
@@ -0,0 +1,29 @@
+--# -path=.:alltenses:prelude
+
+
+concrete ArithmSwe of Arithm = ArithmI with
+ (Lang = LangSwe),
+ (Lex = LexSwe) ;
+
+{-
+concrete ArithmSwe of Arithm = open LangSwe, ParadigmsSwe in {
+
+ lincat
+ Prop = S ;
+ Nat = NP ;
+
+ lin
+ Zero =
+ UsePN (regPN "noll" neutrum) ;
+ Succ n =
+ DetCN (DetSg (SgQuant DefArt) NoOrd)
+ (ComplN2 (mkN2 (mk2N "efterföljare" "efterföljare")
+ (mkPreposition "till")) n) ;
+ Even n =
+ UseCl TPres ASimul PPos
+ (PredVP n (UseComp (CompAP (PositA (regA "jämn"))))) ;
+ And x y =
+ ConjS and_Conj (BaseS x y) ;
+
+}
+-} \ No newline at end of file