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

Action category, more doc in Phrasebook

Browse Source
This commit is contained in:
aarne
2010-03-28 19:29:06 +00:00
parent c99ecf2704
commit 13a7954646
22 changed files with 311 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/src/english/MakeStructuralEng.gf
View File

@@ -5,9 +5,9 @@ resource MakeStructuralEng = open CatEng, ParadigmsEng, ResEng, MorphoEng, Prelu
oper
mkSubj : Str -> Subj = \x ->
lin Subj {s = x} ;
mkNP : Str -> Number -> NP = \s,n ->
mkNP : Str -> ParadigmsEng.Number -> NP = \s,n ->
lin NP (regNP s n) ;
mkIDet : Str -> Number -> IDet = \s,n ->
mkIDet : Str -> ParadigmsEng.Number -> IDet = \s,n ->
lin IDet {s = s ; n = n} ;
}

2
lib/src/english/PhraseEng.gf
View File

@@ -15,6 +15,8 @@ concrete PhraseEng of Phrase = CatEng ** open Prelude, ResEng in {
UttVP vp = {s = infVP False vp (agrP3 Sg)} ;
UttAdv adv = adv ;
UttCN n = {s = n.s ! Sg ! Nom} ;
UttCard n = {s = n.s ! Nom} ;
UttAP ap = {s = ap.s ! agrP3 Sg} ;
NoPConj = {s = []} ;
PConjConj conj = {s = conj.s2} ; ---