summaryrefslogtreecommitdiff
path: root/examples/lrec-tutorial/GrammarIta.gf
diff options
context:
space:
mode:
authorjohn.j.camilleri <john.j.camilleri@chalmers.se>2013-09-16 07:17:27 +0000
committerjohn.j.camilleri <john.j.camilleri@chalmers.se>2013-09-16 07:17:27 +0000
commitf5461eb3d4eb2605b546a4ed202c12bcdaa1f4e4 (patch)
tree946c9e8542b8e8271b6b529a95c0400fa6613cb4 /examples/lrec-tutorial/GrammarIta.gf
parent8e1c6cca407c82fc09569d80c231b8d256735989 (diff)
Remove contribs and examples
Everything has now been moved to a separate repository at https://github.com/GrammaticalFramework/gf-contrib The contents of the examples folder are build during SetupWeb
Diffstat (limited to 'examples/lrec-tutorial/GrammarIta.gf')
-rw-r--r--examples/lrec-tutorial/GrammarIta.gf80
1 files changed, 0 insertions, 80 deletions
diff --git a/examples/lrec-tutorial/GrammarIta.gf b/examples/lrec-tutorial/GrammarIta.gf
deleted file mode 100644
index caa5b9b02..000000000
--- a/examples/lrec-tutorial/GrammarIta.gf
+++ /dev/null
@@ -1,80 +0,0 @@
-concrete GrammarIta of Grammar = open ResIta, Prelude in {
- lincat
- Cl = {s : ResIta.Tense => Str} ;
- NP = ResIta.NP ; -- {s : Case => {clit,obj : Str} ; a : Agr} ;
- VP = ResIta.VP ; -- {v : Verb ; clit : Str ; obj : Str} ;
- AP = {s : Gender => Number => Str ; isPre : Bool} ;
- CN = Noun ; -- {s : Number => Str ; g : Gender} ;
- Det = {s : Gender => Case => Str ; n : Number} ;
- N = Noun ; -- {s : Number => Str ; g : Gender} ;
- A = Adj ; -- {s : Gender => Number => Str ; isPre : Bool} ;
- V = Verb ; -- {s : VForm => Str ; aux : Aux} ;
- V2 = Verb ** {c : Case} ;
-
- lin
- PredVP np vp =
- let
- subj = (np.s ! Nom).obj ;
- obj = vp.obj ;
- clit = vp.clit ;
- verb = table {
- Pres => agrV vp.v np.a ;
- Perf => agrV (auxVerb vp.v.aux) np.a ++ agrPart vp.v np.a
- }
- in {
- s = \\t => subj ++ clit ++ verb ! t ++ obj
- } ;
-
- ComplV2 v2 np =
- let
- nps = np.s ! v2.c
- in {
- v = {s = v2.s ; aux = v2.aux} ;
- clit = nps.clit ;
- obj = nps.obj
- } ;
-
- UseV v = {
- v = v ;
- clit = [] ;
- obj = []
- } ;
-
- DetCN det cn = {
- s = \\c => {obj = det.s ! cn.g ! c ++ cn.s ! det.n ; clit = []} ;
- a = Ag cn.g det.n Per3
- } ;
-
- ModCN cn ap = {
- s = \\n => preOrPost ap.isPre (ap.s ! cn.g ! n) (cn.s ! n) ;
- g = cn.g
- } ;
-
- UseN n = n ;
-
- UseA adj = adj ;
-
- a_Det = adjDet (mkA "un" "una" [] [] True) Sg ;
-
- the_Det = {
- s = table {
- Masc => table {
- Nom | Acc => pre {"il" ; "lo" / s_impuro ; "l'" / vowel} ;
- Dat => pre {"al" ; "allo" / s_impuro ; "all'" / vowel}
- } ;
- Fem => table {
- Nom | Acc => pre {"la" ; "l'" / vowel} ;
- Dat => pre {"alla" ; "all'" / vowel}
- }
- } ;
- n = Sg
- } ;
-
- this_Det = adjDet (mkA "questo") Sg ;
- these_Det = adjDet (mkA "questo") Pl ;
-
- i_NP = pronNP "io" "mi" "mi" Masc Sg Per1 ;
- she_NP = pronNP "lei" "la" "le" Fem Sg Per3 ;
- we_NP = pronNP "noi" "ci" "ci" Masc Pl Per1 ;
-
-}