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