change type for conjunctions, split and overload mkConj and add placeholders into the dictionary t

This commit is contained in:
Herbert Lange
2019-04-26 17:26:05 +02:00
parent 52fee8ab4d
commit a552ba9889
4 changed files with 108 additions and 103 deletions
+5 -1
View File
@@ -104,7 +104,11 @@ oper
pluralN = ResLat.pluralN ;
singularN = ResLat.singularN ;
mkConj : Str -> Str -> Number -> Coordinator -> Conjunction = mkConjunction ;
mkConj = overload {
mkConj : Str -> Str -> Str -> Number -> Coordinator -> Conjunction = mkConjunction ;
mkConj : Str -> Str -> Number -> Coordinator -> Conjunction = \s1,s2,n,c -> mkConjunction s1 s2 [] n c ;
mkConj : Str -> Coordinator -> Conjunction = \s,c -> mkConjunction [] s [] Sg c ;
} ;
mkPrep : Str -> Case -> Preposition = mkPreposition ;