extended api with some IQuant rules

This commit is contained in:
aarne
2008-06-20 11:54:37 +00:00
parent 3d74636d2d
commit 6f60b26413
3 changed files with 16 additions and 9 deletions

View File

@@ -50,7 +50,7 @@ lin
(mkCN common_A (mkCN divisor_N2 (mkNP and_Conj nps))) ;
WhatIs np = mkPhr (mkQS (mkQCl whatSg_IP (mkVP np))) ;
-- WhichAre cn ap = mkPhr (mkQS (mkQCl (mkIP (mkIDet which_IQuant plNum) cn) (mkVP ap))) ;
WhichAre cn ap = mkPhr (mkQS (mkQCl (mkIP which_IQuant cn) (mkVP ap))) ;
QuestS s = mkPhr (mkQS (mkQCl s)) ;
Yes = mkPhr yes_Utt ;