diff options
| author | John J. Camilleri <john@digitalgrammars.com> | 2018-07-04 10:09:58 +0200 |
|---|---|---|
| committer | John J. Camilleri <john@digitalgrammars.com> | 2018-07-04 10:09:58 +0200 |
| commit | c6f4edaea5f1074ba682fac5d711016f0136998f (patch) | |
| tree | bb49b8bac2e3cafd3c1f997115bf5bb841554eab /examples/phrasebook/SentencesJpn.gf | |
| parent | 00476ae38687fb7d33081130822cbd4e8f34cfd3 (diff) | |
Remove examples directory; these now live in gf-contrib
All changes have been reflected in the gf-contrib repository:
https://github.com/GrammaticalFramework/gf-contrib
Now, for WebSetup to build the example grammars, one must have gf-contrib
cloned in the same top-level directory as GF. When this isn't the case,
WebSetup displays a notice without failing.
Diffstat (limited to 'examples/phrasebook/SentencesJpn.gf')
| -rw-r--r-- | examples/phrasebook/SentencesJpn.gf | 62 |
1 files changed, 0 insertions, 62 deletions
diff --git a/examples/phrasebook/SentencesJpn.gf b/examples/phrasebook/SentencesJpn.gf deleted file mode 100644 index 4fdaf5fb5..000000000 --- a/examples/phrasebook/SentencesJpn.gf +++ /dev/null @@ -1,62 +0,0 @@ -concrete SentencesJpn of Sentences = NumeralJpn ** - SentencesI - [ - VDrink,VEat,VRead,VWait,VWrite, - phrasePlease, mkSentence, mkPhrase, - NameNN, - PSentence, PQuestion, GObjectPlease, - ACitizen, Citizenship, CitiNat, Nationality, NPNationality, mkNPNationality, PropCit, PCitizenship - ] -with - (Syntax = SyntaxJpn), --- (Symbolic = SymbolicJpn), - (Lexicon = LexiconJpn) ** open SyntaxJpn, ParadigmsJpn in { - -flags coding = utf8 ; - -lincat - - Citizenship = NPCitizenship ; - Nationality = NPNationality ; - -lin - VDrink = v2toVP drink_V2 ; - VEat = v2toVP eat_V2 ; - VRead = v2toVP read_V2 ; - VWait = v2toVP wait_V2 ; - VWrite = v2toVP write_V2 ; - - NameNN = mkNP (mkPN "NN") ; - - PSentence s = mkText (mkPhr (mkUtt s)) | lin Text (mkPhr (mkUtt s)) ; -- optional '.' - PQuestion s = mkText (mkPhr (mkUtt s)) | lin Text (mkPhr (mkUtt s)) ; -- optional '?' - - GObjectPlease o = lin Text (mkPhr noPConj (mkUtt o) please_Voc) | lin Text (mkPhr (mkUtt o)) ; - - ACitizen p n = mkCl p.name n.citizenship ; - - CitiNat n = {prop = n.prop ; citizenship = n.citizenship} ; - - PropCit c = c.prop ; - - PCitizenship x = mkPhrase (mkUtt x.citizenship) ; - -oper - v2toVP : V2 -> VP = \v2 -> mkVP <lin V (v2 ** {needSubject = True}) : V> ; - - phrasePlease : Utt -> Text = \u -> lin Text (mkPhr u) | lin Text (mkPhr noPConj u please_Voc) ; - - mkPhrase : Utt -> Text = \u -> lin Text (mkPhr u) ; -- no punctuation - mkSentence : Utt -> Text = \t -> lin Text (postfixSS "." (mkPhr t) | (mkPhr t)) ; -- optional . - - NPCitizenship : Type = {prop : A ; citizenship : NP} ; - - NPNationality : Type = NPCitizenship ** {lang : NP ; country : NP} ; - - mkNPNationality : NP -> NP -> A -> NP -> NPNationality = \la,co,pro,ci -> - {lang = la ; - country = co ; - prop = pro ; - citizenship = ci - } ; - -} |
