1
0
forked from GitHub/gf-core

Fin.ExistNumCN

This commit is contained in:
aarne
2005-08-10 21:06:11 +00:00
parent b7708dc90f
commit b119eefcdb

View File

@@ -204,6 +204,10 @@ lin
mkSatsCopula impersNounPhrase ("olemassa" ++ (singularNounPhrase cn).s ! NPCase Nom)
) ;
---- ExistNumCN nu cn = nounPhraseNum False cn
ExistNumCN nu cn =
sats2clause (
mkSatsCopula impersNounPhrase (
"olemassa" ++ (nounPhraseNum False nu cn).s ! NPCase Nom)
) ;
} ;