summaryrefslogtreecommitdiff
path: root/examples/computer/ComputerSwe.gf
diff options
context:
space:
mode:
authorjohn.j.camilleri <john.j.camilleri@chalmers.se>2013-09-16 07:17:27 +0000
committerjohn.j.camilleri <john.j.camilleri@chalmers.se>2013-09-16 07:17:27 +0000
commitf5461eb3d4eb2605b546a4ed202c12bcdaa1f4e4 (patch)
tree946c9e8542b8e8271b6b529a95c0400fa6613cb4 /examples/computer/ComputerSwe.gf
parent8e1c6cca407c82fc09569d80c231b8d256735989 (diff)
Remove contribs and examples
Everything has now been moved to a separate repository at https://github.com/GrammaticalFramework/gf-contrib The contents of the examples folder are build during SetupWeb
Diffstat (limited to 'examples/computer/ComputerSwe.gf')
-rw-r--r--examples/computer/ComputerSwe.gf153
1 files changed, 0 insertions, 153 deletions
diff --git a/examples/computer/ComputerSwe.gf b/examples/computer/ComputerSwe.gf
deleted file mode 100644
index 90fb7c6a0..000000000
--- a/examples/computer/ComputerSwe.gf
+++ /dev/null
@@ -1,153 +0,0 @@
---# -path=.:alltenses
-
-concrete ComputerSwe of Computer = DatorSwe, NumeralSwe, GrammarSwe [
-
--- used to be the "mini" resource of GF book, chapter 9, but now larger
-
--- cat
- S, -- sentence
- Cl, -- clause
- NP, -- noun phrase
- VP, -- verb phrase
- AP, -- adjectival phrase
- CN, -- common noun
- Det, -- determiner
- N, -- noun
- A, -- adjective
- V, -- verb (one-place, intransitive)
- V2, -- two-place verb (two-place, transitive or prepositional)
- AdA, -- ad-adjective
- Tense, -- tense
- Pol, -- polarity
- Conj, -- conjunction
-
- Pron, -- pronoun
- Numeral,
-
--- fun
- UseCl , -- Tense -> Pol -> Cl -> S,
- PredVP , -- NP -> VP -> Cl,
---- ComplV2, -- V2 -> NP -> VP,
- DetCN , -- Det -> CN -> NP,
- UsePron,
---- ModCN , -- AP -> CN -> CN,
-
---- CompAP , -- AP -> VP,
- AdAP , -- AdA -> AP -> AP,
-
---- ConjS , -- Conj -> S -> S -> S,
---- ConjAP , -- Conj -> AP -> AP -> AP,
---- ConjNP , -- Conj -> NP -> NP -> NP,
-
- UseV , -- V -> VP,
- UseN , -- N -> CN,
- PositA, -- A -> AP,
-
---- a_Det, the_Det,
- every_Det, -- Det,
---- this_Det, these_Det, -- Det,
---- that_Det, those_Det, -- Det,
- i_Pron, youSg_Pron, he_Pron, she_Pron, we_Pron, youPl_Pron, they_Pron, -- NP,
- very_AdA, -- AdA,
-
- TTAnt, -- Tense -> Ant -> Temp ;
- PPos, PNeg, -- Pol,
- TPres, TPast, TFut, TCond, -- Tense,
- STense, SCond, SFut, SPast, SPres, -- scand tense
- ASimul, AAnter,
-
- and_Conj, or_Conj, -- Conj,
-
--- extension of the mini grammar
-
--- cat
- Text, -- text (with punctuation) e.g. "Who knows it?"
- Utt, -- utterance (sentence or question) e.g. "does she walk"
- QS, -- question (fixed tense) e.g. "who doesn't walk"
- QCl, -- question clause (variable tense) e.g. "who walks"
- ClSlash, -- clause missing noun phrase e.g. "she walks with"
- Adv, -- adverb e.g. "here"
- Prep, -- preposition (and/or case) e.g. "with"
- VS, -- sentence-complement verb e.g. "know"
- VQ, -- question-complement verb e.g. "wonder"
- VV, -- verb-phrase-complement verb e.g. "want"
- IP, -- interrogative pronoun e.g. "who"
- PN, -- proper name e.g. "John"
- Subj, -- subjunction e.g. "because"
- IAdv, -- interrogative adverb e.g. "why"
-
- ListAP,
- ListNP,
- ListS,
- Temp,
- Comp,
- Ant,
-
- Imp, Bool, True, False, Voc,
-
--- fun
-
- UttS , -- S -> Utt,
- UttQS, -- QS -> Utt,
-
- UseQCl, -- Tense -> Pol -> QCl -> QS,
-
- QuestCl , -- Cl -> QCl, -- does she walk
- QuestVP , -- IP -> VP -> QCl, -- who walks
- QuestSlash, -- IP -> ClSlash -> QCl, -- who does she walk with
- QuestIAdv , -- IAdv -> Cl -> QCl, -- why does she walk
-
- SubjCl, -- Cl -> Subj -> S -> Cl, -- she walks because we run
-
- PrepNP , -- Prep -> NP -> Adv, -- in the house
-
- ComplVS, -- VS -> S -> VP, -- know that she walks
- ComplVQ, -- VQ -> QS -> VP, -- wonder who walks
- ComplVV, -- VV -> VP -> VP, -- want to walk
-
---- SlashV2 , -- NP -> V2 -> ClSlash, -- she loves
---- SlashPrep, -- Cl -> Prep -> ClSlash, -- she walks with
-
- AdvVP, -- VP -> Adv -> VP, -- walk in the city
-
- UsePN, -- PN -> NP, -- John
---- AdvNP, -- NP -> Adv -> NP, -- the man in the city
-
- whoSg_IP , -- IP,
- here_Adv, -- Adv,
- by_Prep, in_Prep, of_Prep, with_Prep, -- Prep,
- can_VV, must_VV, want_VV, -- VV,
- although_Subj, because_Subj, when_Subj, if_Subj, -- Subj,
- when_IAdv, where_IAdv, why_IAdv-- IAdv,
-
-] ** open SyntaxSwe, (S = SyntaxSwe) in {
-
--- functions with different type
-
-lin
- TextS s = mkText (lin S s) ;
- TextQS qs = mkText (lin QS qs) ;
- TextImp vp = mkText (mkImp (lin VP vp)) ;
-
- ComplV2 v np = mkVP v np ;
- ModCN ap cn = lin CN (mkCN <lin AP ap : AP> <lin CN cn : CN>) ;
- CompAP ap = mkVP (lin AP ap) ;
- ConjS co x y = mkS (lin Conj co) (lin S x) (lin S y) ;
- ConjAP co x y = mkAP co x y ;
- ConjNP co x y = mkNP co x y ;
- a_Det = mkDet a_Quant ;
- the_Det = mkDet the_Quant ;
- aPl_Det = mkDet a_Quant plNum ;
- thePl_Det = mkDet the_Quant plNum ;
- this_Det = S.this_Det ;
- these_Det = S.these_Det ;
- that_Det = S.that_Det ;
- those_Det = S.those_Det ;
- possDet p = S.mkDet <p : Pron> ;
- numeralDet n = S.mkDet <n : Numeral> ;
- SubjS subj a b = mkS (S.mkAdv <subj : Subj> <a : S>) b ;
- CompAdv p pp = mkVP (S.mkAdv <p : Prep> <pp : NP>) ;
- SlashV2 np v2 = mkClSlash np v2 ;
- SlashPrep cl p = mkClSlash (lin Cl cl) <p : Prep> ;
- AdvCN cn p pp = mkCN <lin CN cn : CN> (mkAdv <p : Prep> <pp : NP>) ;
-}