GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 08:58:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Fao) add particle to verbs e.g. "fara út"

Browse Source
This commit is contained in:
Inari Listenmaa
2026-04-01 16:27:14 +02:00
parent 1e436d84a1
commit e825d92233
4 changed files with 231 additions and 115 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/faroese/CatFao.gf
View File

@@ -16,4 +16,5 @@ lincat S = {s : Str} ;
lincat LN,SN,GN,PN = {s : Str} ; lincat LN,SN,GN,PN = {s : Str} ;
linref V = \v -> v.Nonfinite ++ v.particle ;
} }

336
src/faroese/MorphoFao.gf
View File

File diff suppressed because it is too large Load Diff

4
src/faroese/ParadigmsFao.gf
View File

@@ -501,7 +501,9 @@ oper
mkV = overload { mkV = overload {
mkV : Str -> V = regV; -- Nonfinite mkV : Str -> V = regV; -- Nonfinite
mkV : Str -> Str -> V = reg2V -- Nonfinite Indicative;Pres;('PSg', P2) mkV : Str -> Str -> V = reg2V ; -- Nonfinite Indicative;Pres;('PSg', P2)
mkV : V -> Str -> V -- particle verb
= \v,p -> v ** {particle = p}
} ; } ;
mkVV : V -> VV = \v -> lin VV v ; mkVV : V -> VV = \v -> lin VV v ;

5
src/faroese/ResFao.gf
View File

@@ -92,7 +92,7 @@ oper mkAdj : (_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> Adj =
param Tense = Past | Pres ; param Tense = Past | Pres ;
param PersNum = PSg Person | PPl ; param PersNum = PSg Person | PPl ;
param Person = P1 | P3 | P2 ; param Person = P1 | P3 | P2 ;
oper Verb = {Converb: Str; Imperative_Jussive: Number => Str; Indicative: Tense => PersNum => Str; Nonfinite: Str; Participle: Tense => Str} ; -- 596 oper Verb = {Converb: Str; Imperative_Jussive: Number => Str; Indicative: Tense => PersNum => Str; Nonfinite: Str; Participle: Tense => Str ; particle : Str} ; -- 596
oper mkVerb : (_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> Verb = oper mkVerb : (_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> Verb =
\f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14 -> \f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14 ->
{ Converb = f1 ; { Converb = f1 ;
@@ -118,7 +118,8 @@ oper mkVerb : (_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> Verb =
Participle = table { Participle = table {
Pres => f13 ; Pres => f13 ;
Past => f14 Past => f14
} } ;
particle = []
} ; } ;