blob: 19c4ff78e720b12233bba4b2c2b5200f8e44090c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
type voyel = Sounds.t
type consonants =
{ ending : Sounds.t option option
; opening : Sounds.t list
; following : Sounds.t option }
type 'a group = voyel * consonants option
type 'a t = 'a group * 'a option option
type 'a modifier = Sounds.t t -> Sounds.t t
|