czech: fill in the lins needed to build an application grammar

The Czech resource was too incomplete to compile a Syntax/Grammar client:
Sentence, Idiom and Question defined almost nothing, and many Structural
words were absent, so MissingCze's notYet stubs were reached at PMCFG
generation time.

Added:
  CatCze        lincat VV
  SentenceCze   AdvS, ExtAdvS, SSubjS, EmbedS, EmbedQS, ImpVP
  IdiomCze      ImpP3, ExistNP, ImpersCl, GenericCl
  VerbCze       CompCN, ComplVS, ComplVV, PassV2
  NounCze       SentCN, PredetNP
  AdverbCze     SubjS
  QuestionCze   QuestIAdv
  PhraseCze     UttImpSg, UttImpPl, UttImpPol
  StructuralCze all_Predet, both7and_DConj, between_Prep, by8means_Prep,
                can_VV, either7or_DConj, every_Det, if_Subj, no_Quant,
                on_Prep, someSg_Det, that_Subj, under_Prep, where_IAdv
  ExtendCze     ExistsNP no longer excluded

Three of these approximate, because VerbForms lacks the required forms:
ImpVP uses the 1st person plural present ("předpokládáme, že ...") as there
is no imperative; PassV2 uses the reflexive passive ("číslo se dělí") as
passpart is commented out in ResCze; ImpP3 uses "nechť", which suits
mathematical text more than the "let John walk" of the RGL example.

Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>

src/czech/StructuralCze.gf

@@ -1,11 +1,42 @@
 concrete StructuralCze of Structural = CatCze **
   open ParadigmsCze, ResCze, Prelude in {
 
+-- a singular determiner inflecting like an adjective, e.g. "každý", "nějaký"
+oper
+  adjDet : AdjForms -> Determiner = \afs -> {
+    s = \\g,c => (adjFormsAdjective afs).s ! g ! Sg ! c ;
+    size = Num1
+    } ;
+
 lin
+    all_Predet = {s = "všechny"} ;
     and_Conj = mkConj "a" ;
+    both7and_DConj = {s1 = "jak" ; s2 = "tak"} ;
+    between_Prep = mkPrep "mezi" Ins ;
     by8agent_Prep = mkPrep "od" Gen ; ---- TODO this means "from", there might be no good translation
+    by8means_Prep = mkPrep "pomocí" Gen ;
+    can_VV = {
+      inf = "moci" ;
+      pressg1 = "mohu" ;
+      pressg2 = "můžeš" ;
+      pressg3, negpressg3 = "může" ;
+      prespl1 = "můžeme" ;
+      prespl2 = "můžete" ;
+      prespl3 = "mohou" ;
+      pastpartsg = "mohl" ;
+      pastpartpl = "mohli" ;
+      } ;
+    either7or_DConj = {s1 = "buď" ; s2 = "nebo"} ;
+    every_Det = adjDet (mladyAdjForms "každý") ;
     few_Det = invarNumeral "málo" ; -- CEG 6.8 --- TODO genitive mála
     for_Prep = mkPrep "pro" accusative ;
+    if_Subj = {s = "jestliže"} ;
+    no_Quant = adjFormsAdjective (mladyAdjForms "žádný") ;
+    on_Prep = mkPrep "na" Loc ;
+    someSg_Det = adjDet (mladyAdjForms "nějaký") ;
+    that_Subj = {s = "že"} ;
+    under_Prep = mkPrep "pod" Ins ;
+    where_IAdv = {s = "kde"} ;
     from_Prep = mkPrep (pre {"s"|"z" => "ze" ; _ => "z"}) Gen ; ---- consonant clusters
     have_V2 = mkV2 haveVerbForms ;
     in_Prep = mkPrep (pre {"v"|"m" => "ve" ; _ => "v"}) Loc ; ----