! Copyright Kimmo Koskenniemi, 2012, 2016, 2018, 2020
!
Vow = :a | :e | :i | :o | :u ;
Cons = :d | :g | :h | :k | :l | :m | :n | :p | :r | :s | :t | :v ;
Vi = Vow.m ;
Ci = Cons.m ;
Closed = (i) Ci [Ci|.#.] ;

{kg}:g | {kj}:j | {kv}:v |
{pm}:m | {pv}:v | {pØ}:Ø |
{td}:d | {tl}:l | {tn}:n | {tr}:r | {tØ}:Ø <=>
     _ Vi Closed ;
! Weakening except k~Ø~'

{kØ}:Ø <=> _  Vi Closed ;
! pa<>on

{kØ'}:' <=>
     Vi :a _ :a Closed ,
     Vi :e _ :e Closed ,
     Vi :i _ :i Closed ,
     Vi :o _ :o Closed ,
     Vi :u _ :u Closed ;
                              ! vaa<'>an

{kØ'}:k /<= _ Vi Closed ;
! vaa<>oissa

{§}:%- <=>
     :a _ :a ,
     :o _ :o ,
     :u _ :u ;

:%% /<= Vow _ ;

%% /<= Cons _ ;