mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-20 08:32:50 -06:00
included capitals in some phonological string pattern matching in Fin and Ita
This commit is contained in:
@@ -824,7 +824,7 @@ resource MorphoFin = ResFin ** open Prelude in {
|
|||||||
} ;
|
} ;
|
||||||
|
|
||||||
vowHarmony : Str -> Str = \s -> case s of {
|
vowHarmony : Str -> Str = \s -> case s of {
|
||||||
_ + ("a" | "o" | "u") + _ => "a" ;
|
_ + ("a" | "o" | "u" | "A" | "O" | "U") + _ => "a" ;
|
||||||
_ => "ä"
|
_ => "ä"
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
|
|||||||
@@ -7,11 +7,12 @@ resource PhonoIta = open Prelude in {
|
|||||||
|
|
||||||
oper
|
oper
|
||||||
vocale : Strs = strs {
|
vocale : Strs = strs {
|
||||||
"a" ; "e" ; "h" ; "i" ; "o" ; "u" ; "è" ; "y"
|
"a" ; "e" ; "h" ; "i" ; "o" ; "u" ; "è" ; "y" ; "A" ; "E" ; "I" ; "O" ; "U" ; "H"
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
sImpuro : Strs = strs {
|
sImpuro : Strs = strs {
|
||||||
"z" ; "sb" ; "sc" ; "sd" ; "sf" ; "sm" ; "sp" ; "sq" ; "sr" ; "st" ; "sv"
|
"z" ; "sb" ; "sc" ; "sd" ; "sf" ; "sm" ; "sp" ; "sq" ; "sr" ; "st" ; "sv" ;
|
||||||
|
"Z" ; "Sb" ; "Sc" ; "Sd" ; "Sf" ; "Sm" ; "Sp" ; "Sq" ; "Sr" ; "St" ; "Sv"
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
elision : (_,_,_ : Str) -> Str = \il, l', lo ->
|
elision : (_,_,_ : Str) -> Str = \il, l', lo ->
|
||||||
|
|||||||
Reference in New Issue
Block a user