summaryrefslogtreecommitdiff
path: root/next-lib/src/french/MakeStructuralFre.gf
diff options
context:
space:
mode:
Diffstat (limited to 'next-lib/src/french/MakeStructuralFre.gf')
-rw-r--r--next-lib/src/french/MakeStructuralFre.gf13
1 files changed, 13 insertions, 0 deletions
diff --git a/next-lib/src/french/MakeStructuralFre.gf b/next-lib/src/french/MakeStructuralFre.gf
new file mode 100644
index 000000000..282e1c3e7
--- /dev/null
+++ b/next-lib/src/french/MakeStructuralFre.gf
@@ -0,0 +1,13 @@
+--# -path=.:../romance:../common:../abstract
+
+resource MakeStructuralFre = open CatFre, ParadigmsFre, MorphoFre, 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 = <>} ;
+
+}