added Construction for 'five inch nail' in Eng,Ger,Fin from the Dresden team at the summer school

This commit is contained in:
Aarne Ranta
2018-12-03 17:27:59 +02:00
parent e66c27a4da
commit 994e0482bc
4 changed files with 7 additions and 3 deletions

View File

@@ -20,7 +20,8 @@ lin
what_name_QCl x = mkQCl (mkIComp whatSg_IP) (mkNP (E.GenNP x) L.name_N) ;
how_old_QCl x = mkQCl (E.ICompAP (mkAP L.old_A)) (lin NP x) ;
how_far_QCl x = mkQCl (E.IAdvAdv L.far_Adv) (lin NP x) ;
n_unit_CN card unit cn = mkCN (invarA (SyntaxFin.mkAdv (casePrep genitive) (mkNP <lin Card card : Card> (lin CN unit))).s) cn ;
-- some more things
weather_adjCl ap = mkCl (mkVP (lin AP ap)) ;