diff options
| author | aarne <aarne@chalmers.se> | 2015-06-02 12:59:29 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2015-06-02 12:59:29 +0000 |
| commit | 3643e20406abf83d2a41d8d46dd5c66237ef1727 (patch) | |
| tree | 0256c6bfd6b2a4b356ff5a648763b15d96c2cd48 /examples/app/AppFre.gf | |
| parent | eb07e4e8622e11087c5f6c14cd35d1575fcea3a8 (diff) | |
copied examples/app to examples/slowApp; the new app is a bit scaled down but much faster
Diffstat (limited to 'examples/app/AppFre.gf')
| -rw-r--r-- | examples/app/AppFre.gf | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/examples/app/AppFre.gf b/examples/app/AppFre.gf index 87ce3c132..e32f5d4f3 100644 --- a/examples/app/AppFre.gf +++ b/examples/app/AppFre.gf @@ -1,14 +1,15 @@ --# -path=.:../../lib/src/chunk:../../lib/src/translator:../phrasebook/gfos concrete AppFre of App = - TranslateFre - [ -- Verb - SlashV2V, -- replaced by more efficient inlined versions + SlashV2a,ComplSlash, -- replaced by a more efficient inlined version + SlashV2V, Slash2V3, Slash3V3, SlashV2S, SlashV2Q, SlashV2A, SlashVV, SlashV2VNP, AdvVPSlash, AdVVPSlash, VPSlashPrep, -- Sentence + SlashVP, SlashVS, PredSCVP, AdvSlash, SlashPrep, SlashVS, EmbedS, EmbedQS, EmbedVP, RelS, @@ -20,8 +21,6 @@ concrete AppFre of App = -- Construction -- Extensions ] - - ,PhrasebookFre - [PSentence, PQuestion, PGreetingMale, PGreetingFemale, GObjectPlease, open_A, closed_A] ** open ParadigmsFre, SyntaxFre, Prelude in { @@ -37,11 +36,16 @@ lin PhrasePhr p = {s = "+" ++ p.s} | p ; Phrase_Chunk p = p ; - + ComplV2 v np = mkVP v np ; +{- ComplV2V v np vp = mkVP v np vp ; ComplV2A v np vp = mkVP v np vp ; ComplV2Q v np vp = mkVP v np vp ; ComplV2S v np vp = mkVP v np vp ; ComplV3 v np vp = mkVP v np vp ; +-} + + +ComplV2 v np = mkVP v np ; } |