forked from GitHub/gf-core
Greek by Ioanna Papodopoulou - complete, 27th RGL language
This commit is contained in:
12
lib/src/greek/MakeStructuralGre.gf
Normal file
12
lib/src/greek/MakeStructuralGre.gf
Normal file
@@ -0,0 +1,12 @@
|
||||
resource MakeStructuralGre = open CatGre, ParadigmsGre, ResGre, Prelude in {
|
||||
|
||||
|
||||
oper
|
||||
|
||||
mkSubj : Str -> Subj = \x ->
|
||||
{s = x ; m = Ind ; lock_Subj = <>} ;
|
||||
mkConj : Str -> Str -> Number -> Conj = \x,y,n ->
|
||||
{s1 = x ; s2 = y ; n = n ; lock_Conj = <>} ;
|
||||
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user