1 files changed, 58 insertions, 0 deletions
diff --git a/old-examples/shallow/Shallow.gf b/old-examples/shallow/Shallow.gf
new file mode 100644
index 000000000..c521b668e
--- /dev/null
+++ b/old-examples/shallow/Shallow.gf
@@ -0,0 +1,58 @@
+abstract Shallow = Grammar-[
+  VP,        --- cat
+  ImpersCl,  -- : VP -> Cl ;        -- it rains
+  GenericCl, -- : VP -> Cl ;        -- one sleeps
+  ProgrVP,   -- : VP -> VP ;        -- be sleeping
+  ImpPl1,    -- : VP -> Utt ;       -- let's go
+  UttVP,     -- : VP -> Utt ;                 -- to sleep
+  QuestVP,   -- : IP -> VP -> QCl ;            -- who walks
+  RelVP,     -- : RP -> VP -> RCl ;      -- who loves John
+  PredVP,    -- : NP -> VP -> Cl ;         -- John walks
+  PredSCVP,  -- : SC -> VP -> Cl ;         -- that you go makes me happy
+  ImpVP,     -- : VP -> Imp ;              -- go
+  EmbedVP,   -- : VP -> SC ;               -- to go
+  UseV    ,  --- : V   -> VP ;              -- sleep
+  ComplV2 ,  --- : V2  -> NP -> VP ;        -- use it
+  ComplV3 ,  -- : V3  -> NP -> NP -> VP ;  -- send a message to her
+  ComplVV ,  --- : VV  -> VP -> VP ;        -- want to run
+  ComplVS ,  --- : VS  -> S  -> VP ;        -- know that she runs
+  ComplVQ ,  -- : VQ  -> QS -> VP ;        -- ask if she runs
+  ComplVA ,  -- : VA  -> AP -> VP ;        -- look red
+  ComplV2A,  -- : V2A -> NP -> AP -> VP ;  -- paint the house red
+  ReflV2  ,  -- : V2 -> VP ;               -- use itself
+  UseComp ,  --- : Comp -> VP ;             -- be warm
+  PassV2  ,  -- : V2 -> VP ;               -- be used
+  AdvVP   ,  --- : VP -> Adv -> VP ;        -- sleep here
+  AdVVP      --- : AdV -> VP -> VP ;        -- always sleep
+  ]
+** {
+
+  cat 
+    Advs ; 
+    AdVs ;
+
+  fun
+    NoAdv : Advs ;
+    NoAdV : AdVs ;
+    ConAdv : Adv -> Advs -> Advs ;
+    ConAdV : AdV -> AdVs -> AdVs ;
+
+    PredUseV    : NP -> AdVs -> V -> Advs -> Cl ;
+    PredComplV2 : NP -> AdVs -> V2 -> NP -> Cl ;     -- Advs are attached to NP
+    PredComplVS : NP -> AdVs -> VS -> S -> Cl ;      -- Advs are attached to S
+    PredUseComp : NP -> AdVs -> Comp -> Advs -> Cl ; --- could be so here too
+
+    PredComplVV_V    : NP -> AdVs -> VV -> V -> Advs -> Cl ;
+    PredComplVV_V2   : NP -> AdVs -> VV -> V2 -> NP -> Cl ;
+    PredComplVV_Comp : NP -> AdVs -> VV -> Comp -> Advs -> Cl ;
+
+    QuestUseV    : IP -> AdVs -> V -> Advs -> QCl ;
+    QuestComplV2 : IP -> AdVs -> V2 -> NP -> QCl ;
+    QuestComplVS : IP -> AdVs -> VS -> S -> QCl ;
+    QuestUseComp : IP -> AdVs -> Comp -> Advs -> QCl ;
+
+    QuestComplVV_V    : IP -> AdVs -> VV -> V -> Advs -> QCl ;
+    QuestComplVV_V2   : IP -> AdVs -> VV -> V2 -> NP -> QCl ;
+    QuestComplVV_Comp : IP -> AdVs -> VV -> Comp -> Advs -> QCl ;
+
+}