diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-06-25 16:54:35 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-06-25 16:54:35 +0000 |
| commit | e9e80fc389365e24d4300d7d5390c7d833a96c50 (patch) | |
| tree | f0b58473adaa670bd8fc52ada419d8cad470ee03 /examples/tutorial/semantics/BaseI.gf | |
| parent | b96b36f43de3e2f8b58d5f539daa6f6d47f25870 (diff) | |
changed names of resource-1.3; added a note on homepage on release
Diffstat (limited to 'examples/tutorial/semantics/BaseI.gf')
| -rw-r--r-- | examples/tutorial/semantics/BaseI.gf | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/examples/tutorial/semantics/BaseI.gf b/examples/tutorial/semantics/BaseI.gf index ec967e443..b7ed86666 100644 --- a/examples/tutorial/semantics/BaseI.gf +++ b/examples/tutorial/semantics/BaseI.gf @@ -32,7 +32,7 @@ lin And = and_Conj ; Or = or_Conj ; - UseInt i = symb i ; + UseInt i = symb (i ** {lock_Int = <>}) ; ---- terrible to need this Number = mkCN number_N ; @@ -46,15 +46,15 @@ lin Sum = prefix sum_N2 ; Product = prefix product_N2 ; - GCD nps = mkNP (mkDet (mkQuantSg defQuant) (mkOrd great_A)) + GCD nps = mkNP (mkDet DefArt (mkOrd great_A)) (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 whichPl_IDet cn) (mkVP ap))) ; + WhichAre cn ap = mkPhr (mkQS (mkQCl (mkIP which_IQuant cn) (mkVP ap))) ; QuestS s = mkPhr (mkQS (mkQCl s)) ; - Yes = yes_Phr ; - No = no_Phr ; + Yes = mkPhr yes_Utt ; + No = mkPhr no_Utt ; Value np = mkPhr (mkUtt np) ; Many list = mkNP and_Conj list ; @@ -65,6 +65,6 @@ lin oper prefix : G.N2 -> G.ListNP -> G.NP = \n2,nps -> - mkNP defSgDet (mkCN n2 (mkNP and_Conj nps)) ; + mkNP DefArt (mkCN n2 (mkNP and_Conj nps)) ; } |
