new Utt constructors for AP, Card

lib/src/german/PhraseGer.gf

@@ -17,6 +17,9 @@ concrete PhraseGer of Phrase = CatGer ** open Prelude, ResGer in {
     UttVP vp = {s = useInfVP True vp} ;  -- without zu
     UttAdv adv = adv ;
     UttCN n = {s = n.s ! Strong ! Sg ! Nom} ;
+    UttCard n = {s = n.s ! Neutr ! Nom} ;
+    UttAP ap = {s = ap.s ! APred} ;
+
     NoPConj = {s = []} ;
     PConjConj conj = ss (conj.s2) ;
 

lib/src/german/StructuralGer.gf

@@ -43,6 +43,7 @@ concrete StructuralGer of Structural = CatGer **
   here7from_Adv = ss ["hieraus"] ;
   here_Adv = ss "hier" ;
   how_IAdv = ss "wie" ;
+  how8much_IAdv = ss "wieviel" ;
   how8many_IDet = detLikeAdj Pl "wieviel" ;
   if_Subj = ss "wenn" ;
   in8front_Prep = mkPrep "vor" Dat ;