rearranging resource-1.0

lib/resource-1.0/abstract/Adjective.gf

@@ -0,0 +1,25 @@
+abstract Adjective = Cat ** {
+
+  fun
+
+    PositA  : A -> AP ;
+    ComparA : A -> NP -> AP ;
+
+-- $SuperlA$ belongs to determiner syntax in $Noun$.
+
+    ComplA2 : A2 -> NP -> AP ;
+
+    ReflA2  : A2 -> AP ;
+
+    SentAP  : AP -> S  -> AP ;
+    QuestAP : AP -> QS -> AP ;
+
+    AdAP : AdA -> AP -> AP ;
+
+-- $AdvA$ that forms adverbs belongs to $Adverb$.
+
+-- Elliptic constructions as usual.
+
+    UseA2 : A2 -> A ;
+
+}

lib/resource-1.0/abstract/Adverb.gf

@@ -0,0 +1,17 @@
+abstract Adverb = Cat ** {
+
+  fun
+
+    PositAdvAdj   : A -> Adv ;
+    ComparAdvAdj  : CAdv -> A -> NP -> Adv ;
+    ComparAdvAdjS : CAdv -> A -> S -> Adv ;
+
+    PrepNP : Prep -> NP -> Adv ;
+
+    AdAdv  : AdA -> Adv -> Adv ;
+
+    SubjS : Subj -> S -> Adv ;
+
+    AdnCAdv : CAdv -> AdN ;
+
+}

lib/resource-1.0/abstract/Basic.gf

@@ -0,0 +1,223 @@
+abstract Basic = Cat ** {
+  fun
+  airplane_N : N ;
+--  answer_V2S : V2S ;
+  apartment_N : N ;
+  apple_N : N ;
+  art_N : N ;
+--  ask_V2Q : V2Q ;
+  baby_N : N ;
+  bad_A : A ;
+  bank_N : N ;
+  beautiful_A : A ;
+--  become_VA : VA ;
+  beer_N : N ;
+--  beg_V2V : V2V ;
+  big_A : A ;
+  bike_N : N ;
+  bird_N : N ;
+  black_A : A ;
+  blue_A : A ;
+  boat_N : N ;
+  book_N : N ;
+  boot_N : N ;
+  boss_N : N ;
+  boy_N : N ;
+  bread_N : N ;
+  break_V2 : V2 ;
+  broad_A : A ;
+  brother_N2 : N2 ;
+  brown_A : A ;
+  butter_N : N ;
+  buy_V2 : V2 ;
+  camera_N : N ;
+  cap_N : N ;
+  car_N : N ;
+  carpet_N : N ;
+  cat_N : N ;
+  ceiling_N : N ;
+  chair_N : N ;
+  cheese_N : N ;
+  child_N : N ;
+  church_N : N ;
+  city_N : N ;
+  clean_A : A ;
+  clever_A : A ;
+  close_V2 : V2 ;
+  coat_N : N ;
+  cold_A : A ;
+  come_V : V ;
+  computer_N : N ;
+  country_N : N ;
+  cousin_N : N ;
+  cow_N : N ;
+  die_V : V ;
+  dirty_A : A ;
+  distance_N3 : N3 ;
+  doctor_N : N ;
+  dog_N : N ;
+  door_N : N ;
+  drink_V2 : V2 ;
+--  easy_A2V : A2V ;
+  eat_V2 : V2 ;
+  enemy_N : N ;
+  empty_A : A ;
+  factory_N : N ;
+  father_N2 : N2 ;
+  fear_VS : VS ;
+  find_V2 : V2 ;
+  fish_N : N ;
+  floor_N : N ;
+  forget_V2 : V2 ;
+  fridge_N : N ;
+  friend_N : N ;
+  fruit_N : N ;
+--  fun_AV : AV ;
+  garden_N : N ;
+  girl_N : N ;
+  glove_N : N ;
+  gold_N : N ;
+  good_A : A ;
+  go_V : V ;
+  green_A : A ;
+  harbour_N : N ;
+  hate_V2 : V2 ;
+  hat_N : N ;
+  have_V2 : V2 ;
+  hear_V2 : V2 ;
+  hill_N : N ;
+  hope_VS : VS ;
+  horse_N : N ;
+  hot_A : A ;
+  house_N : N ;
+  important_A : A ;
+  industry_N : N ;
+  iron_N : N ;
+  king_N : N ;
+  know_V2 : V2 ;
+  lake_N : N ;
+  lamp_N : N ;
+  learn_V2 : V2 ;
+  leather_N : N ;
+  leave_V2 : V2 ;
+  like_V2 : V2 ;
+  listen_V2 : V2 ;
+  live_V : V ;
+  long_A : A ;
+  lose_V2 : V2 ;
+  love_N : N ;
+  love_V2 : V2 ;
+  man_N : N ;
+  married_A2 : A2 ;
+  meat_N : N ;
+  milk_N : N ;
+  moon_N : N ;
+  mother_N2 : N2 ;
+  mountain_N : N ;
+  music_N : N ;
+  narrow_A : A ;
+  new_A : A ;
+  newspaper_N : N ;
+  oil_N : N ;
+  old_A : A ;
+  open_V2 : V2 ;
+--  paint_V2A : V2A ;
+  paper_N : N ;
+  peace_N : N ;
+  pen_N : N ;
+  planet_N : N ;
+  plastic_N : N ;
+  play_V2 : V2 ;
+  policeman_N : N ;
+  priest_N : N ;
+--  probable_AS : AS ;
+  queen_N : N ;
+  radio_N : N ;
+--  rain_V0 : V0 ;
+  read_V2 : V2 ;
+  red_A : A ;
+  religion_N : N ;
+  restaurant_N : N ;
+  river_N : N ;
+  rock_N : N ;
+  roof_N : N ;
+  rubber_N : N ;
+  run_V : V ;
+  say_VS : VS ;
+  school_N : N ;
+  science_N : N ;
+  sea_N : N ;
+  seek_V2 : V2 ;
+  see_V2 : V2 ;
+  sell_V3 : V3 ;
+  send_V3 : V3 ;
+  sheep_N : N ;
+  ship_N : N ;
+  shirt_N : N ;
+  shoe_N : N ;
+  shop_N : N ;
+  short_A : A ;
+  silver_N : N ;
+  sister_N : N ;
+  sleep_V : V ;
+  small_A : A ;
+  snake_N : N ;
+  sock_N : N ;
+  speak_V2 : V2 ;
+  star_N : N ;
+  steel_N : N ;
+  stone_N : N ;
+  stove_N : N ;
+  student_N : N ;
+  stupid_A : A ;
+  sun_N : N ;
+  switch8off_V2 : V2 ;
+  switch8on_V2 : V2 ;
+  table_N : N ;
+  talk_V3 : V3 ;
+  teacher_N : N ;
+  teach_V2 : V2 ;
+  television_N : N ;
+  thick_A : A ;
+  thin_A : A ;
+  train_N : N ;
+  travel_V : V ;
+  tree_N : N ;
+----  trousers_N : N ;
+  ugly_A : A ;
+  understand_V2 : V2 ;
+  university_N : N ;
+  village_N : N ;
+  wait_V2 : V2 ;
+  walk_V : V ;
+  warm_A : A ;
+  war_N : N ;
+  watch_V2 : V2 ;
+  water_N : N ;
+  white_A : A ;
+  window_N : N ;
+  wine_N : N ;
+  win_V2 : V2 ;
+  woman_N : N ;
+  wonder_VQ : VQ ;
+  wood_N : N ;
+  write_V2 : V2 ;
+  yellow_A : A ;
+  young_A : A ;
+
+  do_V2 : V2 ;
+  now_Adv : Adv ;
+  already_Adv : Adv ;
+  song_N : N ;
+  add_V3 : V3 ;
+  number_N : N ;
+  put_V2 : V2 ;
+  stop_V : V ;
+  jump_V : V ;
+
+  here7to_Adv : Adv ;
+  here7from_Adv : Adv ;
+  there_Adv : Adv ;
+  there7to_Adv : Adv ;
+  there7from_Adv : Adv ;
+}

lib/resource-1.0/abstract/Cat.gf

@@ -0,0 +1,80 @@
+abstract Cat = {
+
+  cat
+
+    Text ;
+    Phr ;
+    Utt ;
+    Imp ;
+
+    S ;
+    QS ;
+    RS ;
+
+    Cl ;
+    QCl ;
+    RCl ;
+
+    Slash ;
+
+    VP ;
+
+    V ;
+    V2 ;
+    V3 ;
+    VV ;
+    VS ;
+    VQ ;
+
+    AP ; 
+    Comp ;
+
+    A ;
+    A2 ;
+
+    Adv ;
+    AdV ;
+    AdA ;
+    AdS ;
+    AdN ;
+
+    CN ;
+    N ;
+    N2 ;
+    N3 ;
+
+    NP ;
+    PN ;
+    Pron ;
+    Det ;
+    Predet ;
+    Quant ;
+    Num ;
+    Ord ;
+
+    Prep ;
+
+    IP ;
+    IAdv ;
+    IDet ;
+
+    RP ;      -- relative pronoun
+
+    Numeral ; -- cardinal or ordinal,   e.g. "five/fifth"
+
+    Conj ;    -- conjunction,           e.g. "and"
+    DConj ;   -- distributed conj.      e.g. "both - and"
+    PConj ;   -- phrase-beginning conj.
+    CAdv ;    -- comparative adverb     e.g. "more", "less"
+    Subj ;    -- subjunction,           e.g. "if", "when"
+
+    SeqS ;    -- sequence of sentences
+    SeqVP ;   -- sequence of verb phrases
+    SeqAP ;   -- sequence of adjectival phrases
+    SeqNP ;   -- sequence of noun phrases
+    SeqAdv ;  -- sequence of adverbs
+
+    Voc ;     -- vocative or "please"
+
+
+}

lib/resource-1.0/abstract/Conjunction.gf

@@ -0,0 +1,27 @@
+abstract Conjunction = Cat ** {
+
+  fun
+
+    ConjS    : Conj -> SeqS -> S ;        -- "John walks and Mary runs"
+    ConjAP   : Conj -> SeqAP -> AP ;      -- "even and prime"
+    ConjNP   : Conj -> SeqNP -> NP ;      -- "John or Mary"
+    ConjAdv  : Conj -> SeqAdv -> Adv ;    -- "quickly or slowly"
+
+    DConjS   : DConj -> SeqS -> S ;       -- "either John walks or Mary runs"
+    DConjAP  : DConj -> SeqAP -> AP ;     -- "both even and prime"
+    DConjNP  : DConj -> SeqNP -> NP ;     -- "either John or Mary"
+    DConjAdv : DConj -> SeqAdv -> Adv ;   -- "both badly and slowly"
+
+
+-- these are rather uninteresting
+
+    TwoS : S -> S -> SeqS ;
+    AddS : SeqS -> S -> SeqS ;
+    TwoAdv : Adv -> Adv -> SeqAdv ;
+    AddAdv : SeqAdv -> Adv -> SeqAdv ;
+    TwoNP : NP -> NP -> SeqNP ;
+    AddNP : SeqNP -> NP -> SeqNP ;
+    TwoAP : AP -> AP -> SeqAP ;
+    AddAP : SeqAP -> AP -> SeqAP ;
+
+}

lib/resource-1.0/abstract/Lang.gf

@@ -0,0 +1,15 @@
+abstract Lang = 
+  Noun,
+  Verb, 
+  Adjective,
+  Adverb,
+  Numeral,
+  Sentence, 
+  Question,
+  Relative,
+  Conjunction,
+  Phrase,
+  Tensed,
+  Structural,
+  Basic
+  ** {} ;

lib/resource-1.0/abstract/Lex.gf

@@ -0,0 +1,54 @@
+abstract Lex = Cat ** {
+
+  fun
+    walk_V  : V ;
+    help_V2 : V2 ;
+    show_V3 : V3 ;
+    want_VV : VV ;
+    claim_VS : VS ;
+    ask_VQ : VQ ;
+
+    dog_N : N ;
+    son_N2 : N2 ;
+    way_N3 : N3 ;
+
+    warm_A : A ;
+    close_A2 : A2 ;
+
+-- structural
+
+
+    only_Predet, all_Predet : Predet ;
+
+    this_Quant, these_Quant  : Quant ;
+
+    
+    i_Pron, he_Pron, we_Pron : Pron ;
+
+    whoSg_IP, whoPl_IP : IP ;
+
+    when_IAdv, where_IAdv, why_IAdv : IAdv ;
+
+    whichSg_IDet, whichPl_IDet : IDet ;
+
+    here_Adv : Adv ;
+
+    very_AdA : AdA ;
+
+    always_AdV : AdV ;
+
+    one_Numeral, forty_Numeral : Numeral ;
+
+    in_Prep, of_Prep : Prep ;
+
+    and_Conj : Conj ;
+    either7or_DConj : DConj ;
+
+    but_PConj : PConj ;
+
+    if_Subj, because_Subj : Subj ;
+   
+    please_Voc : Voc ;
+
+    more_CAdv, less_CAdv : CAdv ;
+}

lib/resource-1.0/abstract/Noun.gf

@@ -0,0 +1,44 @@
+--1 The construction of nouns, noun phrases, and determiners
+
+abstract Noun = Cat ** {
+
+  fun
+    DetCN   : Det -> CN -> NP ;
+    UsePN   : PN -> NP ;
+    UsePron : Pron -> NP ;
+
+-- Determiner structure à la CLE; we further divide $Num$ into cardinal
+-- and ordinal/superlative. So we get e.g. "my first forty books".
+
+    MkDet : Predet -> Quant -> Num -> Ord -> Det ;
+    
+    PossPronSg, PossPronPl : Pron -> Quant ; --- PossNP not in romance
+
+    NoNum  : Num ;
+    NumInt : Int -> Num ;
+    NumNumeral : Numeral -> Num ;
+
+    AdNum : AdN -> Num -> Num ;
+
+    OrdNumeral  : Numeral -> Ord ;
+    
+    NoOrd : Ord ;
+    OrdSuperl : A -> Ord ;
+
+    NoPredet : Predet ;
+
+    DefSg,   DefPl   : Quant ;
+    IndefSg, IndefPl : Quant ;
+
+    ComplN2 : N2 -> NP -> CN ;
+    ComplN3 : N3 -> NP -> N2 ;
+
+    AdjCN   : AP -> CN -> CN ;
+    RelCN   : CN -> RS -> CN ;
+
+    SentCN  : CN -> S  -> CN ;
+    QuestCN : CN -> QS -> CN ;
+
+    UseN : N -> CN ;
+
+} ;

lib/resource-1.0/abstract/Numeral.gf

@@ -0,0 +1,31 @@
+-- numerals from 1 to 999999 in decimal notation
+
+abstract Numeral = Cat ** {
+
+cat 
+  Digit ;       -- 2..9
+  Sub10 ;       -- 1..9
+  Sub100 ;      -- 1..99
+  Sub1000 ;     -- 1..999
+  Sub1000000 ;  -- 1..999999
+
+fun 
+  num : Sub1000000 -> Numeral ;
+
+  n2, n3, n4, n5, n6, n7, n8, n9 : Digit ;
+
+  pot01 : Sub10 ;                               -- 1
+  pot0 : Digit -> Sub10 ;                       -- d * 1
+  pot110 : Sub100 ;                             -- 10
+  pot111 : Sub100 ;                             -- 11
+  pot1to19 : Digit -> Sub100 ;                  -- 10 + d
+  pot0as1 : Sub10 -> Sub100 ;                   -- coercion of 1..9
+  pot1 : Digit -> Sub100 ;                      -- d * 10
+  pot1plus : Digit -> Sub10 -> Sub100 ;         -- d * 10 + n
+  pot1as2 : Sub100 -> Sub1000 ;                 -- coercion of 1..99
+  pot2 : Sub10 -> Sub1000 ;                     -- m * 100
+  pot2plus : Sub10 -> Sub100 -> Sub1000 ;       -- m * 100 + n
+  pot2as3 : Sub1000 -> Sub1000000 ;             -- coercion of 1..999
+  pot3 : Sub1000 -> Sub1000000 ;                -- m * 1000
+  pot3plus : Sub1000 -> Sub1000 -> Sub1000000 ; -- m * 1000 + n
+}

lib/resource-1.0/abstract/Phrase.gf

@@ -0,0 +1,21 @@
+abstract Phrase = Cat, Tense ** {
+
+  fun
+    PhrUtt  : PConj -> Utt -> Voc -> Phr ;
+
+    UttS    : S -> Utt ;
+    UttQS   : QS -> Utt ;
+    UttImpSg, UttImpPl  : Pol -> Imp -> Utt ;
+
+    UttIP   : IP -> Utt ;
+    UttIAdv : IAdv -> Utt ;
+    UttNP   : NP -> Utt ;
+    UttAdv  : Adv -> Utt ;
+    UttVP   : VP -> Utt ;
+
+    NoPConj : PConj ;
+    PConjConj : Conj -> PConj ;
+
+    NoVoc   : Voc ;
+    VocNP   : NP -> Voc ;
+}

lib/resource-1.0/abstract/Question.gf

@@ -0,0 +1,16 @@
+abstract Question = Cat ** {
+
+  fun
+
+    QuestCl    : Cl -> QCl ;
+    QuestVP    : IP -> VP -> QCl ;
+    QuestSlash : IP -> Slash -> QCl ;
+    QuestIAdv  : IAdv -> Cl -> QCl ;
+
+    PrepIP : Prep -> IP -> IAdv ;
+    AdvIP  : IP -> Adv -> IP ;
+ 
+    IDetCN : IDet -> Num -> Ord -> CN -> IP ;
+
+}
+   

lib/resource-1.0/abstract/Relative.gf

@@ -0,0 +1,13 @@
+abstract Relative = Cat ** {
+
+  fun
+
+    RelCl    : Cl -> RCl ;
+    RelVP    : RP -> VP -> RCl ;
+    RelSlash : RP -> Slash -> RCl ;
+
+    FunRP : Prep -> NP -> RP -> RP ;
+    IdRP : RP ;
+
+}
+

lib/resource-1.0/abstract/Sentence.gf

@@ -0,0 +1,14 @@
+abstract Sentence = Cat ** {
+
+  fun
+
+    PredVP : NP -> VP -> Cl ;
+
+    ImpVP : VP -> Imp ;
+
+    SlashV2   : NP -> V2 -> Slash ;
+    SlashVVV2 : NP -> VV -> V2 -> Slash ;
+    AdvSlash  : Slash -> Adv -> Slash ;
+    SlashPrep : Cl -> Prep -> Slash ;
+}
+   

lib/resource-1.0/abstract/Structural.gf

@@ -0,0 +1,108 @@
+--1 GF Resource Grammar API for Structural Words
+-- 
+-- AR 21/11/2003 -- 30/11/2005
+--
+-- Here we have some words belonging to closed classes and appearing
+-- in all languages we have considered.
+-- Sometimes they are not really meaningful, e.g. $we_NP$ in Spanish
+-- should be replaced by masculine and feminine variants.
+
+abstract Structural = Cat ** {
+
+  fun
+
+-- This is an alphabetical list of structural words
+
+  above_Prep : Prep ;
+  after_Prep : Prep ;
+--  all8mass_Det : Det ;
+--  all_NDet : NDet ;
+  all_Predet : Predet ; --
+  almost_AdA : AdA ;    -- Adv
+  almost_AdN : AdN ;    --
+  although_Subj : Subj ;
+  and_Conj : Conj ;
+  always_AdV : AdV ; --
+  because_Subj : Subj ;
+  before_Prep : Prep ;
+  behind_Prep : Prep ;
+  between_Prep : Prep ;
+  both7and_DConj : DConj ; -- ConjD
+  but_PConj : PConj ; --
+  by8agent_Prep : Prep ;
+  by8means_Prep : Prep ;
+  can8know_VV : VV ;
+  can_VV : VV ;
+  during_Prep : Prep ;
+  either7or_DConj : DConj ; -- ConjD
+  every_Det : Det ;
+  everybody_NP : NP ;
+  everything_NP : NP ;
+  everywhere_Adv : Adv ;
+  from_Prep : Prep ;
+  he_Pron : Pron ; -- NP
+  here_Adv : Adv ; --
+  how_IAdv : IAdv ;
+  how8many_IDet : IDet ;
+  i_Pron : Pron ; -- NP
+  if_Subj : Subj ;
+  in8front_Prep : Prep ;
+  in_Prep : Prep ;
+  it_Pron : Pron ;
+  less_CAdv : CAdv ; --
+  many_Det : Det ;
+  more_CAdv : CAdv ; --
+  most_Predet : Predet ; -- Det
+--  most8many_Det : Det ;
+  much_Det : Det ;
+  must_VV : VV ;
+  no_Phr : Phr ;
+  on_Prep : Prep ;
+  only_Predet : Predet ; --
+  or_Conj : Conj ;
+  otherwise_PConj : PConj ;  -- AdC
+  part_Prep : Prep ;
+  please_Voc : Voc ;
+  possess_Prep : Prep ;
+  quite_Adv : AdA ;
+  she_Pron : Pron ;
+  so_AdA : AdA ; -- Adv
+  someSg_Det : Det ; -- some_Det
+  somePl_Det : Det ; -- NDet
+  somebody_NP : NP ;
+  something_NP : NP ;
+  somewhere_Adv : Adv ;
+  that_Quant : Quant ; -- Det
+  that_NP : NP ;
+  therefore_PConj : PConj ; -- AdC
+  these_Quant : Quant ; -- NDet
+--  they8fem_NP : NP ;
+  they_Pron : Pron ; -- NP
+  this_Quant : Quant ; -- NDet
+  this_NP : NP ;
+  those_Quant : Quant ; -- NDet
+  thou_Pron : Pron ; -- NP
+  through_Prep : Prep ;
+  to_Prep : Prep ;
+  too_AdA : AdA ;  -- Adv
+  under_Prep : Prep ;
+  very_AdA : AdA ; -- Adv
+  want_VV : VV ;
+  we_Pron : Pron ; -- NP
+  whatPl_IP : IP ; -- many
+  whatSg_IP : IP ; -- one
+  when_IAdv : IAdv ;
+  when_Subj : Subj ;
+  where_IAdv : IAdv ;
+  whichPl_IDet : IDet ; -- many
+  whichSg_IDet : IDet ; -- one
+  whoPl_IP : IP ;  -- many
+  whoSg_IP : IP ;  -- one
+  why_IAdv : IAdv ;
+  with_Prep : Prep ;
+  without_Prep : Prep ;
+  ye_Pron : Pron ; -- NP
+  yes_Phr : Phr ;
+  you_Pron : Pron ; -- NP
+
+}

lib/resource-1.0/abstract/Tense.gf

@@ -0,0 +1,13 @@
+abstract Tense = {
+
+  cat
+    Pol ;
+    Tense ;
+    Ant ;
+
+  fun
+    PPos, PNeg : Pol ;
+    TPres, TPast, TFut, TCond : Tense ;
+    ASimul, AAnter : Ant ;
+
+}

lib/resource-1.0/abstract/Tensed.gf

@@ -0,0 +1,8 @@
+abstract Tensed = Cat, Tense ** {
+
+  fun
+    UseCl  : Tense -> Ant -> Pol -> Cl  -> S ;
+    UseQCl : Tense -> Ant -> Pol -> QCl -> QS ;
+    UseRCl : Tense -> Ant -> Pol -> RCl -> RS ;
+
+}

lib/resource-1.0/abstract/Test.gf

@@ -0,0 +1,15 @@
+abstract Test = 
+  Noun,
+  Verb, 
+  Adjective,
+  Adverb,
+  -- Numeral,
+  Sentence, 
+  Question,
+  Relative,
+  Conjunction,
+  Phrase,
+  Untensed, 
+  -- Tensed,
+  Lex 
+  ** {} ;

lib/resource-1.0/abstract/Untensed.gf

@@ -0,0 +1,8 @@
+abstract Untensed = Cat ** {
+
+  fun
+    PosCl,  NegCl  : Cl  -> S ;
+    PosQCl, NegQCl : QCl -> QS ;
+    PosRCl, NegRCl : RCl -> RS ;
+
+}

lib/resource-1.0/abstract/Verb.gf

@@ -0,0 +1,27 @@
+abstract Verb = Cat ** {
+
+  fun
+    UseV    : V -> VP ;
+    ComplV2 : V2 -> NP -> VP ;
+    ComplV3 : V3 -> NP -> NP -> VP ;
+    ComplVV : VV -> VP -> VP ;
+    ComplVS : VS -> S  -> VP ;
+    ComplVQ : VQ -> QS -> VP ;
+
+    ReflV2 : V2 -> VP ;
+    PassV2 : V2 -> Comp ; --- overgen (V2 with prep)
+
+    UseComp : Comp -> VP ;
+
+    AdvVP   : VP -> Adv -> VP ; -- here
+    AdVVP   : AdV -> VP -> VP ; -- always
+
+    UseVV   : VV -> V2 ;
+    UseVQ   : VQ -> V2 ;
+    UseVS   : VS -> V2 ;
+
+    CompAP  : AP  -> Comp ;
+    CompNP  : NP  -> Comp ;
+    CompAdv : Adv -> Comp ;
+
+}