next-lib renamed to lib, lib to old-lib

1 files changed, 0 insertions, 168 deletions

diff --git a/next-lib/src/catalan/StructuralCat.gf b/next-lib/src/catalan/StructuralCat.gf
deleted file mode 100644
index f1b1f2f5a..000000000
--- a/next-lib/src/catalan/StructuralCat.gf
+++ /dev/null
@@ -1,168 +0,0 @@
-concrete StructuralCat of Structural = CatCat ** 
-  open PhonoCat, MorphoCat, ParadigmsCat, BeschCat, (X = ConstructX), Prelude in {
-
-  flags optimize=all ; coding=utf8 ;
-
-lin
-
-  above_Prep = mkPrep "sobre" ;
-  after_Prep = {s = ["després"] ; c = MorphoCat.genitive ; isDir = False} ;
-  all_Predet = {
-    s = \\a,c => prepCase c ++ aagrForms "tot" "tota" "tots" "totes" ! a ;
-    c = Nom
-    } ;
-  almost_AdA, almost_AdN = ss (variants {"quasi"; "gairebé"}) ;
-  always_AdV = ss "sempre" ;
-  although_Subj = ss "benché" ** {m = Conjunct} ;
-  and_Conj = {s1 = [] ; s2 = etConj.s ; n = Pl} ;
-  because_Subj = ss "perque" ** {m = Indic} ;
-  before_Prep = {s = "abans" ; c = MorphoCat.genitive ; isDir = False} ;
-  behind_Prep = {s = "darrera" ; c = MorphoCat.genitive ; isDir = False} ;
-  between_Prep = mkPrep "entre" ;
-  both7and_DConj = {s1,s2 = etConj.s ; n = Pl} ;
-  but_PConj = ss "però" ;
-  by8agent_Prep = mkPrep "per" ;
-  by8means_Prep = mkPrep "mitjançant" ;
-  can8know_VV = mkVV (verbV (saber_99 "saber")) ;
-  can_VV = mkVV (verbV (poder_85 "poder")) ;
-  during_Prep = mkPrep "durant" ; ----
-  either7or_DConj = {s1,s2 = "o" ; n = Sg} ;
-  everybody_NP = makeNP ["tothom"] Masc Sg ;
-  every_Det = {s,sp = \\_,_ => "cada" ; n = Sg ; s2 = []} ;
-  everything_NP = pn2np (mkPN ["tot"] Masc) ;
-  everywhere_Adv = ss ["a tot arreu"] ;
-  few_Det = {
-    s,sp = \\g,c => prepCase c ++ genForms "pocs" "poques" ! g ; n = Pl ; s2 = []} ;
----  first_Ord = {s = \\ag => (regA "primer").s ! Posit ! AF ag.g ag.n} ;
-  for_Prep = mkPrep ["per a"] ;
-  from_Prep = complGen ; ---
-  he_Pron = 
-    mkPronoun 
-     "ell" "lo" "el" "ell"
-     ["el seu"] ["la seva"] ["els seus"] ["les seves"]
-      Masc Sg P3 ;
-  here_Adv = mkAdv "aquí" ;		-- acÌ
-  here7to_Adv = mkAdv ["cap aquí"] ;
-  here7from_Adv = mkAdv ["d'aquí"] ;
-  how_IAdv = ss "com" ;
-  how8many_IDet = 
-    {s = \\g,c => prepCase c ++ genForms "quants" "quantes" ! g ; n = Pl} ;
-  if_Subj = ss "si" ** {m = Indic} ;
-  in8front_Prep = {s = "davant" ; c = MorphoCat.genitive ; isDir = False} ;
-  i_Pron = 
-    mkPronoun
-      "jo" "em" "em" "mi"
-      ["el meu"] ["la meva"] ["els meus"] ["les meves"]
-      Fem Sg P1 ;
-  in_Prep = mkPrep "en" ;
-  it_Pron = 
-	mkPronoun 
-     "ell" "lo" "el" "ell"
-     ["el seu"] ["la seva"] ["els seus"] ["les seves"]
-     Masc Sg P3 ;
-  less_CAdv = X.mkCAdv "menys" conjThan ; ----
-  many_Det = {
-    s,sp = \\g,c => prepCase c ++ genForms "molts" "moltes" ! g ; n = Pl ; s2 = []} ;
-  more_CAdv = X.mkCAdv "més" conjThan ;
-  most_Predet = {s = \\_,c => prepCase c ++ ["la majoria"] ; c = CPrep P_de} ;
-  much_Det = {
-    s,sp = \\g,c => prepCase c ++ genForms "molt" "molta" ! g ; n = Sg ; s2 = []} ;
-  must_VV = mkVV (verbV (haver_59 "haver" True)) ;   -- + of_Prep
-  no_Utt = ss "no" ;
-  on_Prep = mkPrep "sobre" ;
----  one_Quant = {s = \\g,c => prepCase c ++ genForms "un" "una" ! g} ;
-  only_Predet = {s = \\_,c => prepCase c ++ "nomÈs" ; c = Nom} ;
-  or_Conj = {s1 = [] ; s2 = "o" ; n = Sg} ;
-  otherwise_PConj = ss "altrament" ;
-  part_Prep = complGen ;
-  please_Voc = ss "sisplau" ;
-  possess_Prep = complGen ;
-  quite_Adv = ss "bastant" ;
-  she_Pron = 
-    mkPronoun
-      "ella" "la" "la" "ella"
-      ["el seu"] ["la seva"] ["els seus"] ["les seves"]
-      Fem Sg P3 ;
-  so_AdA = ss "tan" ;
-  somebody_NP = pn2np (mkPN ["alg˙"] Masc) ;
-  somePl_Det = {s,sp = 
-    \\g,c => prepCase c ++ genForms "alguns" "algunes" ! g ; n = Pl ; s2 = []} ;
-  someSg_Det = {
-    s,sp = \\g,c => prepCase c ++ genForms "algun" "alguna" ! g ; n = Sg ; s2 = []} ;
-  something_NP = pn2np (mkPN ["quelcom"] Masc) ;
-  somewhere_Adv = ss ["a algun lloc"] ;
-  that_Quant =
-    let aquell : ParadigmsCat.Number => ParadigmsCat.Gender => Case => Str = table {
-      Sg => \\g,c => prepCase c ++ genForms "aquell" "aquella" ! g ;
-      Pl => \\g,c => prepCase c ++ genForms "aquells" "aquelles" ! g
-      }
-    in {
-      s = \\_ => aquell ;
-      sp = aquell ;
-      s2 = []
-    } ;
-  there_Adv = mkAdv "allà" ;		-- all·
-  there7to_Adv = mkAdv ["cap a allà"] ;
-  there7from_Adv = mkAdv ["d'allà"] ;	
-  therefore_PConj = ss ["per tant"] ;
-  they_Pron = mkPronoun
-    "elles" "les" "les" "elles"
-    ["el seu"] ["la seva"] ["llurs"] ["llurs"]
-    Fem Pl P3 ;
-
-  this_Quant =
-    let aquest : ParadigmsCat.Number => ParadigmsCat.Gender => Case => Str = table {
-      Sg => \\g,c => prepCase c ++ genForms "aquest" "aquesta" ! g ;
-      Pl => \\g,c => prepCase c ++ genForms "aquests" "aquestes" ! g
-      }
-    in {
-      s = \\_ => aquest ;
-      sp = aquest ;
-      s2 = []
-    } ;
-  through_Prep = mkPrep "mitjançant" ;
-  too_AdA = ss "massa" ;
-  to_Prep = complDat ;
-  under_Prep = mkPrep "sota" ;
-  very_AdA = ss "molt" ;
-  want_VV = mkVV (verbV (voler_120 "voler")) ;
-  we_Pron = 
-    mkPronoun 
-      "nosaltres" "nos" "nos" "nosaltres"
-      ["el nostre"] ["la nostra"] ["els nostres"] ["les nostres"]
-      Fem Pl P1 ;
-   whatSg_IP = {s = \\c => prepCase c ++ ["què"] ; a = aagr Masc Sg} ;
-   whatPl_IP = {s = \\c => prepCase c ++ ["què"] ; a = aagr Masc Pl} ; ---
-   when_IAdv = ss "quan" ;
-   when_Subj = ss "quan" ** {m = Indic} ;
-   where_IAdv = ss "on" ;
-   which_IQuant = {s = table {
-      Sg => \\g,c => prepCase c ++ "quin" ;  --per fer: femenÌ quina
-      Pl => \\g,c => prepCase c ++ "quins"
-      }
-     } ;  --per fer: femenÌ quines
-    whoPl_IP = {s = \\c => prepCase c ++ "qui" ; a = aagr Fem Pl} ;
-    whoSg_IP = {s = \\c => prepCase c ++ "qui" ; a = aagr Fem Sg} ;
-    why_IAdv = ss ["per quË"] ;
-    without_Prep = mkPrep "sense" ;
-    with_Prep = mkPrep "amb" ;
-  yes_Utt = ss "sí" ;  
-  youSg_Pron = mkPronoun 
-    "tu" "et" "et" "tu"
-    ["el teu"] ["la teva"] ["els teus"] ["les teves"]
-    Fem Sg P2 ;
-  youPl_Pron =
-    mkPronoun
-      "vosaltres" "us" "us" "vosaltres"
-      ["el vostre"] ["la vostra"] ["els vostres"] ["les vostres"]
-      Fem Pl P2 ;
-  youPol_Pron =
-    mkPronoun
-      "vosté" "li" "li" "vosté"
-      ["el seu"] ["la seva"] ["els seus"] ["les seves"]
-      Fem Pl P2 ;
-   have_V2 = dirV2 (verbV (tenir_108 "tenir")) ;
-oper
-  etConj : {s : Str ; n : MorphoCat.Number} = {s = "i" } ** {n = Pl} ;
-
-}