diff options
Diffstat (limited to 'next-lib/src/italian')
| -rw-r--r-- | next-lib/src/italian/MakeStructuralIta.gf | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/next-lib/src/italian/MakeStructuralIta.gf b/next-lib/src/italian/MakeStructuralIta.gf new file mode 100644 index 000000000..4f75b3e7d --- /dev/null +++ b/next-lib/src/italian/MakeStructuralIta.gf @@ -0,0 +1,16 @@ +--# -path=.:../romance:../common:../abstract + +resource MakeStructuralIta = open CatIta, ParadigmsIta, MorphoIta, Prelude in { + +oper + mkConj : Str -> Str -> Number -> Conj = \x,y,n -> + {s1 = x ; s2 = y ; n = n ; lock_Conj = <>} ; + mkSubj : Str -> Subj = \x -> + {s = x ; m = Indic ; lock_Subj = <>} ; + mkSubjSubj : Str -> Subj = \x -> + {s = x ; m = Conjunct ; lock_Subj = <>} ; + + mkIQuant : Str -> IQuant = \s -> + {s = \\_,_,c => prepCase c ++ s ; lock_IQuant = <>} ; + +} |
