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

determiners and more words in latin

Browse Source
This commit is contained in:
aarne
2008-09-18 14:36:33 +00:00
parent d9b6bdaf1e
commit 4437a84939
9 changed files with 284 additions and 688 deletions
Download Patch File Download Diff File Expand all files Collapse all files

74
lib/next-resource/latin/StructuralLat.gf
View File

@@ -5,22 +5,22 @@ concrete StructuralLat of Structural = CatLat **
flags optimize=all ;
lin
-- above_Prep = ss "above" ;
-- after_Prep = ss "after" ;
above_Prep = mkPrep "super" Acc ;
after_Prep = mkPrep "post" Acc ;
-- all_Predet = ss "all" ;
-- almost_AdA, almost_AdN = ss "almost" ;
almost_AdA, almost_AdN = ss "quasi" ;
-- although_Subj = ss "although" ;
-- always_AdV = ss "always" ;
always_AdV = ss "semper" ;
-- and_Conj = sd2 [] "and" ** {n = Pl} ;
-----b and_Conj = ss "and" ** {n = Pl} ;
-- because_Subj = ss "because" ;
-- before_Prep = ss "before" ;
before_Prep = mkPrep "ante" Acc ;
-- behind_Prep = ss "behind" ;
-- between_Prep = ss "between" ;
between_Prep = mkPrep "inter" Acc ;
-- both7and_DConj = sd2 "both" "and" ** {n = Pl} ;
-- but_PConj = ss "but" ;
-- by8agent_Prep = ss "by" ;
-- by8means_Prep = ss "by" ;
but_PConj = ss "sed" ;
by8agent_Prep = mkPrep "a" Abl ;
by8means_Prep = mkPrep "per" Acc ;
-- can8know_VV, can_VV = {
-- s = table {
-- VVF VInf => ["be able to"] ;
@@ -41,19 +41,19 @@ concrete StructuralLat of Structural = CatLat **
-- everywhere_Adv = ss "everywhere" ;
-- few_Det = mkDeterminer Pl "few" ;
----- first_Ord = ss "first" ; DEPRECATED
-- for_Prep = ss "for" ;
-- from_Prep = ss "from" ;
-- he_Pron = mkPron "he" "him" "his" "his" Sg P3 Masc ;
-- here_Adv = ss "here" ;
for_Prep = mkPrep "pro" Abl ;
from_Prep = mkPrep "de" Abl ;
he_Pron = personalPronoun Masc Sg P3 ;
here_Adv = ss "hic" ;
-- here7to_Adv = ss ["to here"] ;
-- here7from_Adv = ss ["from here"] ;
-- how_IAdv = ss "how" ;
-- how8many_IDet = mkDeterminer Pl ["how many"] ;
-- if_Subj = ss "if" ;
-- in8front_Prep = ss ["in front of"] ;
i_Pron = personalPronoun Fem Sg P1 ;
-- in_Prep = ss "in" ;
-- it_Pron = mkPron "it" "it" "its" "its" Sg P3 Neutr ;
in8front_Prep = mkPrep "coram" Abl ;
i_Pron = personalPronoun Masc Sg P1 ;
in_Prep = mkPrep "in" Abl ;
it_Pron = personalPronoun Neutr Sg P3 ;
-- less_CAdv = ss "less" ;
-- many_Det = mkDeterminer Pl "many" ;
-- more_CAdv = ss "more" ;
@@ -72,37 +72,37 @@ concrete StructuralLat of Structural = CatLat **
-- isAux = True
-- } ;
-----b no_Phr = ss "no" ;
-- no_Utt = ss "no" ;
no_Utt = ss "non" ;
-- on_Prep = ss "on" ;
------ one_Quant = mkDeterminer Sg "one" ; -- DEPRECATED
-- only_Predet = ss "only" ;
only_Predet = ss "tantum" ;
-- or_Conj = sd2 [] "or" ** {n = Sg} ;
-- otherwise_PConj = ss "otherwise" ;
-- part_Prep = ss "of" ;
part_Prep = mkPrep [] Gen ;
-- please_Voc = ss "please" ;
-- possess_Prep = ss "of" ;
possess_Prep = mkPrep [] Gen ;
-- quite_Adv = ss "quite" ;
-- she_Pron = mkPron "she" "her" "her" "hers" Sg P3 Fem ;
-- so_AdA = ss "so" ;
she_Pron = personalPronoun Fem Sg P3 ;
so_AdA = ss "sic" ;
-- somebody_NP = regNP "somebody" Sg ;
-- someSg_Det = mkDeterminer Sg "some" ;
-- somePl_Det = mkDeterminer Pl "some" ;
-- something_NP = regNP "something" Sg ;
-- somewhere_Adv = ss "somewhere" ;
-- that_Quant = mkQuant "that" "those" ;
that_Quant = ille_Quantifier ;
-- there_Adv = ss "there" ;
-- there7to_Adv = ss "there" ;
-- there7from_Adv = ss ["from there"] ;
-- therefore_PConj = ss "therefore" ;
-- they_Pron = mkPron "they" "them" "their" "theirs" Pl P3 Masc ; ----
they_Pron = personalPronoun Masc Pl P3 ;
this_Quant = hic_Quantifier ;
-- through_Prep = ss "through" ;
-- too_AdA = ss "too" ;
-- to_Prep = ss "to" ;
-- under_Prep = ss "under" ;
under_Prep = mkPrep "sub" Acc ;
very_AdA = ss "valde" ;
-- want_VV = P.mkVV (P.regV "want") ;
-- we_Pron = mkPron "we" "us" "our" "ours" Pl P1 Masc ;
we_Pron = personalPronoun Masc Pl P1 ;
-- whatPl_IP = mkIP "what" "what" "what's" Pl ;
-- whatSg_IP = mkIP "what" "what" "what's" Sg ;
-- when_IAdv = ss "when" ;
@@ -114,19 +114,11 @@ concrete StructuralLat of Structural = CatLat **
-- whoPl_IP = mkIP "who" "whom" "whose" Pl ;
-- whoSg_IP = mkIP "who" "whom" "whose" Sg ;
-- why_IAdv = ss "why" ;
-- without_Prep = ss "without" ;
-- with_Prep = ss "with" ;
-----b yes_Phr = ss "yes" ;
-- yes_Utt = ss "yes" ;
youSg_Pron = personalPronoun Fem Sg P2 ;
-- youPl_Pron = mkPron "you" "you" "your" "yours" Pl P2 Masc ;
-- youPol_Pron = mkPron "you" "you" "your" "yours" Sg P2 Masc ;
--
--
--oper
-- mkQuant : Str -> Str -> {s,sp : Bool => Number => Str} = \x,y -> {
-- s,sp = \\_ => table Number [x ; y]
-- } ;
--
without_Prep = mkPrep "sine" Abl ;
with_Prep = mkPrep "cum" Abl ;
yes_Utt = ss "sic" ;
youSg_Pron = personalPronoun Masc Sg P2 ;
youPl_Pron = personalPronoun Masc Pl P2 ;
youPol_Pron = personalPronoun Masc Sg P2 ;
}