mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-08-22 04:06:23 -06:00
Fin: fix comparative and superlative adverbs
This commit is contained in:
@@ -76,7 +76,7 @@ oper
|
||||
let
|
||||
tuoree = init (tuore.s ! NCase Sg Gen) ;
|
||||
tuoreesti = tuoree + "sti" ;
|
||||
tuoreemmin = init tuoree ;
|
||||
tuoreemmin = init tuoree + "in" ;
|
||||
in {s = table {
|
||||
AN f => tuore.s ! f ;
|
||||
AAdv => if_then_Str isPos tuoreesti tuoreemmin
|
||||
|
||||
@@ -148,7 +148,7 @@ oper
|
||||
let
|
||||
tuoree = tuore.s ! 1 ;
|
||||
tuoreesti = tuoree + "sti" ;
|
||||
tuoreemmin = init tuoree ;
|
||||
tuoreemmin = init tuoree + "in" ;
|
||||
in {s = table {
|
||||
SAN f => tuore.s ! f ;
|
||||
SAAdv => if_then_Str isPos tuoreesti tuoreemmin
|
||||
|
||||
Reference in New Issue
Block a user