mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
(Som) Fix bug in DetCN
This commit is contained in:
@@ -23,12 +23,11 @@ concrete NounSom of Noun = CatSom ** open ResSom, Prelude in {
|
|||||||
-- If cn has modifier, Nom ending attaches to the modifier
|
-- If cn has modifier, Nom ending attaches to the modifier
|
||||||
<_,Nom,True,_,_> => {nf=Def det.n ; c=Abs} ;
|
<_,Nom,True,_,_> => {nf=Def det.n ; c=Abs} ;
|
||||||
|
|
||||||
-- Definite
|
-- a Det with st=Indefinite uses Indef forms
|
||||||
<_,_,False,Definite,n> => {nf=Def n ; c=c} ;
|
<_,_,_,Indefinite,n> => {nf=Indef n ; c=c} ;
|
||||||
|
|
||||||
<_,_,False,Indefinite,n> => {nf=Indef n ; c=c} ;
|
-- All other determiners use the definite stem
|
||||||
|
_ => {nf=Def det.n ; c=c}
|
||||||
_ => {nf=Def det.n ; c=c} -- TODO check
|
|
||||||
} ;
|
} ;
|
||||||
art = gda2da cn.gda ! det.n ;
|
art = gda2da cn.gda ! det.n ;
|
||||||
num = case det.isNum of {True => Sg ; _ => det.n} ;
|
num = case det.isNum of {True => Sg ; _ => det.n} ;
|
||||||
|
|||||||
Reference in New Issue
Block a user