cleaning up resource module structure

lib/resource-1.0/english/LexEng.gf

@@ -1,59 +0,0 @@
-concrete LexEng of Lex = CatEng ** open ResEng, Prelude in {
-
-  lin
-    walk_V  = regV "walk" ;
-    help_V2 = regV "help" ** {c2 = []} ;
-    show_V3 = regV "show" ** {c2 = [] ; c3 = "to"} ;
-    want_VV = regV "want" ** {c2 = "to"} ;
-    claim_VS = regV "claim" ;
-    ask_VQ = regV "ask" ;
-
-    dog_N  = regN "dog" ;
-    son_N2 = regN "son" ** {c2 = "of"} ;
-    way_N3 = regN "way" ** {c2 = "from" ; c3 = "to"} ;
-
-    warm_A = regA "warm" ;
-    close_A2 = regA "close" ** {c2 = "to"} ;
-
-    here_Adv = {s = "here"} ;
-    very_AdA = {s = "very"} ;
-    always_AdV = {s = "always"} ;
-
-    only_Predet = {s = "only"} ;
-    all_Predet = {s = "all"} ;
-    this_Quant = {s = "this" ; n = Sg} ;
-    these_Quant = {s = "these" ; n = Pl} ;
-    
-    i_Pron  = mkNP "I"  "me"  "my"  Sg P1 ;
-    he_Pron = mkNP "he" "him" "his" Sg P3 ;
-    we_Pron = mkNP "we" "us"  "our" Pl P1 ;
-
-    whoSg_IP = mkIP "who" "whom" "whose" Sg ;
-    whoPl_IP = mkIP "who" "whom" "whose" Pl ;
-
-    when_IAdv = {s = "when"} ;
-    where_IAdv = {s = "where"} ;
-    why_IAdv = {s = "why"} ;
-
-    whichSg_IDet = {s = "which" ; n = Sg} ;
-    whichPl_IDet = {s = "which" ; n = Pl} ;
-
-    forty_Numeral = {s = table {NCard => "forty" ; NOrd => "fortieth"} ; n = Pl} ;
-
-    in_Prep = {s = "in"} ;
-    of_Prep = {s = "of"} ;
-
-    and_Conj = {s = "and" ; n = Pl} ;
-    either7or_DConj = {s1 = "either" ; s2 = "or" ; n = Sg} ;
-
-    if_Subj = ss "if" ;
-    because_Subj = ss "because" ;
-
-    but_PConj = {s = "but"} ;
-   
-    please_Voc = {s = "," ++ "please"} ;
-
-    more_CAdv = ss "more" ;
-    less_CAdv = ss "less" ;
-
-}

lib/resource-1.0/english/SeqConjunctionEng.gf

@@ -1,41 +0,0 @@
-concrete SeqConjunctionEng of Conjunction = 
-  CatEng ** open ResEng, Coordination, Prelude in {
-
-  lin
-
-    ConjS conj ss = {s = conjunctX conj ss} ;
-    DConjS conj ss = {s = conjunctDistrX conj ss} ;
-
-    ConjAdv conj ss = {s = conjunctX conj ss} ;
-    DConjAdv conj ss = {s = conjunctDistrX conj ss} ;
-
-    ConjNP conj ss = conjunctTable Case conj ss ** {
-      a = {n = conjNumber conj.n ss.a.n ; p = ss.a.p}
-      } ;
-    DConjNP conj ss = conjunctDistrTable Case conj ss ** {
-      a = {n = conjNumber conj.n ss.a.n ; p = ss.a.p}
-      } ;
-
-    ConjAP conj ss = conjunctTable Agr conj ss ** {
-      isPre = ss.isPre
-      } ;
-    DConjAP conj ss = conjunctDistrTable Agr conj ss ** {
-      isPre = ss.isPre
-      } ;
-
-    TwoS = twoSS ;
-    AddS = consSS comma ;
-    TwoAdv = twoSS ;
-    AddAdv = consSS comma ;
-    TwoNP x y = twoTable Case x y ** {a = conjAgr x.a y.a} ;
-    AddNP xs x = consTable Case comma xs x ** {a = conjAgr xs.a x.a} ;
-    TwoAP x y = twoTable Agr x y ** {isPre = andB x.isPre y.isPre} ;
-    AddAP xs x = consTable Agr comma xs x ** {isPre = andB xs.isPre x.isPre} ;
-
-  lincat
-    SeqS = {s1,s2 : Str} ;
-    SeqAdv = {s1,s2 : Str} ;
-    SeqNP = {s1,s2 : Case => Str ; a : Agr} ;
-    SeqAP = {s1,s2 : Agr => Str ; isPre : Bool} ;
-
-}

lib/resource-1.0/english/TestEng.gf

@@ -1,21 +0,0 @@
---# -path=.:../abstract:../common:prelude
-
-concrete TestEng of Test = 
-  NounEng, 
-  VerbEng, 
-  AdjectiveEng,
-  AdverbEng,
-  -- NumeralEng,
-  SentenceEng,
-  QuestionEng,
-  RelativeEng,
-  ConjunctionEng,
-  PhraseEng,
-  UntensedEng,
-  -- TensedEng,
-  LexEng 
-  ** {
-
-flags startcat = Phr ;
-
-} ;

lib/resource-1.0/english/UntensedEng.gf

@@ -1,15 +0,0 @@
-concrete UntensedEng of Untensed = CatEng ** open ResEng in {
-
-  flags optimize=all_subs ;
-
-  lin
-    PosCl cl = {s = cl.s ! Pres ! Simul ! Pos ! ODir} ;
-    NegCl cl = {s = cl.s ! Pres ! Simul ! Neg ! ODir} ;
-
-    PosQCl cl = {s = cl.s ! Pres ! Simul ! Pos} ;
-    NegQCl cl = {s = cl.s ! Pres ! Simul ! Neg} ;
-
-    PosRCl cl = {s = cl.s ! Pres ! Simul ! Pos} ;
-    NegRCl cl = {s = cl.s ! Pres ! Simul ! Neg} ;
-
-}