CompoundCN in Eng

lib/resource-1.0/english/ExtraEng.gf

@@ -43,6 +43,8 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
     UncNegImpSg imp = {s = imp.s ! neg ! ImpF Sg False} ;
     UncNegImpPl imp = {s = imp.s ! neg ! ImpF Pl False} ;
 
+    CompoundCN a b = {s = \\n,c => a.s ! Sg ! Nom ++ b.s ! n ! c} ;
+
 
   oper
     neg = CNeg False ; 

lib/resource-1.0/english/ExtraEngAbs.gf

@@ -9,4 +9,8 @@ abstract ExtraEngAbs = Extra ** {
     UncNegImpSg : Imp -> Utt;           -- do not help yourself
     UncNegImpPl : Imp -> Utt;           -- do not help yourselves
 
+-- freely compounded nouns
+
+    CompoundCN : CN -> CN -> CN ;       -- rock album
+
 }

lib/resource-1.0/english/ParadigmsEng.gf

@@ -89,7 +89,7 @@ oper
 
 --3 Compound nouns 
 --
--- A compound noun ia an uninflected string attached to an inflected noun,
+-- A compound noun is an uninflected string attached to an inflected noun,
 -- such as "baby boom", "chief executive officer".
 
     mkN : Str -> N -> N