mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-11 22:09:32 -06:00
79 lines
1.7 KiB
Plaintext
79 lines
1.7 KiB
Plaintext
--# -path=.:src/chunk:src/translator:../examples/phrasebook/gfos
|
|
|
|
concrete AppChi of App =
|
|
TenseChi,
|
|
NounChi - [PPartNP],
|
|
AdjectiveChi,
|
|
NumeralChi,
|
|
SymbolChi [
|
|
PN, Symb, String, CN, Card, NP, MkSymb, SymbPN, CNNumNP
|
|
],
|
|
ConjunctionChi,
|
|
VerbChi [
|
|
UseV,ComplVV,SlashV2a,ComplSlash,UseComp,CompNP,CompAdv,CompCN
|
|
-- ,AdvVP -- overridden
|
|
,AdVVP
|
|
],
|
|
AdverbChi,
|
|
PhraseChi,
|
|
SentenceChi [
|
|
PredVP,SlashVP,ImpVP,AdvS,
|
|
UseCl,UseQCl,UseSlash,SSubjS,UseRCl
|
|
],
|
|
QuestionChi - [
|
|
ComplSlashIP,AdvQVP,AddAdvQVP,QuestQVP,
|
|
QuestCl -- overridden
|
|
],
|
|
RelativeChi,
|
|
IdiomChi [
|
|
NP, VP, Tense, Cl, ProgrVP, ExistNP,
|
|
neutr, sjalv
|
|
],
|
|
---- ConstructionChi,
|
|
|
|
ChunkChi,
|
|
|
|
ExtensionsChi [
|
|
CompoundCN,AdAdV,UttAdV,ApposNP,
|
|
MkVPI, MkVPS, PredVPS, that_RP, who_RP
|
|
],
|
|
|
|
DocumentationChi,
|
|
DictionaryChi
|
|
|
|
,PhrasebookChi - [PSentence, PQuestion, PGreetingMale, PGreetingFemale, GObjectPlease, open_Adv, closed_A, open_A, at_Prep]
|
|
|
|
** open ResChi, ParadigmsChi, SyntaxChi, CommonScand, (E = ExtraChi), (G = GrammarChi), Prelude in {
|
|
|
|
flags
|
|
literal=Symb ;
|
|
|
|
|
|
-- Chinese-specific overrides
|
|
|
|
lin
|
|
CompAP = G.CompAP | E.CompBareAP ; -- he is good | he good
|
|
|
|
AdvVP vp adv = G.AdvVP vp adv | E.TopicAdvVP vp adv ; -- he *today* here sleeps | *today* he here sleeps
|
|
|
|
QuestCl cl = G.QuestCl cl | E.QuestRepV cl ; -- he comes 'ma' | he come not come
|
|
|
|
|
|
|
|
|
|
|
|
-- to suppress punctuation
|
|
lin
|
|
PSentence, PQuestion = \s -> lin Text (mkUtt s) ;
|
|
PGreetingMale, PGreetingFemale = \s -> lin Text s ;
|
|
|
|
GObjectPlease o = lin Text (mkUtt o) ;
|
|
|
|
|
|
lin
|
|
PhrasePhr p = {s = "+" ++ p.s} | p ;
|
|
|
|
Phrase_Chunk p = p ;
|
|
|
|
}
|