mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-07-02 12:08:34 -06:00
(Ara) small cleanup
This commit is contained in:
@@ -88,14 +88,13 @@ resource ParadigmsAra = open
|
||||
= smartPN ;
|
||||
mkPN : N -> PN -- Make a PN out of N. The PN is in construct state.
|
||||
= \n -> lin PN (n ** {
|
||||
s = \\c => n.s ! Sg ! Const ! c
|
||||
s = \\c => n.s ! Sg ! Const ! c
|
||||
++ n.s2 ! Sg ! Def ! c -- NB this hack works for idaafa constructions (if you used mkN : N -> N -> N), but wrong for mkN : N -> A -> N. /IL
|
||||
}) ;
|
||||
mkPN : Str -> Gender -> Species -> PN -- Make a PN out of string, gender and species.
|
||||
= mkFullPN ;
|
||||
} ;
|
||||
|
||||
|
||||
--3 Relational nouns
|
||||
|
||||
mkN2 : overload {
|
||||
@@ -110,7 +109,6 @@ resource ParadigmsAra = open
|
||||
mkN3 : N -> Str -> Str -> N3 ; -- prepositions given as strings
|
||||
} ;
|
||||
|
||||
|
||||
--2 Adjectives
|
||||
|
||||
-- Overloaded operator for main cases
|
||||
|
||||
Reference in New Issue
Block a user