Lengthening of half-long root consonant x:xx -- vowel change in right…

… context -- does not work
giellalt · Feb 11, 2024 · 54d5bfa · 54d5bfa
1 parent 6cec6ef
commit 54d5bfa
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/fst/morphology/phonology.twolc b/src/fst/morphology/phonology.twolc
@@ -453,11 +453,15 @@ Cx:0 <=> Vow: _  Cy:     (%^CLEN:) (%^RLEN:) (%^SLEN:|%^SVSH:) [.#.| %>] \Sgm: ;
 
 "Lengthening of half-long root consonant x:xx"
 !! **RULE: @RULENAME@** =  riččá piiru piirrun niisu niissun
-%^RC:Cy <=> Vow:  Cx _ :Vow+ Sgm:* Triggers:* %^CLEN: ; ! RC  !! Cx, not Cx:  čeec%^RCi%^CLEN%>n
+%^RC:Cy <=> Vow:  :Cx _ [:Vow+|Vow:] Sgm:* Triggers:* %^CLEN: ; ! RC  !! Cx, not Cx:  čeec%^RCi%^CLEN%>n
  	where Cx in ( b c č d g k l r s h m n đ v ŋ p š z ž t )  
  	      Cy in ( b c č d g k l r s h m n đ v ŋ p š z ž t ) 
  		  matched ;
 
+!!€ sa^RVh^RCâi5^WG^CLEN>i
+!!€ sa0vv0i00>i
+
+
 "Lengthening of root consonant x:yy"
 !! **RULE: @RULENAME@** =  consonant lengthening after WG - h:vv, p:vv, c:ss
 %^RC:Cy <=> Vow: Cx:Cy _ :Vow+ Cns:* [Triggers: - %^FCD:]* %^WG: %^CLEN: (%^VHIGH:|%^VBACK:) (%^RVSH:) ([%^SVLOW: |%^SLEN:]) %> [i:|s|u|o|ž |e h | e m |á] ;