GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-09 03:02:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

latin adjectives and determiners

Browse Source
This commit is contained in:
aarne
2008-09-18 13:29:53 +00:00
parent 6d458d19dc
commit d9b6bdaf1e
8 changed files with 140 additions and 42 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
lib/next-resource/latin/AdjectiveLat.gf
View File

@@ -1,12 +1,11 @@
concrete AdjectiveLat of Adjective = CatLat ** open ResLat, Prelude in {
{-
lin
PositA a = {
s = \\_ => a.s ! AAdj Posit ;
isPre = True
} ;
PositA a = a ;
{-
ComparA a np = {
s = \\_ => a.s ! AAdj Compar ++ "than" ++ np.s ! Nom ;
isPre = False
@@ -28,13 +27,13 @@ concrete AdjectiveLat of Adjective = CatLat ** open ResLat, Prelude in {
s = \\a => ap.s ! a ++ sc.s ;
isPre = False
} ;
-}
AdAP ada ap = {
s = \\a => ada.s ++ ap.s ! a ;
s = \\g,n,c => ada.s ++ ap.s ! g ! n ! c ;
isPre = ap.isPre
} ;
UseA2 a = a ;
-}
-- UseA2 a = a ;
}