mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
(Som) Fix sp forms in defIQuant
This commit is contained in:
@@ -328,7 +328,9 @@ oper
|
|||||||
|
|
||||||
defIQuant : Str -> Quant = \ee ->
|
defIQuant : Str -> Quant = \ee ->
|
||||||
let quantRaw = defQuant ee ("k"+ee) ("t"+ee) ("kuw"+ee) False
|
let quantRaw = defQuant ee ("k"+ee) ("t"+ee) ("kuw"+ee) False
|
||||||
in quantRaw ** {s = \\da,c => quantRaw.s ! da ! Abs} ;
|
in quantRaw ** {
|
||||||
|
s = \\da,c => quantRaw.s ! da ! Abs ;
|
||||||
|
sp = \\gn,c => quantRaw.sp ! gn ! Abs } ;
|
||||||
|
|
||||||
gnTable : (m,f,p : Str) -> (GenNum => Str) = \m,f,p ->
|
gnTable : (m,f,p : Str) -> (GenNum => Str) = \m,f,p ->
|
||||||
table {SgMasc => m ; SgFem => f ; _ => p} ;
|
table {SgMasc => m ; SgFem => f ; _ => p} ;
|
||||||
|
|||||||
Reference in New Issue
Block a user